Manipulera knappar och celler i Excel

Kör Office 2004 Mac, första gången jag behöver använda macros.

Jag försöker att ändra etiketten (caption?) på en OptionButton så den hela tiden har samma etikett som texten i en bestämd cell. Men jag hittar inte riktigt rätt till varken cellen eller min OptionButton.

Antar att det är samma syntax för PC som Mac-Office?

Detta funkar hos mig (Excel 2007):


----------------------------------------------


Private Sub Worksheet_Change(ByVal Target As Range)

Set A = Worksheets("Blad1").Shapes("OptionButton 1")
A.OLEFormat.Object.Caption = Range("A1").Text


End Sub

-----------------------------------------------