"Center Across Selection" icon in excel 2003

G

Guest

I miss the old icon and am not a fan of merged cells. any suggestions for
creating an icon for "center across selection" icon that does not merge cells?
 
G

Gord Dibben

There is no Icon for "center across selection".

Sub TOGGLECENTERACROSS()
With Selection
If .HorizontalAlignment = xlCenterAcrossSelection Then
.HorizontalAlignment = xlGeneral
Else
Selection.HorizontalAlignment = xlCenterAcrossSelection
End If
End With
End Sub

Assign this macro to a button.


Gord Dibben Excel MVP

On Wed, 30 Nov 2005 06:06:01 -0800, no merge dan <no merge
 

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