通过

Application.ColumnBestFit Method

  • 项目
Project Developer Reference

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 Office Project 2007 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.

Visual Basic for Applications 
  Sub BestFitFirstFiveCols()

Dim I As Integer        ' Index used in For...Next loop.

For I = 1 To 5
    <strong class="bterm">ColumnBestFit</strong> Column:=I
Next I



End Sub

See Also