Excel VBA to make/format Word Table

**HalPlz** · 03-25-2014, 01:35 PM

Hello everyone, I can't for the life of me figure out the proper syntax for editing the format of a Word table using an excel VBA macro.

I currently have a working macro that creates a table in word and properly populates the correct values, with borders, and shading. But I don't know how to change the spacing so that the text in each cell of the table is vertically centered. I tried using the 'record macro' in word and using that formatting code in the excel macro, but it says something doesn't exist.

This is my current formatting in excel for the word table. It's excel and Word 2007. What also works is changing the line spacing 'before' to 3 pt.

oTable.Rows(1).Range.Font.Bold = True
oTable.Rows(1).Range.Font.Italic = True
oTable.Rows(1).Range.Shading.BackgroundPatternColor = -603923969
oTable.Cell(1, 1).Range.Text = "Existing Fund"
oTable.Cell(1, 2).Range.Text = "Replacement Fund"
oTable.Borders.Enable = True

Thanks in advance

**macropod** · 03-25-2014, 05:37 PM

Try:

Please Login or Register  to view this content.

Note: If the row height isn't set and/or the paragraph format has different before/after spacing, the effect of the vertical centring may not be apparent.