图示EXCEL表格vba系列42之ActiveCell.Column

1、首先需要建立表格，并设置简单的表格格式，这样在说明ActiveCell.Column属性的时候可以简单直接，如下图所示：

2、进入到vba的project项目模式下，可以在sheet1中点击右键，找到查看代码，点击进入vba编程窗体，如下图所示：

3、或者可以 直接使用键盘，Alt+F11按键，直接进入到vba的project模式下，如下图所示：

1、接下来需要在窗体中找到下拉菜单，查询到Worksheet_BeforeDoubleClick以便双击鼠标左键后，执行代码，如下所示：

2、编写代码，如下图所示：

3、代码：

Sheet1.Range("A2") = Application.ActiveCell.Column

将结果显示到sheet1中的单元格A2中。

1、最后就是双击鼠标左键，执行代码，如下图所示：

2、明确得知，显示的数值为活动单元格的列数，如下所示：

3、ActiveCell.Column 活动单元格所在的列数。