microsoft.public.word.vba.general

Can anyone help me with this?
It is urgent. Thanks

"ah" wrote:

> Ok, please refer to the following:
>
> Macro 1(Allowances Macro):
> ---------
> Sub Allowances() 'fills text field based on content of _dropdown field
>
> Dim oFld As FormFields
> Set oFld = ActiveDocument.FormFields
> Select Case oFld("Country_Name").Result
>
> Case Is = "AUSTRALIA"
> oFld("Allowance1").Result = "Car Allowance (IT14-6T01)"
> oFld("Allowance2").Result = "Notional Salary Percentage (IT14-4T19)"
>
> 'IT185
> oFld("ID1").Result = "185-04 Work Permit"
> oFld("ID2").Result = "185-10 Passport"
> oFld("ID3").Result = "185-45 UID/MIN number- US Benefits ID"
> oFld("ID4").Result = "185-50 USA Social Security Number"
>
>
> Case Else
> 'Do nothing
> End Select
> End Sub
>
> Macro 2: Personnel Area Macro:
> ---------------------------------------
>
> Sub PersonnelAreaMacro()
> PersonnelArea.Show
> End Sub
>
> User Form (Personnel Area):
> -------------
> Private Sub UserForm_Initialize()
> Dim myArray1() As String 'AUSTRALIA
>
> myArray1 = Split("ADE2(AU02-Adelaide) AUC1(NZ01-Auckland)
> BRI2(AU02-Brisbane) CAN2(AU02-Canberra) MEL2(AU02-Melbourne)
> MEL3(AU03-Melbourne) PER2(AU02-Perth) SYD2(AU02-Sydney) SYD3(AU03-Sydney)
> WEL0(NZ01-Welington)")
>
> Me.PersonnelArea.Clear
> Select Case ActiveDocument.FormFields("Country_Name").Result
> Case "AUSTRALIA"
> Me.PersonnelArea.List = myArray1
>
> End Select
> End Sub
>
> Private Sub OK_Click()
> ActiveDocument.FormFields("PersonnelArea").Result = Me.PersonnelArea.Text
> ActiveDocument.Bookmarks("PersonnelArea").Range.Fields(1).Result.Select
> Unload Me
> End Sub
>
> Private Sub Reset_Click()
> ActiveDocument.FormFields("PersonnelArea").Result = " "
> ActiveDocument.Bookmarks("PersonnelArea").Range.Fields(1).Result.Select
> Unload Me
> End Sub
>
> -----------------------------------
> Basically, above are just 2 of the user form and macro that I'm having in
> the form now. The Allowances macro was run as the "entry macro" of the
> Country_Name field. While the Personnel Area Macro was run as the "entry
> macro" when I click on the "Personnel Area" field
>
> I did not get the error when after I save and open the document for several
> times. However, the user is getting the error message and the personnel area
> that they have entered went missing after they get the error message.
>
> "Doug Robbins - Word MVP" wrote:
>
> > You need to show us the code that you are using.
> >
> > --
> > Hope this helps.
> >
> > Please reply to the newsgroup unless you wish to avail yourself of my
> > services on a paid consulting basis.
> >
> > Doug Robbins - Word MVP
> >
> > "ah" wrote in message
> > news:ACA36F37-7D2B-4EF4-A9C8-2707DC0185DC@microsoft.com...
> > > Hi;
> > >
> > > Can anyone help me with the following:
> > >
> > > I've created a form with some built in macro which allow the user to get
> > > different selection list when they select different country. It works well
> > > at
> > > my end. However, when the user fills in and save the form, they will get a
> > > prompted message as follows when they open the form later:
> > >
> > > Error message:
> > > Do you want to merge cahnges in "alice-01Mar 2008.doc" back into
> > > D:\Profiles\Alice\Desktop\New Hires-IDL\Alice-01Mar 2008.doc"?
> > >
> > > There are 3 selections available after the user got the above prompted
> > > message (Yes, No or No and don't ask again)
> > >
> > > Some of the data that they have filled and saved previously will be
> > > missing
> > > after they get the above message.
> > >
> > > Appreciate if someone could help on this urgently.
> > > Thanks in advance.
> >
> >
> >