Save Filename based on Text Field

		Microsoft Office Forums > Microsoft Word > Word VBA
Save Filename based on Text Field

FAQ

Thread Tools

Display Modes

10-19-2014, 12:53 AM

gmayor

Windows 7 64bit Save Filename based on Text Field

Office 2010 32bit

Expert

Join Date: Aug 2014

Posts: 4,144

The message says Compile Error - expected Function or Variable and highlights SaveAs2.

SaveAs2 incidentally is not available in Word 2007, but the OP says 2013 and in that version the following change doesn't produce the error.

Code:

With ActiveDocument
        strfname = "C:\Users\" & Environ("Username") & "\Documents\" & .SelectContentControlsByTitle("Title")(1).Range.Text & ".PDF"
        .SaveAs2 Filename:=strfname, FileFormat:=wdFormatPDF
End With

__________________
Graham Mayor - MS MVP (Word) (2002-2019)
Visit my web site for more programming tips and ready made processes www.gmayor.com

« Previous Thread | Next Thread »

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
How can I save a Word Document as a PDF file with a merged field filename?	kp2009	Word VBA	5	08-27-2015 11:45 PM
Auto update Filename field	Oliver Beirne	Word VBA	4	10-19-2012 03:33 AM
Macro to populate a text form field based on dropdown selection	koloa	Word	0	10-20-2011 11:52 AM
Save Filename using Document Text	Knawl	Word	11	10-10-2011 03:00 AM
Selecting merge field based on whether or not text is present	amym	Mail Merge	1	12-07-2010 05:14 AM

Other Forums: Access Forums

All times are GMT -7. The time now is 05:54 AM.