Toggling Button Labels Between Expand/Collapse

[thomas.utley]

Hi. I'm new to VBA and stuck on what I thought would be a simple task.
I have a worksheet with several large sections arranged vertically.
Each section has a header with a button control next to it. I'd like
to have the user click the button to toggle between hiding/showing
several rows below it and at the same time toggle the text label of the
button between Expand and Collapse.

I found the button property I need to toggle
(Selection.Characters.Text), but I'm not sure of the best way to
declare some sort of "binary toggle" variable and then step back and
forth between the two.

Any advice? Thanks!

 

[Dave D-C]

How about:
If CommandButton1.Caption = "Expand" then
Range(xx).Show
CommandButton1.Caption = "Collapse"
else
Range(xx).Hide
CommandButton1.Caption = "Expand"
End If