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，您希望该范围内至少有两列。