Excel VBA:从动态引用调用绝对单元格

时间:2016-04-05 08:13:34

标签: excel vba excel-vba macros

我有一个工作表,其中在列A中找到代码,然后宏偏移行引用并将其复制回另一个工作表。

我想更改此设置,以便宏查看一系列列,例如列AE,然后查找代码然后沿着行查找从列{{1等等。

这是我的代码;这显然只适用于一个代码列,因为它使用F。我还应该指出,OffsetAB和/或C列中可能存在代码,因此查找下一个空白单元格将不起作用。< / p>

D

希望这是有道理的!

标题编辑为'绝对单元'

1 个答案:

答案 0 :(得分:0)

可能使用.Row

例如

Cells(ActiveCell.Row, "A")

这将转到同一行中的列A,这与列偏移相同,但您可以从任意列转到列A,而无需多个offset

修改

testc = Worksheets("Sheet1").Range("A:A").Find(code).address
Range(testc).Select

Sheets("Sheet1").Cells(ActiveCell.Row, "B").Copy _
    Destination:=Sheets("Sheet1").Range("A" & lastrow)