首页 > 解决方案 > Excel:当最后一列更改编号时如何获取最后一列的列索引号

问题描述

我正在尝试为每周更新的数据表自动化我的 VLOOKUP。目前我的 VLOOKUP 看起来像这样:

=VLOOKUP(A3,'[Report.xlsm]All'!$I:$OA,COLUMN('[Report.xlsm]All'!$NX:$NX)-8,0)

每周都会向表中插入两个新列(在最后一列之前)。新列填充了新数据,我必须重新编写我的 VLOOKUP。

我要查找的列始终是倒数第三、倒数第二和最后一列。

有没有办法可以使用查找倒数第三、倒数第二和最后一列的函数来分配列索引号?我认为这样我可以添加一个为我完成工作的宏。

标签: vbaexcelexcel-2010

解决方案


对于最后一列,您可以使用以下代码并将其减 3

Dim lastcolumn As Long
dim ws as worksheet

set ws = activesheet

lastcolumn = ws.UsedRange.Columns.Count

对于公式解决方案,如果您的数据集没有空白标题,您可以使用 counta 函数来查找最后一列。

如果您发现任何问题,我们可以稍后修改代码


推荐阅读