Results 1 to 5 of 5
  1. #1
    3 Star Lounger
    Join Date
    Mar 2003
    Location
    Elkins Park, Pennsylvania, USA
    Posts
    325
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Font Substitution (Word XP)

    Hi all, and thanks in advance for your help.
    In our work environment, we get Word documents from many sources. Inevitably, those sources use some off font in their document that we don't have. To compound the issue, those fonts are often used in embedded objects (symbols, equations, etc.) where they can't be found by a simple Edit: Find method, and THAT would only be possible if you knew what font you were looking for. Consequently, the resulting PDF file (which is the ultimate output) doesn't look like the Word file.
    Anyway, I would like to leverage the feature of Word that lists potential font substitutions, which I found under Tools: Options and then by clicking on the Font Substitutions button on the Compatibility tab. For example, I have a document that was created in Word 97 using the Greek Symbols font and which has a character embedded as the "tau" symbol. While I can't determine exactly where the symbol occurs, I could at least be forwarned that there is a potential issue. The problem is that I have no idea how to get to the list of font substitutions using VBA. The only reference to it that i can find is the method that lets me tell Word what to substitute; again, that's only good if I have a finite list of known fonts.
    So, does anyone have any idea how I can access a potential list of font issues in this way, or even another way of checking for such issues? I am attaching a (heavily edited) version of the file that demonstrates the problem. (The font in question is used on the last line of text and displays as the "therefore" symbol in front of the subscripted "inf".)
    Attached Files Attached Files
    <font face="Comic Sans MS">That's what you do in a herd; you look out for each other!</font face=comic> - Mike

  2. #2
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts

    Re: Font Substitution (Word XP)

    I've looked in the MS Newsgroups and found some posts by Word MVP stating that there is no VBA access to the list of font substitutions for a specific document. <!profile=Klaus Linke>Klaus Linke<!/profile> posted a macro that shows the font substitution dialog when opening a document: here.

  3. #3
    New Lounger
    Join Date
    Dec 2003
    Location
    W. Lebanon, New Hampshire, USA
    Posts
    1
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Font Substitution (Word XP)

    Do you know if there is any way to display WHERE the font substitutions have occurred? (We've got thousands of documents with mathematical and other scientific notations that "began life" as WordPerfect symbol fonts, now long gone. Word tells us (via VB script of Tools | Options | Compatibility | Font substitutions) that it has made changes, but we're unable to identify where so that the accuracy can be verified. (VERY unlikely that Word guessed the right value).

  4. #4
    5 Star Lounger
    Join Date
    May 2001
    Location
    Stuttgart, Baden-W, Germany
    Posts
    931
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Font Substitution (Word XP)

    Might be easiest to download the WordPerfect symbol fonts from Corel, if they are the main problem:

    Files "wpfonts.exe", "wpfonts_readme.txt" in
    <A target="_blank" HREF=ftp://ftp.corel.com/pub/WordPerfect/wpwin/9/>ftp://ftp.corel.com/pub/WordPerfect/wpwin/9/</A>

    As you say: If the font is used in the Word document itself, you can track it down with "Edit > Find".

    But there probably isn't a general way to track down embedded objects in Word that use a certain font.
    For embedded graphs, you might be able to build something using the VBAGR10.CHM help file.
    For Equation editor objects, maybe you can find some help on http://www.mathtype.com.

    Good luck!
    <img src=/S/cheers.gif border=0 alt=cheers width=30 height=16> Klaus

  5. #5
    3 Star Lounger
    Join Date
    Mar 2003
    Location
    Elkins Park, Pennsylvania, USA
    Posts
    325
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Font Substitution (Word XP)

    One thing that I've found that might help is that you can use the Edit Find feature to search for the name of the unavailable font even if Word has substituted another font for it (unless, of course, it's in an embedded object, like an equation or a graph.)
    So, for example, I've written code that creates a list of "non-standard" fonts (used only in the main stories, mind you); the users in my area have been trained, then, to do a search for any fonts that show up in this list, although one has to type the exact name of the font in the "Find What" box (i.e., since it's not on the system, you can't pick it from the drop-down list.)
    But that's easy as long as we're only talking about the main stories in the document. Now, if I can only access the list of unavailable fonts Word displays in the "Font Substitutions" dialog box of the Compatibility option...
    <font face="Comic Sans MS">That's what you do in a herd; you look out for each other!</font face=comic> - Mike

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •