Sub CheckIt()
ActiveDocument.AttachedTemplate.AutoTextEntries("Checked Box").Insert _
Where:=Selection.Range
With Selection
.TypeText " "
.InsertDateTime _
DateTimeFormat:="MMMM d, yyyy", _
InsertAsField:=False
End With
End Sub
Make sure that when you save the autotext entries that you don't include the
paragraph mark. The macro will check the box and type the date in the format
MMM d, yyyy (you can change that format if you wish).
Want to reply to this thread or ask your own question?
You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.