Claude,

Try the following:

ActiveSheet.Buttons("Button 1").Caption = "test"


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"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"