popolare combox da tabella

Hai un problema con Excel?

Nuova discussione

popolare combox da tabella
di sgmmar data: 26/10/2013 09:55:30
Buon giorno a tutti,
in un form di Word ho inserito una combobox che viene alimentata da una tabella presente nel documento
attivo:
al variare della combobox si aggiorna la textbox del documento attivo
Allego file e di seguito posto il codice...... funziona ma non riesco a togliere il simbolo del paragrafo.

Probabilmente devo "lavorare" sulle proprietà del testo, ho provato sia sulla combo che sulla textbox,
ma non trovo come settarle correttamente.
Ovviamente sono bene accetti TUTTI/E i consigli e/o critiche al codice.
Grazie in anticipo a tutti.
Buona giornata.

Private Sub ComboBox1_Change()
ThisDocument.TextBox1.Text = UserForm1.ComboBox1
End Sub

Private Sub UserForm_Initialize()
Dim r As Variant


For r = 1 To ActiveDocument.Tables(1).Rows.Count
    UserForm1.ComboBox1.AddItem ActiveDocument.Tables(1).Cell(r, 1).Range.Text
    
Next r

End Sub

di sgmmar data: 26/10/2013 14:33:41
Ciao a tutti,
ho risolto modificando così:

ciao e grazie a tutti

Private Sub ComboBox1_Change()
ThisDocument.TextBox1.Text = Mid(UserForm1.ComboBox1, 1, UserForm1.ComboBox1.TextLength - 1)
End Sub

di sgmmar data: 28/10/2013 08:22:53
Buon giorno a tutti,
scusate se riapro la discussione.
Ferma restando la "soluzione" che ho pensato per togliere il simbolo paragrafo nell'aggiornare la TextBox
del documento attivo, qualcuno mi può spiegare perchè quando il For Next popola la ComboBox dello UserForm
aggiunge il simbolo alla fine di ogni item?

Come devo modificare il codice?
Grazie in anticipo

Vuoi Approfondire?