在VBA中使用find后更改单元格列

时间:2015-01-29 11:23:36

标签: excel vba excel-vba

我正在使用Selection.find在列中查找特定值。找到值后,我想要单元格右侧单元格中的值。

我以这种方式找到使用find的单元格:

Set cell = Selection.Find(What:=ValueIWantToFind, After:=ActiveCell, LookIn:=xlFormulas, _
        LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
        MatchCase:=False, SearchFormat:=False)

我试图在找到它之后更改单元格的列,如下所示:

 cell.Column = cell.Column + 1

但是它给了我一个运行时错误' 450':

Wrong number of arguments or invalid property assignment.

如何更改Cell的列?

2 个答案:

答案 0 :(得分:2)

这将为您提供正确的单元格

 cell.Offset(,1).Value

答案 1 :(得分:0)

这使细胞向右移动。

cell.Offset(0, 1).Value