Thread: Help with Drop Down Box - Expand or Collapase
View Single Post
 
Old 04-02-2015, 08:12 AM
Loss1003 Loss1003 is offline Windows Vista Office 2013
Novice
  
Join Date: Apr 2015
Posts: 3
Loss1003 is on a distinguished road
Default Help with Drop Down Box - Expand or Collapase
The following code is not working as I'm trying to Expand or Collapse with Drop Down Box in Word 2010

Code:
Sub Dropdown4()
If FormFields("Dropdown4").DropDown.Value = "Observed" Then
ActiveDocument.Bookmarks("RiskTData").Range.Font.Hidden = False
End If
 
If FormFields("Dropdown4").DropDown.Value = "Not Applicable" Then
ActiveDocument.Bookmarks("RiskTData").Range.Font.Hidden = True
End If 
 
If FormFields("Dropdown4").DropDown.Value = "Not Observed" Then
ActiveDocument.Bookmarks("RiskTData").Range.Font.Hidden = True
End If
End Sub
Please assist with any errors per the above code. Thank you.
Reply With Quote