G
Guest
I composed a macro in Word to use in FrontPage (because couldn't use the
vb-editor to create it directly in FrontPage). I then copied the macro code
into the FrontPage macro. But it does not run in FrontPage. It is a short
marcro simply to open a series of 4 files (see code below). Anyone know how I
can modify this to make it work in FrontPage? Thanks very much for any help.
Here is the macro code (with fake filenames):
Sub Market_City_Changes()
'
' Market_City_Changes Macro
' Market city changes
'
ChangeFileOpenDirectory "C:\Bob\Awebsite\"
Documents.Open FileName:="""index.htm""", _
ConfirmConversions:=False, ReadOnly:=False, AddToRecentFiles:=False, _
PasswordDocument:="", PasswordTemplate:="", Revert:=False, _
WritePasswordDocument:="", WritePasswordTemplate:="", Format:= _
wdOpenFormatAuto
ChangeFileOpenDirectory "C:\Bob\Awebsite\XXTTYY\"
Documents.Open FileName:="""xxyyzz.htm""", _
ConfirmConversions:=False, ReadOnly:=False, AddToRecentFiles:=False, _
PasswordDocument:="", PasswordTemplate:="", Revert:=False, _
WritePasswordDocument:="", WritePasswordTemplate:="", Format:= _
wdOpenFormatAuto
ChangeFileOpenDirectory "C:\Bob\Awebsite\include\"
Documents.Open FileName:="""bbccdd.htm""", ConfirmConversions:=False _
, ReadOnly:=False, AddToRecentFiles:=False, PasswordDocument:="", _
PasswordTemplate:="", Revert:=False, WritePasswordDocument:="", _
WritePasswordTemplate:="", Format:=wdOpenFormatAuto
ChangeFileOpenDirectory "C:\Bob\Awebsite\"
Documents.Open FileName:="""ffggaa.htm""", ConfirmConversions:=False, _
ReadOnly:=False, AddToRecentFiles:=False, PasswordDocument:="", _
PasswordTemplate:="", Revert:=False, WritePasswordDocument:="", _
WritePasswordTemplate:="", Format:=wdOpenFormatAuto
End Sub
vb-editor to create it directly in FrontPage). I then copied the macro code
into the FrontPage macro. But it does not run in FrontPage. It is a short
marcro simply to open a series of 4 files (see code below). Anyone know how I
can modify this to make it work in FrontPage? Thanks very much for any help.
Here is the macro code (with fake filenames):
Sub Market_City_Changes()
'
' Market_City_Changes Macro
' Market city changes
'
ChangeFileOpenDirectory "C:\Bob\Awebsite\"
Documents.Open FileName:="""index.htm""", _
ConfirmConversions:=False, ReadOnly:=False, AddToRecentFiles:=False, _
PasswordDocument:="", PasswordTemplate:="", Revert:=False, _
WritePasswordDocument:="", WritePasswordTemplate:="", Format:= _
wdOpenFormatAuto
ChangeFileOpenDirectory "C:\Bob\Awebsite\XXTTYY\"
Documents.Open FileName:="""xxyyzz.htm""", _
ConfirmConversions:=False, ReadOnly:=False, AddToRecentFiles:=False, _
PasswordDocument:="", PasswordTemplate:="", Revert:=False, _
WritePasswordDocument:="", WritePasswordTemplate:="", Format:= _
wdOpenFormatAuto
ChangeFileOpenDirectory "C:\Bob\Awebsite\include\"
Documents.Open FileName:="""bbccdd.htm""", ConfirmConversions:=False _
, ReadOnly:=False, AddToRecentFiles:=False, PasswordDocument:="", _
PasswordTemplate:="", Revert:=False, WritePasswordDocument:="", _
WritePasswordTemplate:="", Format:=wdOpenFormatAuto
ChangeFileOpenDirectory "C:\Bob\Awebsite\"
Documents.Open FileName:="""ffggaa.htm""", ConfirmConversions:=False, _
ReadOnly:=False, AddToRecentFiles:=False, PasswordDocument:="", _
PasswordTemplate:="", Revert:=False, WritePasswordDocument:="", _
WritePasswordTemplate:="", Format:=wdOpenFormatAuto
End Sub