Home |
Search |
Today's Posts |
#1
|
|||
|
|||
Vertical Alignment
Hi All
I have a table that consists of 12- Columns and 65- Rows it is an Excel sheet that I Copy and Paste Special as Formatted Text (RTF) in to Word -- is there a macro about that on clicking a new added button to the Toolbar -- that would automatically Vertically Align (Centre) all the Text and Numbers in their respective cells. Any help much appreciated Cheers ---- Mully |
#2
|
|||
|
|||
On Mon, 26 Sep 2005 07:56:07 -0700, "mully"
wrote: Hi All I have a table that consists of 12- Columns and 65- Rows it is an Excel sheet that I Copy and Paste Special as Formatted Text (RTF) in to Word -- is there a macro about that on clicking a new added button to the Toolbar -- that would automatically Vertically Align (Centre) all the Text and Numbers in their respective cells. Any help much appreciated Cheers ---- Mully You don't really need a macro. You can just select the whole table, go to Table Table Properties Cell, and click the Center button under "Vertical Alignment". If you really, really want a macro on a one-click button, use this: Sub TableVertCenter() If Selection.Information(wdWithInTable) Then Selection.Tables(1).Range.Cells.VerticalAlignment _ = wdCellAlignVerticalCenter End If End Sub -- Regards, Jay Freedman Microsoft Word MVP FAQ: http://word.mvps.org |
#3
|
|||
|
|||
And if, like me, you've added "Vertical alignment" to every table-related
shortcut menu, you can do it with a right-click. g -- Suzanne S. Barnhill Microsoft MVP (Word) Words into Type Fairhope, Alabama USA Word MVP FAQ site: http://word.mvps.org Email cannot be acknowledged; please post all follow-ups to the newsgroup so all may benefit. "Jay Freedman" wrote in message ... On Mon, 26 Sep 2005 07:56:07 -0700, "mully" wrote: Hi All I have a table that consists of 12- Columns and 65- Rows it is an Excel sheet that I Copy and Paste Special as Formatted Text (RTF) in to Word -- is there a macro about that on clicking a new added button to the Toolbar -- that would automatically Vertically Align (Centre) all the Text and Numbers in their respective cells. Any help much appreciated Cheers ---- Mully You don't really need a macro. You can just select the whole table, go to Table Table Properties Cell, and click the Center button under "Vertical Alignment". If you really, really want a macro on a one-click button, use this: Sub TableVertCenter() If Selection.Information(wdWithInTable) Then Selection.Tables(1).Range.Cells.VerticalAlignment _ = wdCellAlignVerticalCenter End If End Sub -- Regards, Jay Freedman Microsoft Word MVP FAQ: http://word.mvps.org |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
vertical alignment cell | Tables | |||
Word 2003 vertical alignment of text to a fixed spot on the page? | Page Layout | |||
Vertical alignment of addresses | Mailmerge | |||
vertical text alignment in a table | Tables | |||
Can I change the vertical alignment of text in a text box? | Page Layout |