Home |
Search |
Today's Posts |
#1
|
|||
|
|||
Make Alignment options under format cells available as shortcut
Make alignment options, under Format Cells, available as a shortcut, button,
icon on the toolbar. The options that I am particularly interested in a Text Control, which allows you to uncheck merged cells(Merging cells is an Icon on the format toolbar, but removing the merge is not) The wrap text option is also something I use a lot and would like for it to be easier to get to. Also, I am interested in vertical text alignment, which allows you to put the text at the top of the cell. Any help would be appreciated as I use the functions many times during the day. |
#2
|
|||
|
|||
D,
You can roll your own shortcuts to do stuff like that with macros. Just record a macro as you do the formatting. For your example of turning off Merge Cells, do this: Select a merged cell first. Start the macro recorder with Tools - Macro - Record new macro. To make the macro available when any workbook is open, set "Store macro in" to "Personal macro workbook." You can assign the shortcut key there, or later. Now it's recording. Don't do any selecting or other stuff -- just do the formatting or whatever you want to have the macro do. Stop the macro recorder (Stop button on macro recording toolbar, or Tools - Macro - Stop recording). Now Alt-F11 to the VBE, open the module in Personal.xls, and take out all the stuff you don't want done. That's because the macro records the settings for all the options in the Format - Cells - Alignment dialog, not just the one that was changed. Recording while turning off merge cells produced: Sub MergeOff() ' MergeOff Macro ' Macro recorded 7/14/2005 by Earl With Selection .HorizontalAlignment = xlGeneral .VerticalAlignment = xlBottom .WrapText = False .Orientation = 0 .AddIndent = False .IndentLevel = 0 .ShrinkToFit = False .ReadingOrder = xlContext .MergeCells = False End With End Sub ....which you would reduce to: Sub MergeOff() ' MergeOff Macro ' Macro recorded 7/14/2005 by Earl With Selection . .MergeCells = False End With End Sub Or more succinctly: Sub MergeOff() ' MergeOff Macro ' Macro recorded 7/14/2005 by Earl Selection.MergeCells = False End Sub If you didn't assign the macro to a shortcut key earlier, do it now with Tools - Macro - Macros. Using the Shift key ensures that a standard Excel shortcut doesn't get replaced. -- Earl Kiosterud www.smokeylake.com "dforrest" wrote in message ... Make alignment options, under Format Cells, available as a shortcut, button, icon on the toolbar. The options that I am particularly interested in a Text Control, which allows you to uncheck merged cells(Merging cells is an Icon on the format toolbar, but removing the merge is not) The wrap text option is also something I use a lot and would like for it to be easier to get to. Also, I am interested in vertical text alignment, which allows you to put the text at the top of the cell. Any help would be appreciated as I use the functions many times during the day. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How do I format cells and enter data to be valued for TIME and th. | Excel Worksheet Functions | |||
format cells | Excel Worksheet Functions | |||
Date format of cells | Excel Discussion (Misc queries) | |||
Format Validation Cells | Excel Discussion (Misc queries) | |||
make a conditional format the default | Excel Discussion (Misc queries) |