簡單的Visual Basic q中的excel宏

Dim test As String 

test = CStr(ActiveWorkSheet.VLookup("jpeg_lrg", B, 3))

我在Excel VBA宏

Dim test As String 

test = CStr(ActiveWorkSheet.VLookup("jpeg_lrg", B44, 3))

（沒有工作也一樣）

也試過沒有CSTR

你能解釋一下你想達到什麼嗎，否則我們不能幫你 – Conquistador

代碼是否編譯？使用調試菜單 - >編譯來檢查。在1日，'VLOOKUP'不是工作表上的一個函數。 – shahkalpesh

您不能只將範圍作爲變量名稱傳遞。

Dim test As String 

test = Application.WorksheetFunction.VLookup("jpeg_lrg", ActiveSheet.Range("B:B"), 3)

雖然這不會有任何意義，因爲「B：B」只包含一列，而您要求列爲第三列。使用VLookup，您需要至少兩個範圍內的列。

2013-07-10 18:46:12 GSerg

我認爲你正試圖返回E44細胞的價值？如果是這種情況，那麼這應該爲你工作 - 用你需要的代碼替換MsgBox。

For Each i In Range("B44") 
    If i = "jpeg_lrg" Then 
     MsgBox i.Offset(0, 2) 
     Else 
    End If 
Next i

2013-07-10 18:45:40 Conquistador

回答