对象不接受方法

Posted 2023-05-07

【中文标题】对象不接受方法

【英文标题】：Object does not accept method

【发布时间】：2011-03-15 13:14:42

【问题描述】：

我的 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”行。但是最大的问题是我之前几行都用了同样的方法。

请帮帮我。我会很感激的。

提前致谢

【问题讨论】：

在您的.Cells(i, 6) = MyRecBase.Fields(teste) 行中“i”是什么，它是如何计算的？

伙计，我感觉又笨又笨。我忘记了 i 增量。谢谢你的光。

没问题，很高兴我能帮上忙 :)

@i_saw_drones 我建议您将您的评论作为适当的帖子再次发布（作为答案进行检查）并“关闭”该主题。此处已建议：meta.stackexchange.com/questions/77900/…

@Tiago Cardoso 好点，感谢您强调这一点。

【参考方案1】：

检查代码中的行：

.Cells(i, 6) = MyRecBase.Fields(teste)

因为不清楚 i 是什么以及它是如何根据您的循环计算的。

【讨论】：

伙计，对不起。我需要取消选中您的答案，因为这不再有效。我不知道为什么，但事实并非如此。

@Patrick Villela 如果新问题相关，您能否用新问题更新您的问题（否则提出新问题）？

重新接受了您的回答。我不知道在再次使用它之前我需要将记录集设置为空。感谢您的支持。