wer kann mir den Unterschied zwischen
dem Optionsfeld in der Formular-Toolbox und dem in der
Steurelement-Toolbox erklären.
Danke im Voraus.
Schöne Grüsse
Matthias
Private Sub UserForm_Initialize()
Dim WsTabelle As Worksheet
For Each WsTabelle In Sheets
If WsTabelle.Visible = True Then ListBox1.AddItem WsTabelle.Name
Next WsTabelle
End Sub
Private Sub CommandButton1_Click()
Dim LoI As Long
With Worksheets("Tabelle1")
' von Peter Haserodt
For LoI = 0 To ListBox1.ListCount - 1
If ListBox1.Selected(LoI) Then
Worksheets(ListBox1.List(LoI, 0)).PrintOut
End If
Next LoI
End With
End Sub