Visual Basic (VB6 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!

 

Visual Basic Library

This page was last updated on Saturday, November 24, 2001
Public Function BestFit(rngTbl As Range)
' Procedure :   BestFit
' Description:  Apply BestFit to the specified range.
' By:           Chris Greaves Inc.
' Inputs:       RANGE
' Returns:      None
' Assumes:      None.
' Side Effects: The named document contents (specifically the layout) may change.
' Tested:       By the calls below.
    rngTbl.Tables(1).AutoFormat AutoFit:=True
'Sub TESTBestFit()
'Documents.Add
'ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=8, NumColumns:=8
'Call BestFit(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 Monday, November 19, 2001

 

 

Hosted by www.Geocities.ws

1