vba - 为范围 VBA Excel 中的每个单元格设置偏移值

Question

我正在尝试将一个值与一个范围内的每个单元格进行比较。一旦有匹配，我想将另一个变量设置为旧的偏移 3 列的值。

For Each i In Worksheets("SFDC Input").Range("D2:D20").Cells
    If ProductFamily = i Then
        i.Offset(0, -3).Value = ID
    End If
Next

ProductFamily 是我与 i 进行比较的值。我希望 ID 成为价值持有者。

Answer 1

看起来您的分配 ( =) 是倒退的。您设置i.Offset(0, -3).Value为ID而不是设置ID为该值。

尝试以下操作：

ID = i.Offset(0, -3).Value

来自MSDN：

= 运算符将其右侧的值分配给其左侧的变量或属性。