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

我通过使用从单元获得价值

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

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

喜欢

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

任何人都可以帮我解决这个代码？

Answer 1

使用Range.Offset属性或者简单地从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