How can I save a Word Document as a PDF file with a merged field filename?

macropod · #6 08-27-2015, 11:45 PM

It looks like your code has merged two lines although that may be how you pasted it. Try

Code:

ChangeFileOpenDirectory "\\vcuhshmo\groups\Claims Administration\CCU\PVOH\PVOH Mail Merge Letters\PVOH Mailers - Test\"

With ActiveDocument
  StrName = .Bookmarks("Name").Range.Text
  .SaveAs FileName:=StrName & ".docx"
End With

Given your code has nothing to do with saving a document, you can't really expect anyone to advise on that...

Done properly, there is also no need for ChangeFileOpenDirectory!

Code:

Dim StrFldr as String
StrFldr = "\\vcuhshmo\groups\Claims Administration\CCU\PVOH\PVOH Mail Merge Letters\PVOH Mailers - Test\"

With ActiveDocument
  StrName = .Bookmarks("Name").Range.Text
  .SaveAs FileName:=StrFldr & StrName & ".docx"
End With

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Save merged document as concatenated merge field values	texas791	Word VBA	4	02-25-2014 07:35 PM
Macro to create new word doc and save the file using String found in the document	VBNation	Word VBA	2	02-08-2013 07:14 AM
Auto update Filename field	Oliver Beirne	Word VBA	4	10-19-2012 03:33 AM
Save Filename using Document Text	Knawl	Word	11	10-10-2011 03:00 AM
Word: The document 'Filename' caused a serious error the last time ...	martincruise	Word	0	02-25-2010 01:47 AM