Private Sub CommandButton1_Click()
Const cCaption1 As String = "Do Action ONE"
Const cCaption2 As String = "Do Action TWO"
If .Caption = cCaption1 Then
MsgBox "Action ONE code here"
.Caption = cCaption2
MsgBox "Action TWO code here"
.Caption = cCaption1
Basic but it works.
This assumes that you want differand captions depending on the toggle state !
If in Excel are you using Forms toolbar or Control Toolbar? Simplest is to use the Option buttons on the Forms toolbar (and allows backward compatibility with XL97 and cross-compatibility with XL on the Mac).
old, slow, and confused
but at least I'm inconsistent!