在 VBA 上实现 Vlookup 公式，并处理错误 1004答案

【问题标题】：Implement Vlookup formula on VBA, and handle error 1004在 VBA 上实现 Vlookup 公式，并处理错误 1004
【发布时间】：2017-10-12 20:01:20
【问题描述】：

我从 VBA 开始我的冒险。我想在 VBA 上创建公式，使用 vlookup 但这出了点问题。我也想为单元格实现 vlookup，当来自不同列的单元格将被填充

(例如，如果 WB_WS_Pricing.Range("A4")0 那么 WB_WS_PRICING.Range("CX4") = "=IFNA(VLOOKUP(Delivering!E4,DATA!A:I,9,0),"")"

子公式()

Set WB_CMSO_MASS_IBERIA = ThisWorkbook
Set WB = ThisWorkbook

    Set WB_WS_PRICING = WB.Sheets("Pricing")
    Set WB_WS_HEADER = WB.Sheets("Header")
    Set WB_WS_DATA = WB.Sheets("DATA")
    Set WB_WS_Extension = WB.Sheets("Extension")
    Set WB_WS_DELIVERING = WB.Sheets("Delivering")


  WB_WS_PRICING.Range("CX4") = "=IFNA(VLOOKUP(Delivering!E4,DATA!A:I,9,0),"")"




   End Sub

有人知道出了什么问题吗？对我来说，公式似乎很好......

【问题讨论】：

"" 必须是 """"

标签： vba error-handling vlookup

【解决方案1】：

您需要对公式中的双引号进行转义，并在每个引号前面加上一个额外的引号（即“”“”而不是“”）

WB_WS_PRICING.Range("CX4") = "=IFNA(VLOOKUP(Delivering!E4,DATA!A:I,9,0),"""")"

【讨论】：