2017-08-16 218 views
1

我需要發票添加爲測試與那麼V查找公式應該運行Excel中VLOOKUP VBA

例如:= 「發票」 & 「」 & VLOOKUP(H3,FBL5N d:G,4,0) 這個公式我需要隱蔽宏的

讓我知道如何解決我想我的VBA公式爲:

On Error Resume Next 
For i = 3 To lastrow_d 
    ws_zfi.Range("AY3:AY" & lastrow_d) = "invoice" & Application.WorksheetFunction.VLookup(ws_zfi.Range("H3:H" & lastrow_d), ws_fbl5n.Range("D1:G" & lastrow_d), 4, 0) 
Next i 
+0

你會得到什麼錯誤?我的第一個猜測是*期望結束*,你需要修正你的報價。與您的示例相關,您可以將空間放在發票中,例如「發票」,而不需要其他&。 – Cyril

+1

當你想要一個值/字符串 - 「ws_zfi.Range(」H3:H「&lastrow_d)」時,你正在傳遞一系列單元格(可能是很多)作爲VLOOKUP的第一個參數' – CLR

回答

1

這很難,沒有看到源表來回答,但我認爲你想要以下內容:

For i = 3 To lastrow_d 
    ws_zfi.Range("AY" & i) = "invoice" & Application.WorksheetFunction.VLookup(ws_zfi.Range("H" & i), ws_fbl5n.Range("D1:G" & lastrow_d), 4, 0) 
Next i