Question : Word Save As - Default to Template info?

I have a user who creates many new Word docs a day using a template with set header/footer. When he goes to Save or Save As... Word defaults to using the first line in the body as the document name. Is there a way to make Word use the first line of the header as the default Save name?

Answer : Word Save As - Default to Template info?

You could have the macro make the Name and the Title Property the same. The attached code snipit wil prompt for a file name when the Save Icon is clicked. It will then name the document and update the Document Title Property.

                       
             Sub FileSave()
Dim strName As String
strName = InputBox("Type the Document Name", "Document Name")
ActiveDocument.SaveAs FileName:=strName
ActiveDocument.BuiltInDocumentProperties(wdPropertyTitle) = strName
 
End Sub

Open in New Window Select All