ActiveSheet.OleObjects.("CommandButton1").Object.C aption = "test"

--
Regards,
Tom Ogilvy

"Claude" wrote in message
...
Hi

Does anyone know how to change the text on a command
button? The following does not work:

ActiveSheet.Shapes("CommandButton1").Caption = "test"