Cindy
Mon Feb 20 04:14:28 CST 2006
Hi David,
> On my laptop (don't have it home), in Microsoft Word, I create a Macro,
> in bold for the date as I need to dictate patient progress notes and
> using the macro makes it easier. So each day I record a new Macro, in
> bold, for the date. The problem is, unless I change (under macro edit)
> Selection Font.Bold=True (and I need to do that manually), every other
> time I press the macro keys it comes out plain type and not bold! I
> hope this makes sense!
>
So, you're requirement is a macro that inserts the current day's date and
formats it bold? Does this work for you?
Sub InsertTheDate()
Dim rng as Word.Range
Set rng = Selection.Range
rng.Text = Format(Date, "mmmm d, yyyy")
rng.Bold = True
End Sub
Cindy Meister
INTER-Solutions, Switzerland
http://homepage.swissonline.ch/cindymeister (last update Jun 8 2004)
http://www.word.mvps.org
This reply is posted in the Newsgroup; please post any follow question or
reply in the newsgroup and not by e-mail :-)