G
Greg
RAISA,
You should be able to do this with FIELDS and existing
document properties.
Your template needs to contain a { CREATEDATE } field and
a { AUTHOR } field. You can designate the author with
File>Properties>Summary>Author. This is by default the
value set in Tools>Options>User Information Name. Update
the fields with CTRL+a and F9.
If you want a macro, this should work:
Sub AutoNew()
Dim Author As String
Author = InputBox("Enter document author", "Author", "Me")
ActiveDocument.BuiltInDocumentProperties("Author").Value _
= Author
ActiveDocument.Fields.Update
End Sub
You should be able to do this with FIELDS and existing
document properties.
Your template needs to contain a { CREATEDATE } field and
a { AUTHOR } field. You can designate the author with
File>Properties>Summary>Author. This is by default the
value set in Tools>Options>User Information Name. Update
the fields with CTRL+a and F9.
If you want a macro, this should work:
Sub AutoNew()
Dim Author As String
Author = InputBox("Enter document author", "Author", "Me")
ActiveDocument.BuiltInDocumentProperties("Author").Value _
= Author
ActiveDocument.Fields.Update
End Sub