在 VBA 中使用偏移量时引用单元格

Referencing a cell when using offset in VBA

我不太明白如何根据条件引用 table 中的单元格并从一列以上的单元格中获取信息。基本上,我有一个 table,用户可以从中 select 一个变量,在它旁边的列中,他们输入变量的实例数。我正在尝试使用偏移量,但我想我需要用变量引用第一个单元格。

For Each cell In [Table]
    If cell = "Variable1" Then
        Var1 = .Offset(0, 1).Value
    ElseIf cell = "Variable2" Then
        Var2 = .Offset(0, 1).Value
    ElseIf cell = "Variable3" Then
        Var3 = .Offset(0, 1).Value
    ElseIf cell = "Variable4" Then
        Var4 = .Offset(0, 1).Value
    End If
Next cell

基本上,代码将查看 [[=​​23=]] 中的每个单元格,如果单元格等于 "Variable1",则 Var1 将 = 它下一列中的值,如果等于 "Varible2" 然后 Var2 将 = 它旁边的列中的值......等等。我没有适当地引用包含 "Variable1" 的单元格。我怎么做?我认为它无处可抵消,因为它必须查看 "cell" 但显然我错了。

很抱歉我找到了答案。只需添加 ActiveCell 即可使代码正常运行。请智能社区..回答实际问题:)