Caption van Active-X checkbox veranderen

[jajajajanneke]

Hoi,

Ik wil graag de Caption van een Active-X Checkbox veranderen en dacht dat dat heel simpel zou kunnen door iets als dit:

CheckBox1.Caption = "test"

Maar dat werkt dus niet

Het uiteindelijke doel is om alle checkboxes te veranderen van Nederlands naar Engels en vice versa.
Ik heb de checkboxes overigens niet in een formulier staan maar gewoon 'los' in een sheet.

Weet iemand hoe ik dit kan doen?

Alvast bedankt.

 

[edmoor]

Sheets("Blad1").CheckBox1.Caption = "Test"

 

[VenA]

En waarom doet de code het niet? Krijg je een foutmelding? Hoe wordt het aangeroepen? Dus graag even een voorbeeld bestandje of de volledige code.

 

[snb]

ActiveX:

[FONT=Courier New]Sheets(1).OleObjects("CheckBox1").Caption = "Test"[/FONT]

of

[FONT=Courier New]Sheets(1).OleObjects("CheckBox1").Object.Caption = "Test"[/FONT]

 

[jajajajanneke]

Bedankt allen,

2 van de 3 codes werken perfect:
Sheets("Blad1").CheckBox1.Caption = "Test"
en
Sheets(1).OleObjects("CheckBox1").Object.Caption = "Test"

Het is duidelijk dat het met name gaat om het verwijzen naar een specifieke sheet.

Super bedankt!