在vlookup中使用input框的结果

我有一些与VBA有关的经验,但通常会被语法等绊倒。

这是我目前正在尝试做的,我不明白:

我创build了一个input消息来询问用户他们正在查看的月份。

然后我想用一个vlookup公式中的input框的结果,我似乎无法弄清楚。

这是我迄今为止的代码:

Dim Mnth As String

Mnth = InputBox("Enter what month it is", "", "DO NOT ABBREVIATE") 'Open the appropriate file and tab Windows("Resource Tracking Kroger-MP.xlsm").Activate Sheets("Tables").Select Range("g14").Select ActiveCell.FormulaR1C1 = "=VLOOKUP(Mnth, 'Tables'!C2:c4, 2, False)" 

下面是使用上面的macros进入单元格的公式:= VLOOKUP(Mnth,Tables!$ B:$ D,2,FALSE)而不是使用单词Mnth,我需要它使用实际的月份

任何帮助深表感谢!!!!

正如我在评论中提到的,你应该使用:

 ActiveCell.FormulaR1C1 = "=VLOOKUP(""" & Mnth & """, 'Tables'!C2:C4, 2, False)" 

还请阅读: 如何避免使用Select / Active语句