Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.word.tables
|
|||
|
|||
trouble with setting paragraph spacing to a table
Hi,
I was trying to set the paragraph spacing before and after to 3 pt to a table with 3 rows and 3 columns but with no success. Here is the code Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=myRow, NumColumns:= _ myCol, DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _ wdAutoFitFixed With Selection.Tables(1) If .Style "Table Grid" Then .Style = "Table Grid" End If .ApplyStyleHeadingRows = True .ApplyStyleLastRow = True .ApplyStyleFirstColumn = True .ApplyStyleLastColumn = True .Rows.Alignment = wdAlignRowCenter With Selection.ParagraphFormat .LeftIndent = CentimetersToPoints(0) .RightIndent = CentimetersToPoints(0) .SpaceBefore = 3 .SpaceBeforeAuto = False .SpaceAfter = 3 .SpaceAfterAuto = False .LineSpacingRule = wdLineSpaceSingle .Alignment = wdAlignParagraphCenter .WidowControl = True .KeepWithNext = False .KeepTogether = False .PageBreakBefore = False .NoLineNumber = False .Hyphenation = True .FirstLineIndent = CentimetersToPoints(0) .OutlineLevel = wdOutlineLevelBodyText .CharacterUnitLeftIndent = 0 .CharacterUnitRightIndent = 0 .CharacterUnitFirstLineIndent = 0 .LineUnitBefore = 0 .LineUnitAfter = 0 End With What this code does is it only set the spacing to the first cell of the table instead of applying it to the rest of the table. Not sure if it needs some kind of loop to set all the cells with the same spacing paragraph. Your help would be greatly appreciated. Thank you in advance |
#2
Posted to microsoft.public.word.tables
|
|||
|
|||
trouble with setting paragraph spacing to a table
Hi agian,
It's fixed. Thanks for your time. "Associates" wrote: Hi, I was trying to set the paragraph spacing before and after to 3 pt to a table with 3 rows and 3 columns but with no success. Here is the code Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=myRow, NumColumns:= _ myCol, DefaultTableBehavior:=wdWord9TableBehavior, AutoFitBehavior:= _ wdAutoFitFixed With Selection.Tables(1) If .Style "Table Grid" Then .Style = "Table Grid" End If .ApplyStyleHeadingRows = True .ApplyStyleLastRow = True .ApplyStyleFirstColumn = True .ApplyStyleLastColumn = True .Rows.Alignment = wdAlignRowCenter With Selection.ParagraphFormat .LeftIndent = CentimetersToPoints(0) .RightIndent = CentimetersToPoints(0) .SpaceBefore = 3 .SpaceBeforeAuto = False .SpaceAfter = 3 .SpaceAfterAuto = False .LineSpacingRule = wdLineSpaceSingle .Alignment = wdAlignParagraphCenter .WidowControl = True .KeepWithNext = False .KeepTogether = False .PageBreakBefore = False .NoLineNumber = False .Hyphenation = True .FirstLineIndent = CentimetersToPoints(0) .OutlineLevel = wdOutlineLevelBodyText .CharacterUnitLeftIndent = 0 .CharacterUnitRightIndent = 0 .CharacterUnitFirstLineIndent = 0 .LineUnitBefore = 0 .LineUnitAfter = 0 End With What this code does is it only set the spacing to the first cell of the table instead of applying it to the rest of the table. Not sure if it needs some kind of loop to set all the cells with the same spacing paragraph. Your help would be greatly appreciated. Thank you in advance |
Reply |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Having trouble setting the font for a default table style | Tables | |||
paragraph spacing in a STYLE applies within the paragraph | Microsoft Word Help | |||
trouble with setting margins | Tables | |||
Im having trouble setting the =sum | Microsoft Word Help | |||
WordPad paragraph spacing - Setting to zero | Microsoft Word Help |