Excel toolbar buttons

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

Guest

How do you add subscript and superscript toolbar buttons in Excel? They are
not available in the Customize>Format menu as they are in Word.
 
I just recorded the macro below. You could shorten to

sub subscript()
selection.Superscript = True
end macro
and assign to a custom button on your toolbar
==
Sub Macro1()
'
' Macro1 Macro
' Macro recorded 10/2/2004 by Don Guillett
'

'
With Selection.Font
.Name = "Arial"
.FontStyle = "Regular"
.Size = 10
.Strikethrough = False
.Superscript = True
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With
Range("C5").Select
With Selection.Font
.Name = "Arial"
.FontStyle = "Regular"
.Size = 10
.Strikethrough = False
.Superscript = False
.Subscript = True
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With
End Sub
 
Back
Top