fireman112473
New Member
- Joined
- May 9, 2017
- Messages
- 8
I am trying to create a macro that will allow me to open a word file and immediately save it as a new file in a specific file directory. Below is how far I have gotten. I can save to a specific file directory with a predetermined name, but can't get it to allow for user input for new file name.
Sub IL09NFPA722010()
Documents.Open FileName:="S:\Data\FORMS\Master Plan Review Letters\2009 IBC and MBC Forms\Illinois\IL Alarm PR Letter IBC 2009 NFPA 2010.docx", ReadOnly:=True
ActiveDocument.SaveAs FileName:="S:\Employee Folders\Scott McBride\0 2017 Plan Review Letters" & "doc1", Fileformat:=wdFormatXMLDocument
End Sub
I want a user input for the area shown in bold.
Thanks
Scott
Sub IL09NFPA722010()
Documents.Open FileName:="S:\Data\FORMS\Master Plan Review Letters\2009 IBC and MBC Forms\Illinois\IL Alarm PR Letter IBC 2009 NFPA 2010.docx", ReadOnly:=True
ActiveDocument.SaveAs FileName:="S:\Employee Folders\Scott McBride\0 2017 Plan Review Letters" & "doc1", Fileformat:=wdFormatXMLDocument
End Sub
I want a user input for the area shown in bold.
Thanks
Scott