Is there a way to print a list of symbol shortcuts

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

My very curious son thinks it's cool to insert symbols and would like a
listing of symbols rather than going through the drop down menus is there any
way to generate such a list?
 
If you run a macro containing the following code it will show you the
Alt+numeric keypad sequence that can be used to insert each symbol

' Macro created 12-08-98 by Doug Robbins to list symbols that can be
inserted via Alt+keypad

'

ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=1,
NumColumns:=3

Selection.TypeText Text:="Alt + Numeric Keypad"

Selection.MoveRight Unit:=wdCell

Selection.TypeText Text:="Normal Font"

Selection.MoveRight Unit:=wdCell

Selection.TypeText Text:="Symbol Font"

Selection.MoveRight Unit:=wdCell

Symbol = 33

While Symbol < 256

Selection.TypeText Text:="0" & LTrim$(Str$(Symbol))

Selection.MoveRight Unit:=wdCell

With Selection

.InsertSymbol CharacterNumber:=Symbol, Font:="Normal",
Unicode:=False

End With

Selection.MoveRight Unit:=wdCell

With Selection

.InsertSymbol CharacterNumber:=Symbol, Font:="Symbol",
Unicode:=False

End With

Symbol = Symbol + 1

Selection.MoveRight Unit:=wdCell

Wend


--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP
 

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

Back
Top