VBA 获取 Excel 表格最后一列的列数

VBA 获取 Excel 表格最后一列的列数

本文介绍两种 VBA 方法，帮助您获取 Excel 表格中包含数据的最后一列的列数。

方法一：使用 End(xlToLeft) 方法

lastColumn = ActiveSheet.Cells(1, Columns.Count).End(xlToLeft).Column

该方法从第一行的最后一列开始，向左查找第一个非空单元格，并返回该单元格所在的列数。

方法二：使用 UsedRange 属性

lastColumn = ActiveSheet.UsedRange.Columns.Count

该方法获取表格中所有包含数据的范围，并返回该范围的列数。

两种方法的比较

• 方法一更适合于需要根据特定行来获取最后一列的场景，例如需要获取第一行包含数据的最后一列。
• 方法二更适合于需要获取整个表格中所有包含数据的最后一列的场景。

请根据实际情况选择合适的代码。