Default Save AS File Name from Bookmark

macropod · #2 07-17-2011, 12:23 AM

Hi xscotsmanx,

Try something based on:

Code:

Sub Demo()
With ActiveDocument
  .SaveAs FileName:=.Bookmarks("BookmarkName").Range.Text & ".docx", FileFormat:=wdFormatXMLDocument, AddToRecentFiles:=False 
End With
End Sub

This automatically saves the file with the Bookmark Name, without going through the dialogue. To use the SaveAs dialogue, you could use something based on:

Code:

Sub Demo()
With Application.Dialogs(wdDialogFileSaveAs)
  .Name = ActiveDocument.Bookmarks("BookmarkName").Range.Text
  .Show
End With
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
error: You are attempting to save a file format that is blocked by file block setting	zatlas1	Office	8	04-28-2012 02:37 PM
[Word 2007] How to hyperlink directly another word file chapter/paragraph/bookmark?	LeeFX	Word	4	05-05-2011 05:53 PM
Does not SAVE AS to default folder	pleveque	Office	0	01-13-2011 08:34 AM
Word Macro: Save file as text with current file name	jabberwocky12	Word VBA	2	10-22-2010 12:23 PM
How to save file on CD?	DennisWG	Word	0	09-07-2010 10:41 AM