使用单元格中的值来确定其他单元格

Question

我使用

从单元格中获取值

Number = ActiveWorkbook.Worksheets("CRMv1").Cells(2, 10).Value

当我有 Number 时，我想用它来选择下一个单元格，通过这个 val 索引。

喜欢

ActiveWorkbook.Worksheets("NEXT CONTATCT").Cells(**Number, 2**).Value
= ActiveWorkbook.Worksheets("CRMv1").Cells(13, 1).Value

谁能帮我修正这段代码？

Answer 1

使用 Range.Offset property 或 add/subtract 来自 Number.

'add 1 to Number to locate one row below
ActiveWorkbook.Worksheets("NEXT CONTATCT").Cells(Number + 1, 2) = _
    ActiveWorkbook.Worksheets("CRMv1").Cells(13, 1).Value

'Offset 1 row below
ActiveWorkbook.Worksheets("NEXT CONTATCT").Cells(Number, 2).Offset(1, 0) = _
    ActiveWorkbook.Worksheets("CRMv1").Cells(13, 1).Value

使用单元格中的值来确定其他单元格

Use value from cell to determine other cell

excel

vba

cells