how can i change the letters to gotic letters

G

Greg Maxey

Sub ScratchMacro()
If MsgBox("Do you mean change the document font with VBA?", vbYesNo,
"Question") = vbYes Then
ActiveDocument.Range.Font.Name = "Franklin Gothic Book"
Else
MsgBox "Try providing enough detail in the question to obtain a meaningful
answer" _
& " or posting in an appropriate group."
End If
End Sub
 
G

Gordon Bentley-Mix

Nice... <g>
--
Cheers!

Gordon Bentley-Mix
Word MVP

Please post all follow-ups to the newsgroup.

Read the original version of this post in the Office Discussion Groups - no
membership required!
 

Ask a Question

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.

Ask a Question

Top