共用方式為


Columns.Add 方法 (Word)

傳回 Column 物件,表示加入至表格的欄。

語法

運算式新增 (BeforeColumn)

需要 expression。 代表 'Columns' 集合的變數。

參數

名稱 必要/選用 資料類型 描述
BeforeColumn 選用 Variant 代表將會出現欄立即新欄右邊的 Column 物件。

傳回值

範例

這則範例會在使用中文件內建立一個含有兩欄和兩列的表格,然後在第一欄之前加入另一欄。 新欄的寬度會設定為 1.5 英吋。

Sub AddATable() 
 Dim myTable As Table 
 Dim newCol As Column 
 
 Set myTable = ActiveDocument.Tables.Add(Selection.Range, 2, 2) 
 Set newCol = myTable.Columns.Add(BeforeColumn:=myTable.Columns(1)) 
 newCol.SetWidth ColumnWidth:=InchesToPoints(1.5), _ 
 RulerStyle:=wdAdjustNone 
End Sub

另請參閱

Columns 集合物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應