shape.name als variabele

[sickofitall]

Hallo

het is me gelukt om aan de Shape van een 'selectievakje' een naam te geven. Dit heb ik gedaan voor 12 selectievakjes.
Nu wil ik aan elk van deze selectievakjes dezelfde macro schakelen, waarbij de naam van het selectievakje een variabele is in mijn macro.
Nu weet ik alleen niet hoe ik de naam van het selectievakje (de shape) kan oproepen.
Ik vermoed dat het iets is in de zin van

Dim variabele as String
variabele = Activesheet.Activeshape.Name

Maar zoals jullie wellicht wel weten werkt dat niet.
Hoe doe ik dit wel?

bedankt

 

[snb]

Wat voor soort selektievakje (formulier of werkset besturingselementen) ?

 

[sickofitall]

Idd, niet vermeld:

selectievakje van formulieren

 

[snb]

wees slim, gebruik die uit de werkset besturingselemneten. Dan gaat wat je wil simpel met

Private Sub Checkbox1_Click()
   samen 1
End sub
Private Sub Checkbox2_Click()
   samen 2
End sub

Private Sub samen(c4)
  Sheets(1).cells(1,c4)="verrassing !"
End Sub