Validating Dropdown box
I am using Office Pro 97 on an XP box.
I am creating forms in word and am trying to get a dropdown box to check to see if anything is in it before allowing the user to move on the the next box.. I can do this with the following two macros if I am using a text box, but they will not run on a dropdown. I have spent way too much time on this already. Any help greatly appreciated!!!
Sub ErrDD2()
Dim val1 As String
Dim obj As Object
val1 = ActiveDocument.FormFields("Dropdown2").Result
If val1 = " " Then
Application.OnTime When:=Now + TimeValue("00:00:01"), Name:="GoBacktoDD2"
Else
Application.Run MacroName:="DlgBox"
'Application.Run "DlgBox"
End If
End Sub
Sub GoBacktoDD2()
ActiveDocument.Bookmarks("Dropdown2").Range.Fields (1).Result.Select
End Sub
|