In Favourite Free Excel Add-Ins, one of the commenters (and Debra) complains about the Center Across Selection being buried in the Format Cells dialog.
It is possible to make this a one step process, using VBA.
Unfortunately this approach does require macros in your workbook, but if you are already storing your oft-used macros in PERSONAL.XLS, then this should not be a problem.
Sub CAS() If TypeName(Selection) <> "Range" Then Exit Sub Selection.HorizontalAlignment = xlCenterAcrossSelection End Sub
Just assign this to a toolbar button and put it next to the Merge And Center button, just to taunt it. Or remove the Merge And Center button altogether and put this one in its place.
Stay tuned, the next post will have more about toolbar buttons.
About JP
4 Comments:
"Or remove the Merge And Center button altogether and put this one in its place."
Yep. I wrote a similar macro, assigned it to a button, and replaced the M&C button with it. I did this back in Excel 97. I think Excel 95 was the first version that allowed merged cells, but prior to that there was only center across selection.
I like how you can just hold the Alt button and click-drag buttons off the toolbar. When I see some horrid worksheet and find merged cells, it's the first thing I think of.
I've got a variation of your code, that I use to fix up workbooks other people have formatted:
With Selection
.UnMerge
.HorizontalAlignment = xlCenterAcrossSelection
End With
Nice. I forgot about UnMerge.