|
Visual Basic (VB and VBA) |
|
Copyright 1999-2001 Christopher Greaves. All rights reserved. Home Page and email to [email protected] |
| If in doubt, record a macro and inspect the entrails! |
Please read the DISCLAIMER.
Here is an INDEX to all the procedures.
You will probably need one copy of my GLOBAL DECLARATIONS.
Public Function FormatTable(rngTbl As Range)
' Procedure: FormatTable
' Description: AutoFormat a table with a colourful style.
' Copyright: Chris Greaves Inc.
' Inputs: RANGE of at least a part of the table.
' Returns: None.
' Assumes: None.
' Side Effects: Page formatting may change.
' Tested: By the calls shown below.
rngTbl.Tables(1).AutoFormat Format:=wdTableFormatColorful2, ApplyBorders:=True, ApplyShading:=True, ApplyFont:=True, ApplyColor:=True, ApplyHeadingRows:=True, ApplyLastRow:=False, ApplyFirstColumn:=True, ApplyLastColumn:=False, AutoFit:=True
'Sub TESTFormatTable()
'Call FormatTable(Selection.Tables(1).Range)
'End Sub
End Function
| We all knew nothing when we started … |
|
Home Page and Contact Information Send email to [email protected]. This page was last updated Thursday, November 15, 2001 |