vlookup在VB宏中具有IF功能

Question

我在VBA宏中寻找以下内容。

我希望宏在excel中查找表1中的某个值，并在excel中的expl2中执行一个VLOOKUP。

如果表1中的字段值为空白，则Excel也应显示空白而不是#N/A。

我能够编写用于执行VLOOKUP的代码，但是我真的不确定如何放入IF命令中。

Private Sub CommandButton1_Click()
    Dim ws As Worksheet
    Set ws = ThisWorkbook.Sheets("Sheet1")
    With ws
        .Range("G5:G600").Formula = "=VLOOKUP(F5,Sheet2!D:F,3,0)"

Answer 1

包括IF的技巧是确保所有双引号均已逃脱：

.Range("G5:G600").Formula = "=IF(F5="""","""",VLOOKUP(F5,Sheet2!D:F,3,0))"