Selektierte auf eigenes Arbeitsblatt
16.03.2005 10:27:15
Günter
Zeilen in UF per VBA kopieren zu lassen und in ein eigenes Arbeitsblatt
in derselben Exceldatei (mit einer vorherigen Abfrage ja/nein) einfügen zu lassen.
Hier ein Teil des Makros:
Sub test()
Dim y As Integer
With ListBox1
.MultiSelect = fmMultiSelectMulti
For y = 0 To ListBox1.ListCount - 1
.Selected(y) = True
Next
End With
End Sub
Gruß
Günter