ich habe folgendes Problem, hoffentlich kann jemand helfen.
Ich habe eine Userform, die beim starten einer Exceltabelle automatisch geladen wird. Außerdem erstelle ich bei starten auf der Userform
ca. 300 Buttons mit einer Funktion.
Jetzt ist das Problem, dass ich nicht auf die Button mit den Standart ereignissen zugreifen kann zB. Buttonname_Click, wie kann ich das verwirklichen.Die Buttons werden erstellt nur der Zugriff klappt nicht
Hier der Code der die Button auf meiner Form erstellt:
Public
Sub Workbook_open()
Call SpielfeldLegen
Spielfeld.Show
End Sub
Public
Sub SpielfeldLegen()
Dim i, j, x, y, b_Hoehe, b_Breite As Integer
x = 15
y = 15
b_Hoehe = 15
b_Breite = 15
'Zeile
For i = 1 To 15
x = b_Breite
'Spalte
For j = 1 To 20
Dim butt As MSForms.CommandButton
Set butt = Spielfeld.SchlachtfeldA.Controls.Add("Forms.CommandButton.1", "SA" & i & j, True)
With butt
.Left = x
.Top = y
.Height = b_Hoehe
.Width = b_Breite
.TakeFocusOnClick = False
.Enabled = True
End With
x = x + b_Breite
Next j
y = y + b_Hoehe
Next i
Im Quelltext meiner Userform (mit dem Namen Spielfeld) müsste ich jetzt egtl auf den ersten button so zugreifen müssen:
Public
Sub SA11_Click()
MsgBox "OK"
End Sub
der nächste heisst dann SA12, SA13 usw...
Danke im Vorraus
Dennis