Toggle Button

jpb103 · #2 06-11-2014, 11:58 AM

You have a space between .Font and .Hidden. This should cause a syntax error. I just made something similiar myself, except I did not use a command button. I inserted a bookmark called "HelpText" and then, in the line just above the bookmark, I pressed Ctrl+F9 and inside the {} that appeared I wrote: MACROBUTTON ToggleHelp Toggle
Then I pressed Alt+F9 to activate it. The code for the ToggleHelp macro I wrote follows:

Code:

Sub ToggleHelp()
'///////////////////////////////////////////////////////////////////////////////////
'///////////////This function toggles the instructions for use//////////////////////
'///////////////////////////////////////////////////////////////////////////////////
If (ActiveDocument.Bookmarks("HelpText").Range.Font.Hidden) Then
    ActiveDocument.Bookmarks("HelpText").Range.Font.Hidden = False
Else
    ActiveDocument.Bookmarks("HelpText").Range.Font.Hidden = True
End If
'//////////////////END//////////////////////////////////////////////////////////////
End Sub

That way you just double click the word "Toggle" and it hides/shows the bookmarked block.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Macro to toggle outline level	Jennifer Murphy	Word VBA	3	01-22-2014 11:22 PM
Toggle objects on / off with custom toolbar	Milon	Word VBA	3	07-23-2013 06:21 AM
Macro to toggle outline level	Jennifer Murphy	Word VBA	0	07-08-2013 08:20 AM
Toggle Merge Field Code Help Please	tonywatsonmail	Mail Merge	2	08-11-2011 07:06 AM
Toggle updates	dbugosh	Office	2	12-16-2010 07:54 AM