I have been trying to write a macro to change a command button caption to the data in a cell Sub Bouton97_Cliquer() UserForm1.CommandButton97.Caption = Sheet1.Range("B13") End Sub But I can't get it to work. Would appreciate any help Bren