Help!

See all fonts installed on the PC?

 
Post new topic   General Reply to Topic (not reply to a specific post)    Forums Home -> Printing Fonts RSS
Next:  Terminal font is not installed??? I'm USING it!  
Author Message
Noozer
External


Since: Dec 29, 2005
Posts: 9



PostPosted: Tue Jun 05, 2007 5:38 pm    Post subject: See all fonts installed on the PC?
Archived from groups: microsoft>public>office>misc, others (more info?)

Is there a macro/etc. that I can use to preview all the fonts currently
installed on my PC?

Basically, I want "ABCDEF ghijklm 12345 !@#$%" at 14 point, on it's own
line, for each font installed on my computer.

Thx!
Back to top
Another Brian
External


Since: Apr 19, 2007
Posts: 5



PostPosted: Tue Jun 05, 2007 5:38 pm    Post subject: Re: See all fonts installed on the PC? [Login to view extended thread Info.]
Archived from groups: per prev. post (more info?)

There are lots of freeware and shareware font viewers out there.
Search Google. I use AMP Font Viewer,
http://www.ampsoft.net/utilities/FontViewer.php. It does just fine for
me.

Brian Bygland

"Noozer" wrote in message

> Is there a macro/etc. that I can use to preview all the fonts
> currently installed on my PC?
>
> Basically, I want "ABCDEF ghijklm 12345 !@#$%" at 14 point, on it's
> own line, for each font installed on my computer.
>
> Thx!
>
Back to top
Noozer
External


Since: Dec 29, 2005
Posts: 9



PostPosted: Tue Jun 05, 2007 6:15 pm    Post subject: Re: See all fonts installed on the PC? [Login to view extended thread Info.]
Archived from groups: per prev. post (more info?)

"Noozer" wrote in message

> Is there a macro/etc. that I can use to preview all the fonts currently
> installed on my PC?
>
> Basically, I want "ABCDEF ghijklm 12345 !@#$%" at 14 point, on it's own
> line, for each font installed on my computer.

Once I put the right stuff into Google I found lots of examples... Here's
the macro that I'm using:

Sub ListFonts()
'
' ListFonts Macro

Dim varFont As Variant

' Speeds macro processing and suppresses display.
Application.ScreenUpdating = False

' Create new document.
Documents.Add Template:="normal"

' Loop through each available font.
For Each varFont In FontNames
With Selection
' Format for name of font.
.Font.Size = 11
.ParagraphFormat.LineUnitAfter = 0.5
.Font.Name = "Arial Narrow"
.Font.Bold = True
.Font.Underline = True
' Insert Font name.
.TypeText varFont

'Format for the font example.
.Font.Bold = False
.Font.Underline = False
.TypeText ": "

.Font.Name = varFont

' Enter example text(Alphabetic characters.)
.TypeText "ABCDE fghij 12345 !@#$% "

' Insert a new paragraph.
.InsertParagraphAfter
' Move to the new paragraph.
.MoveDown unit:=wdParagraph, Count:=1, Extend:=wdMove

End With

Next varFont
Application.ScreenUpdating = True

End Sub
Back to top
Suzanne S. Barnhill
External


Since: Sep 26, 2003
Posts: 24483



PostPosted: Tue Jun 05, 2007 7:16 pm    Post subject: Re: See all fonts installed on the PC? [Login to view extended thread Info.]
Archived from groups: per prev. post (more info?)

See http://word.mvps.org/FAQs/Formatting/FontSampleGenerator.htm

--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA
Word MVP FAQ site: http://word.mvps.org
Email cannot be acknowledged; please post all follow-ups to the newsgroup so
all may benefit.

"Noozer" wrote in message

> Is there a macro/etc. that I can use to preview all the fonts currently
> installed on my PC?
>
> Basically, I want "ABCDEF ghijklm 12345 !@#$%" at 14 point, on it's own
> line, for each font installed on my computer.
>
> Thx!
>
>
Back to top
peter
External


Since: Aug 26, 2003
Posts: 11



PostPosted: Fri Jun 08, 2007 12:22 pm    Post subject: Re: See all fonts installed on the PC? [Login to view extended thread Info.]
Archived from groups: per prev. post (more info?)

"Noozer" wrote in message

> Is there a macro/etc. that I can use to preview all the fonts currently
> installed on my PC?
>
> Basically, I want "ABCDEF ghijklm 12345 !@#$%" at 14 point, on it's own
> line, for each font installed on my computer.
>
> Thx!

http://www.download.com/The-Font-Thing/3000-2316_4-1519711.html
Back to top
Character
External


Since: Sep 26, 2006
Posts: 35



PostPosted: Fri Jun 08, 2007 7:51 pm    Post subject: Re: See all fonts installed on the PC? [Login to view extended thread Info.]
Archived from groups: microsoft>public>word>printingfonts (more info?)

peter wrote:
> "Noozer" wrote in message
>
>
>>Is there a macro/etc. that I can use to preview all the fonts currently
>>installed on my PC?
>>
>>Basically, I want "ABCDEF ghijklm 12345 !@#$%" at 14 point, on it's own
>>line, for each font installed on my computer.
>>
>>Thx!
>
>
> http://www.download.com/The-Font-Thing/3000-2316_4-1519711.html
>


The-Font-Thing will NOT do this. It only works with Truetype fonts,
neither OpenType nor Type 1 are supported. Further, it is a version
"0.8" that hasn't been upgraded, modified, or corrected in over eight
years. Sue did a fine job, but abandoned it half-done. What it does,
it does very well.

There are dozens of up-to-date and fully functional font
viewer/managers, including freeware, shareware, and fully commercial
products.

There's Printers Apprentice, X-Fonter, FontSuit, Typograf (getting a
little long in the tooth itself), and many more.

- Character
Back to top
Display posts from previous:   
Post new topic   General Reply to Topic (not reply to a specific post)    Forums Home -> Printing Fonts All times are: Eastern Time (US & Canada)
Page 1 of 1

 
You can post new topics in this forum
You can reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum