| E03: Listbox in UserForm |
| Von |
Udo |
| Am |
18. Oktober 2008 um 18:59:36 |
| Frage |
Hallo,
ich habe in einer UserForm eine Listbox die mit den Zellen A1:A10 in 'Tabelle1' verknüpft ist.
Kann ich die Listbox so programmieren, dass ich mehrere Einträge auswählen kann und in den Zellen B1:B10 die entsprechende Auswahl mit WAHR oder FALSCH (oder ähnlichem) angezeigt wird?
Vielen Dank für eure Antworten!
gruß
Udo |
|
|
Antwort: |
| Von |
r.mueller@sz-online.de |
| eMail |
|
| Am |
18. Oktober 2008 um 19:52:15 |
| Antwort |
Hallo
Code in deine Userform:Private Sub ListBox1_Change()
Dim lngI As Long
For lngI = 0 To ListBox1.ListCount - 1
If ListBox1.Selected(lngI) Then
ThisWorkbook.Worksheets("Tabelle1").Cells(lngI + 1, 2).Value = True
Else
ThisWorkbook.Worksheets("Tabelle1").Cells(lngI + 1, 2).Value = False
End If
Next
End Sub Gruß |
|
| [ VB-/VBA-Forum | Archiv 0413 | Archiv-Übersicht ] |
|
|
Zum Seitenanfang