word caselle di testo

[towandaverde]

ciao, ho creato un documento word con anche le caselle di testo activex,
problema con il tasto tab non riesco a spostarmi da una casella all'altra, c'è qualche possibilità di fare cio'?
grazie

[Avatar3]

Sai che, sembra, non esista un comando che funzioni con il tab?
Supponendo che tu abbia 3 caselle testo (TextBox1, TextBox2, TextBox3)
vai in progettazione casella testo e selezionando la casella testo1 tasto destro seleziona "Visualizza Codice"
all'interno del vba inserisci questo codice

Codice: Seleziona tutto

Private Sub TextBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
TextBox2.Select
End Sub

nel codice casella testo2 codice inserisci

Codice: Seleziona tutto

Private Sub TextBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
TextBox3.Select
End Sub

etc
etc
dopo aver scritto nella casella testo1 clicca due volte con il mouse
e ti troverai nella casella testo2
ma sinceramente preferirei cliccare direttamente nella casella testo2 con un solo click del mouse

Sembra strano ma il tab non è previsto per passare da una casella testo all'altra ma inserisce i tab nella casella testo stessa
del resto essendo una casella testo è logico che accetti all'interno i tab, non è come access o excel

[towandaverde]

hai ragione, grazie,
ho capito...
clicco conm il mouse

[Avatar3]

Mi è venuta un'idea che funziona solo se sei sicuro che non utilizzerai mai una lettere in quella casella testo
ad esempio la "x"
in questo caso puoi inserire nel codice del textbox1 queste righe

Codice: Seleziona tutto

Private Sub TextBox1_Change()
If UCase(Mid(TextBox1.Value, Len(TextBox1.Value), 1)) = "X" Then
TextBox2.Select
Me.TextBox1.Value = Replace(TextBox1.Value, "x", "")
Me.TextBox1.Value = Replace(TextBox1.Value, "X", "")
End If
End Sub

Stessa cosa per textbox2 (chiaramente cambiando i riferimenti)
Prova
Al posto della "x" puoi usare qualsiasi carattere anche il "+" etc

ciao

[towandaverde]

grazie avatar, domani provo ...poi ti dico qualcosa...
ho tre caselle con la x ma si possono saltare.....
domani provo...
grazie

[Avatar3]

Puoi provarlo subito, se vuoi
in un MP ho allegato un file doc con già le macro incorporate e assegnato come carattere lo slash rovesciato "\"

molto comodo anche perché si trova sopra il tab