如何解决循环WorksheetFunction.Product的Excel VBA 1004错误
正在创建VBA命令按钮。目的是循环乘积直到超过阈值。最终的循环迭代将打印在excel电子表格中。但是,“ Do While ....”行会触发附加图像的1004错误。您对修改以下代码有任何建议吗?
谢谢您的时间:) Screenshot
Private Sub CommandButton1_Click()
Dim i As Integer
i = 1
Do While WorksheetFunction.Product([Cells(4,16):Cells((i + 3),16))]) < Cells(4,22)
WorksheetFunction.Product [Cells(4,16))]
Loop
Cells(4,17) = i
End Sub
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。