ListBox - ansprechen der Einträge
12.01.2004 15:24:40
andif
zweite Gehversuche mit Userforms. Habe jetzt meine 2 Listbox. Kann Klientennamen in der ersten auswählen, die erscheinen dann in der zweiten.
Jetzt mein Problem: Wie kann ich die ausgewählten Einträge durch eine Schleife laufen lassen?
Die Namen sind gleichzeitig die Blattnamen. So können ausgewählte Tabellenblätter angesprochen werden. Alle nacheinander. Hier erst einmal der Versuch in allen ausgewählten Namen / Tabellenblättern die leeren Zeilen zu entfernen.
Soweit bin ich schon gekommen. Der Debugger sagt, die Zeile mit .Value ist falsch.
Private Sub cmdStart_Click()
If chkTabelleLeerzeilenEntfernen = True Then
strName = lstTabellenblattAuswahl.Value
Worksheets(strName).Activate
Application.ScreenUpdating = False
For i = 250 To 1 Step -1
If Cells(i, 1).Value = "" Then Cells(i, 1).EntireRow.Delete
Next i
Application.ScreenUpdating = True
End If
End Sub
Gruß
andi