2017-10-12 77 views
0

我开始用VBA进行冒险。我想在VBA上创建公式,使用vlookup,但是这有些问题。 此外,我想实现VLOOKUP用于细胞,当从输精管柱 细胞将被填充在VBA上实现Vlookup公式,并处理错误1004

(例如,如果WB_WS_Pricing.Range( “A4”)<> 0,则 WB_WS_PRICING.Range( “CX4”)= “= IFNA(VLOOKUP(E4交付,数据:!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 

Enyone有想法有什么不对?对我来说,公式似乎很好...

+2

'“”'必须是'“”“”' –

回答

0

你需要一个额外的报价逃脱公式在双引号中的每个前(即“”“”没有“”)

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