Button that Selects string "T", "X", and "R"

Question

Hi everyone, how can I create a single button that everytime i click it, it will be then select either from strings "T", "X" or"R" and display it in the button. it actually corresponds to these wingdings 2 font. Thanks in advance.

hansvogelaar · Accepted Answer

See the attached sample workbook. I inserted a command button from Form Controls, set its caption (text) to "T" and set its font to Wingdings 2.
I assigned the following macro to the command button:
Sub Button1_Click()
    With ActiveSheet.Buttons("Button 1")
        Select Case .Caption
            Case "T"
                .Caption = "X"
            Case "X"
                .Caption = "R"
            Case "R"
                .Caption = "T"
        End Select
    End With
End Sub
&nbsp;You'll have to allow macros when you open the workbook.

Forum Discussion

Button that Selects string "T", "X", and "R"

2 Replies

Resources