Object in Array einlesen; fehlerhafte Deklaration?
Andreas
ich habe schon im Archiv gesucht, aber keine Lösung für mein Problem gefunden. Ich möchte ein Object (einen CommandButton) in ein Array aufnehmen. Mit Collections funktioniert es, warum nicht mit Arrays? Ich vermute, daß ich in der Deklaration der beteiligten Komponenten einen Fehler gemacht habe, auf den ich leider nicht komme.
Es wäre schön, wenn jemand einen kurzen Blick drauf werfen könnte:
Option Explicit
Private Sub UserForm_Initialize()
Dim cmdButton01 As MSForms.CommandButton
Dim objControl As Object
Dim arrObjects() As Object 'Wenn ich 'as Object' deklariere, bekomme ich einen Fehler schon _
beim Einlesen 'Object oder With Variable nicht festgelegt. No. 91'
ReDim arrObjects(1 To 1)
Set cmdButton01 = Me.Controls.Add("Forms.CommandButton.1", "cmdButton01", True)
arrObjects(1) = cmdButton01 'Das Einlesen klappt
'Set objControl = arrObjects(1) 'Aber die Ausgabe als Object nicht
'Debug.Print objControl.Name
End Sub
Vielen Dank und Gruß, Andreas