Word Userform mit ComboBox mehrere Spalten auslese
12.12.2017 22:44:50
Martin
habe die Frage bereits vor einiger Zeit gestellt und auch eine schnelle Antwort bekommen, jedoch hat es leider nicht funktioniert. Ich habe eine Userform in Word erstellt, in der es eine mehrspaltige Combobox gibt. Diese Combobox habe ich von einer Excel-Tabelle gefüllt. Funktioniert auch alles problemlos. Nun möchte ich aber in der ComboBox eine Zeile auswählen und die jeweiligen Zellen in verschiedene Textboxen schreiben. Da hakt es leider.
Mit folgendem Code geht es leider nicht:
Option Explicit
Private Sub ComboBox1_Change()
Dim strText As String
Dim lngIndex As Long
With ComboBox1
For lngIndex = 1 To .ColumnCount
Controls("TextBox" & lngIndex).Value = .List(pvargIndex:=.ListIndex, pvargColumn:= _
lngIndex - 1)
Next
End With
End Sub
Vielen Dank im Voraus!