Application.ColumnBestFit Method (Project)

Sets the width of a column to the width of its widest item.

Syntax

expression .ColumnBestFit(Column)

expression A variable that represents an Application object.

Parameters

Name

Required/Optional

Data Type

Description

Column

Optional

Long

A number that specifies the column to adjust. Columns are numbered from left to right, starting with 1. If Column is omitted, Microsoft Project 2010 adjusts the width of the column that contains the active cell.

Return Value

Boolean

Example

The following example adjusts the widths of the first five columns in the active table.

Sub BestFitFirstFiveCols() 
 
 Dim I As Integer ' Index used in For...Next loop. 
 
 For I = 1 To 5 
 ColumnBestFit Column:=I 
 Next I 
 
End Sub