在这种情况下，类型不匹配错误13来自哪里？

Question

我的一个Excel工作表包含许多数据，单元格采用数字格式。 （例如，它填充的数字如1,02458）

在另一个工作表中，我试图根据第一个工作表做一些微积分，为此我使用的是VBA代码：

Dim sum, price, strike As Double
sum= 0
strike = 0.02

For k = 1 To 5000

sum= sum+ Worksheets("Feuille1").Cells(k, 7).Value - strike


Next k

当我尝试运行此时，带总和的行对应于错误13类型不匹配。

我尝试过更改单元格格式，甚至使用Variant而不是Double，但它没有改变任何东西。如何避免类型不匹配？

Answer 1

Sheet＆＃34; Feuille1＆＃34;是否有标题？范围＆＃34; G1＆＃34;？ 在这种情况下，您尝试在总和中添加字符串，这将导致类型不匹配。如果数字从第2行开始，则将循环更改为

For k = 2 to 5000