Substituted fonts notification

C

catspec2000

Hi all

Does anyone know I could write an AutoOpen macro that would display
message if there are missing fonts in a Word document?

I can have the FontSubstitution window display automatically when
open a document, but I'd like Word to do this only if there are missin
fonts.

Anyone any ideas?
Many thanks
L
 
K

Klaus Linke

Does anyone know I could write an AutoOpen macro that would display a
message if there are missing fonts in a Word document?

I can have the FontSubstitution window display automatically when I
open a document, but I'd like Word to do this only if there are missing
fonts.
Click to expand...


Hi L.,

You could try something like

With Dialogs(wdDialogFontSubstitution)
If (.UnavailableFont <> "") Then
.Show
End If
End With

Greetings,
Klaus
 
Top