View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Gord Dibben
 
Posts: n/a
Default Icon for "Wrap" and for "Centre Across Selection"

Neither of these are in the list AFAIK

Macros it is...........

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

Sub Wrap_Text()
With Selection
.WrapText = Not .WrapText
End With
End Sub


Gord Dibben Excel MVP

On Wed, 16 Nov 2005 09:30:28 +0100, "Ron de Bruin"
wrote:

Hi BeSmart

ToolsCustomizeCommands

You can drag the command to any toolbar if it is in the list ?
If not you must create your own macro to do it.