我是VBasic的基础。希望对错误有所帮助（该死，突然出现而未作任何更改）。发现了一些类似于我的问题，但无法解决问题。这是错误行。
Camposcomplementares.Portar1.Text = Application.WorksheetFunction.HLookup(Sheets("Admin_Lists").Range("BH45"), Sheets("Admin_Lists").Range("BB11:BG38"), 14, False)
之后：Camposcomplementares.Show->打开用户表单（如果不是错误的话）
Camposcomplementares =用户
窗体Portar1 =是用户窗体中的文本框名称（仔细检查名称中的错误）
Range（“ BH45”）是整数-可以检查
Range（“ BB11：BG38”）=是带有值的表
注意：-在excel中检查了类似的公式，效果很好。
-不要使用“显式”并且没有定义变量
希望已经足够有人帮助我了。它在:(。Tkx。
尝试从很小的东西开始。像这样：
Public Sub TestMe()
With Application.WorksheetFunction
Debug.Print .HLookup(Sheets("A_L").Range("A1"), Sheets("A_L").Range("B1:C100"), 2,0)
End With
End Sub
并使其起作用。
然后慢慢交流Range("A1")与Range("BH45")并Range("B1:C100")用Range("B1:C100")。它行得通吗？是因为Range(BH45)有!Div/0错误还是工作表"A_L"不存在？
到目前为止，它可能仍然有效。您可以继续调试，编写如下代码：
Public Sub TestMe2()
Camposcomplementares.Portar1.Text = "Something"
End Sub
它行得通吗？您如何参考用户表格？文字在哪里？在用户表单还是模块中？
本文收集自互联网，转载请注明来源。
如有侵权，请联系 [email protected] 删除。
我来说两句