excel - excel宏中的简单Visual basic q

Question

Dim test As String

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

愚蠢的424错误帮助！

对于我在 excel vba 中的宏

---

Dim test As String

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

（也没有工作）

---

也试过没有 CSTR

Answer 1

我认为您正在尝试返回 E44 单元格的值？如果是这种情况，那么这应该对您有用 - 替换MsgBox为您需要的代码。

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

Answer 2

您不能只将范围作为变量名传递。

Dim test As String

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

但这没有任何意义，因为“B：B”仅包含一列，而您要求它提供第三列。使用 VLookup，您希望范围内至少有两列。