Waarschijnlijk is het antwoord heel simpel, maar naar een ochtend het internet af te zoeken, ben ik er niet achter wat ik in onderstaande code fout doe.
Ik wil de naam van de activeX button (op werkblad) zichtbaar krijgen als er op geklikt wordt.
ik krijg een foutmelding:
"Fout 1004 tijdens uitvoering:
de index van de opgegeven verzameling valt buiten het bereik."
alvast bedankt voor het mee denken.
Ik wil de naam van de activeX button (op werkblad) zichtbaar krijgen als er op geklikt wordt.
Code:
Private Sub CommandButton3_Click()
Call ActiveButtonName 'nu zou er in een popup dus "Commandbutton3" moeten staan.
End Sub
Sub ActiveButtonName()
MsgBox ActiveSheet.Shapes.Range(Array(Application.Caller)).Name
End Sub
ik krijg een foutmelding:
"Fout 1004 tijdens uitvoering:
de index van de opgegeven verzameling valt buiten het bereik."
alvast bedankt voor het mee denken.