möchte gerne per Click-Ereignis mit CommandButton alle
Einträge einer ListBox löschen. Nur das Online-Beispiel in
der VBA Hilfe zeigt in dieser Zeile:
ListBox1.RemoveItem (ListBox1.ListIndex)
einen nicht näher bezeichneten (Laufzeit)Fehler.
möchte gerne auf Click-Ereignis Alle Elemente der ListBox
löschen. Methode Clear kommt nicht in Frage, da Elemente
dynamisch geladen werden. Methode RemoveItem funktioniert
nicht (das Online Beispiel der VBA-Hilfe unter Stichwort
ListCount bringt in der Zeile:
ListBox1.RemoveItem (ListBox1.ListIndex)
einen nicht näher bezeichneten (Laufzeit)-Fehler.
Die ListBox hat keine Mehrfachauswahl und ist einmal 1-
spaltig und einmal mehrspaltig. Die Daten werden einem
Excel-Sheet entnommen.
Freue mich für jede Hilfe
(u. U. auch, wie man lediglich nur eine markierte Zeile
löscht)
Besten dank und frdl. Grüße
Harry
<"Harry Ollinger" <Wiener...@aol.com> schrieb im Newsbeitrag
news:00f201c30263$dd6a3990$3301...@phx.gbl...
<Hi NG,
bei mir funktoniert folgender Code:
Sub ListboxLöschen()
With Sheets("Tabelle1")
.ListBox1.Clear
End With
End Sub
Viele Grüße
Bernd
MVP für Microsoft Excel
Das VBA-Kompendium und Makro-Einsteigerbücher mit Leseproben(PDF)
unter http://held-office.de
"Harry Ollinger" <Wiener...@aol.com> schrieb:
ohne deinen Code probiert zu haben, sieht das nach der
gesetzten Eigenschaft TakeFocusOnClick des Command Buttons
aus. Setz den mal auf False.
MfG
Michael
--
-------------------------------------------
Michael Schwimmer
Home : http://schwimmer.bei.t-online.de