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用所需的代码替换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，您希望范围内至少有两列。