![]() |
|
#2
|
||||
|
||||
|
Perhaps this is what you're after:
Code:
Sub GetSymbolAttributes()
Dim SelFont, SelCharNum
With Selection
With Dialogs(wdDialogInsertSymbol)
SelFont = .Font
SelCharNum = .CharNum
End With
End With
MsgBox SelFont & vbTab & SelCharNum
End Sub
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
Save Word doc in unicode html (utf-8)
|
rybrns | Word | 5 | 09-26-2011 02:18 PM |
| ANSI-ost to unicode-ost | jeff13 | Outlook | 0 | 01-07-2010 11:48 AM |
| Unicode Big endian support | Rose44 | Excel | 0 | 09-04-2009 11:59 PM |
Unicode Encoding Type
|
Rose44 | Excel | 2 | 08-09-2009 09:05 PM |
| Unicode problem in Subject list | salanalani | Outlook | 0 | 01-20-2006 12:48 PM |