我正在尝试在Lists.Range(“I2:AD2”)范围内找到字符串变量A.一旦找到该单元格,我想将新的范围变量A_backup设置为从找到的“I2:AD2”中的单元格到列中最后一个非空单元格的范围 . 我已经能够使用select,activecell等来做到这一点,但是我想避免这种情况,因为当我从工作簿中的不同工作表运行它时会导致问题 .
这是似乎有效的代码:
A = OrderForm.Range("C15").Value
If Len(A) > 0 Then
Set A_backup = Lists.Range("I2:AD2").Find(A)
从这里我希望它做的事情如下:
Set A_backup = Range(A_backup.Address, A_backup.Address.End(xlDown)
End If
虽然似乎无法想象那部分 . 谢谢您的帮助!
1 回答
弄清楚了,但是如果有更好的方法,我很乐意听到:
万一