Excel toolbar buttons

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.
 
D

Don Guillett

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
 

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

Top