Range.Columns 屬性 (Excel)

會傳回 Range 物件，代表指定之範圍內的欄。

語法

運算式。列

expression 代表 Range 物件的變數。

註解

若要傳回單一資料行，請使用 Item 屬性，或以對等方式在括弧中包含索引。 例如， 和 Selection.Columns.Item(1) 都會傳 Selection.Columns(1) 回選取範圍的第一欄。

套用至多區域選取 範圍的 Range 物件時，這個屬性只會傳回範圍第一個區域中的資料行。 例如，如果 Range 物件有兩個區域—A1：B2 和 C3：D4— 會 Selection.Columns.Count 傳回 2，而不是 4。 若要對可能包含多區域選取範圍的範圍使用此屬性，可測試 Areas.Count 以判斷該範圍內是否包含多個區域。 如果是的話，則在範圍中的每個區域上循環。

傳回的範圍可能在所指定的範圍之外。 例如，Range("A1:B2").Columns(5).Select 會傳回儲存格 E1:E2。

如果以字母作為索引，則字母會同等於數字。 例如，Range("B1:C10").Columns("B").Select 會傳回儲存格 C1:C10，而不是儲存格 B1:B10。 在範例中，"B" 等於 2。

使用不含物件辨識符號的 Columns 屬性等同于使用 ActiveSheet.Columns 。 如需詳細資訊，請參閱 Worksheet.Columns 屬性。

範例

本範例會將 myRange 範圍中第一欄中每個儲存格的值設定為 0 (零) 。

Range("myRange").Columns(1).Value = 0

此範例顯示 Sheet1 中指定範圍的欄數。 如果指定範圍包含多個子範圍，此範例將對每一子範圍進行迴圈。

Public Sub ShowNumberOfColumnsInSheet1Selection
   Worksheets("Sheet1").Activate 
   
   Dim selectedRange As Excel.Range
   Set selectedRange = Selection
   
   Dim areaCount As Long
   areaCount = Selection.Areas.Count 
   
   If areaCount <= 1 Then 
      MsgBox "The selection contains " & _ 
             Selection.Columns.Count & " columns." 
   Else 
      Dim areaIndex As Long
      areaIndex = 1 
      For Each area In Selection.Areas 
         MsgBox "Area " & areaIndex & " of the selection contains " & _ 
                area.Columns.Count & " columns." 
         areaIndex = areaIndex + 1 
      Next 
   End If
End Sub

支援和意見反應

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