在 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 即可使代码正常运行。请智能社区..回答实际问题:)
我不太明白如何根据条件引用 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 即可使代码正常运行。请智能社区..回答实际问题:)