Word 2003 Forms (JUMP TO Fields)

[Martin D]

I am creating a word 2003 form and was wondering if it is possible to skip
fields depending on the selection in a drop down menu.

ie. QUESTION: Is there a requirement for a COSHH Assessment ? DROP DOWN
ANSWER-----Yes/NO
If yes just go to the next field box if NO then Jump this section to another
section/Field further down the form?

Any takers?

 

[Jay Freedman]

It is possible, but only with a macro.

The basic idea of changing which form field is "next" is discussed at
http://www.word.mvps.org/FAQs/TblsFldsFms/SetTabOrder.htm. The macros
in that article can be modified to do what you want. For example, if
you write an exit macro for the dropdown field, it can change the form
field to which the cursor will jump. It can also change the Enabled
properties of the fields so the user can't use the mose to fill the
wrong ones.

As a simple example, let's say the dropdown is named ddCOSHH, and
there are four text form fields named Text1 through Text4, where "Yes"
in the dropdown means that Text1 and Text2 should be filled, otherwise
Text3 and Text4. Then this macro will do the job:

Sub ExitDropdown()
Dim rslt As String
With ActiveDocument
rslt = .FormFields("ddCOSHH").Result
If InStr(UCase(rslt), "YES") Then
.FormFields("Text1").Enabled = True
.FormFields("Text2").Enabled = True
.FormFields("Text3").Enabled = False
.FormFields("Text4").Enabled = False
.FormFields("Text1").Range.Fields(1).Result.Select
Else
.FormFields("Text1").Enabled = False
.FormFields("Text2").Enabled = False
.FormFields("Text3").Enabled = True
.FormFields("Text4").Enabled = True
.FormFields("Text3").Range.Fields(1).Result.Select
End If
End With
End Sub

--
Regards,
Jay Freedman
Microsoft Word MVP
Email cannot be acknowledged; please post all follow-ups to the
newsgroup so all may benefit.

 

[Martin D]

MANY THANKS jAY FOR YOUR HELP