用户选择哪些单元格的Excel VBA Vlookup

Question

我正在创建一个宏来在同一工作簿中的两个不同工作表之间进行vlookup，但有时候单元格的布局会发生变化，所以我希望能够添加一个对话框，允许用户选择它们是什么寻找和他们想要比较的列表，但不知道如何做到这一点。

到目前为止，这是我的代码：

ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-59],ONCE!C[-49],1,0)" 
Range("BI2").Select 
Selection.AutoFill Destination:=Range("BI2:BI208032") 
Range("BI2:BI208032").Select 
Selection.Copy 
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False

提前致谢

Answer 1

您可以像这样使用InputBox：

myValue = InputBox("Give me some input")