作者：乔山办公网日期：
返回目录：excel表格制作
Sub 列号()
number3 = ActiveCell.EntireColumn.Column '当前单元格列号或区域最左列号
End Sub
Selection.Cells(1, 1).Select 第一行第一列
Selection.Cells(2, 3).Select 第二行第三列
Application.Selection 属性百
为 Application 对象返回在活动窗口中选定的对象。
语法
表达式.Selection
表达式 一个代表 Application 对象的变量。
说明
返回的对象类型取决于当前度所选内容（例如，如果选择了单元格，此属性将返回 Range 对象）。如果未选择任何版内容，Selection 属性将返回 Nothing。
在不使用对象识别符的情权况下，使用此属性等效于使用 Application.Selection。
与整个工作表的第一列表示方法一样，但对象是Selection，而不抄是Sheets，如Selection.Columns(1).Select就是选择Selection中的第一列，以下图为例：
运行宏test后的效果就是选择区域中的第一列。
知识扩展：
要选择区域中第几行第同列的单元格也和工知作表一样，如表示选定区域的第2行第2列，可以道用Selection.Cells(2,2)，也可以用Selection.Range("B2")。
示例代码：
Sub gvntw()
With Selection.Range("B2")
.Value = "我是选区的B2"
.Font.Color = vbRed
.Interior.Color = vbYellow
End With
End Sub
运行效果如下图：