RowSource = ?
06.08.2005 18:14:46
Micha
nun Möchte ich gern in einer UserForm eine ComboBox (Box2) einrichten, welche mir alle Sheets der aktuellen Mappe anzeigt, also die Namen derer!!
z.Z. grüble ich über folgendem:
Private Sub UserForm_Initialize()
Dim s As Integer, n() As String, z As Byte
s = Worksheets.Count
ReDim n(s)
For z = 1 To s
n(z) = Sheets(z).Name
Next
Box2.RowSource = ? ..... n() geht nicht!!?
End Sub
Wie muß ich RowSource zuweisen, damit es funzt?
Wenn ich Box2.RowSource = "A:A" schreibe, funzt die UserForm und die Box2, nur wird mir dann logischerweise Spalte A aufgelistet.... :-((.
Könnt ihr mir 1 Tip geben?
Gruß Micha
Anzeige