对象不接受方法
我的 VBA 应用程序遇到问题。
我需要定义一个记录集并将特定字段的结果逐行输入到 Excel 工作表中。 问题是,当我这样做时,
With appXLS.Worksheets("Resultado Geral")
For intPosition = LBound(Arr) To (UBound(Arr) - 1)
teste = Arr(intPosition, 0) & "_Status"
.Cells(i, 6) = MyRecBase.Fields(teste)
Next
End With
它会显示问题(错误“438”)并标记“.Cells”行。但最大的问题是我之前几行使用了相同的方法。
请帮我。我将不胜感激。
提前致谢
I'm experiencing a problem with my VBA application.
I need to define a Recordset and enter the result of a certain field, line by line, into an Excel Worksheet.
The problem is, when I do this
With appXLS.Worksheets("Resultado Geral")
For intPosition = LBound(Arr) To (UBound(Arr) - 1)
teste = Arr(intPosition, 0) & "_Status"
.Cells(i, 6) = MyRecBase.Fields(teste)
Next
End With
It displays the problem (Error '438') and marks the ".Cells" line. But the biggest problem is that I use the same method a few lines before.
Please, help me. I would appreciate.
Thanks in advance
如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

绑定邮箱获取回复消息
由于您还没有绑定你的真实邮箱,如果其他用户或者作者回复了您的评论,将不能在第一时间通知您!
发布评论
评论(1)
检查代码中的行:
因为不清楚
i
是什么以及如何根据循环计算它。Check the line in your code:
since it is not evident what
i
is and how it is calculated based on your loop.