Excel VBA教程:Columns属性

应用于 Application对象的 Columns属性。

返回一个Range 对象,该对象代表活动工作表中的所有列。如果活动文档不是工作表,则 Columns属性无效。只读。

expression.Columns

expression   必需。该表达式返回“应用于”列表中的对象之一。

 

应用于 Range对象的 Columns属性。

返回 Range对象,该对象代表指定单元格区域中的列。只读。

expression.Columns

expression   必需。该表达式返回“应用于”列表中的对象之一。

 

应用于 WorkSheet对象的 Columns属性。

返回一个 Range对象,该对象代表指定工作表上的所有列。只读。

expression.Columns

expression   必需。该表达式返回“应用于”列表中的对象之一。

 

有关返回集合中单个成员的详细信息,请参阅返回集合中的对象

说明

在不使用对象识别符的情况下使用此属性等价于ActiveSheet.Columns

当对一个多重选定区域的 Range对象应用属性时,此属性返回的只是所选区域的第一个子区域中的列。例如,如果 Range对象有两个子区域 A1:B2 和 C3:D4,那么,Selection.Columns.Count 的返回值是 2,而不是 4。若要对一个可能包含多重选定区域的区域使用此属性,请用 Areas.Count方法测试一下此区域内是否包含多个子区域。如果确实包含多个子区域,可对此区域内的每一子区域进行循环。

示例

本示例将 Sheet1 的第一列(A 列)的字体设置为加粗。


Worksheets("Sheet1").Columns(1).Font.Bold = True

本示例将“myRange”区域第一列中每一单元格的值置为 0(零〕。


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

本示例显示 Sheet1 中选定区域的列数。如果选定区域包含多个子区域,本示例将对每一子区域进行循环。


Worksheets("Sheet1").Activate
areaCount = Selection.Areas.Count
If areaCount <= 1 Then
    MsgBox "The selection contains " & _
        Selection.Columns.Count & " columns."
Else
    For i = 1 To areaCount
        MsgBox "Area " & i & " of the selection contains " & _
            Selection.Areas(i).Columns.Count & " columns."
    Next i
End If

上页:Excel VBA教程:ColumnRange属性 下页:Excel VBA教程:ColumnWidth属性

Excel VBA教程:Columns属性

Excel VBA教程:ColumnWidth属性 Excel VBA教程:COMAddIns属性
Excel VBA教程:CommandBars属性 Excel VBA教程:CommandText属性
Excel VBA教程:CommandType属性 Excel VBA教程:CommandUnderlines属性
Excel VBA教程:Comment属性 Excel VBA教程:Comments属性
Excel VBA教程:ConflictResolution属性 Excel VBA教程:Connection属性
Excel VBA教程:ConnectionSiteCount属性 Excel VBA教程:Connector属性
Excel VBA教程:ConnectorFormat属性 Excel VBA教程:ConsolidationFunction属性
Excel VBA教程:ConsolidationOptions属性 Excel VBA教程:ConsolidationSources属性
Excel VBA教程:ConstrainNumeric属性 Excel VBA教程:Container属性
Excel VBA教程:Contrast属性 Excel VBA教程:ControlCharacters属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号