首页 > 解决方案 > 在循环中输入公式时类型不匹配(错误 13)

问题描述

我正在编写一个脚本来在循环中进行一些计算,并将公式保存在单元格中。我遇到了这个错误,但不知道这是什么原因。确定的是单元格中没有#N/A 或错误,所有单元格都有数字数据。这是我写的脚本:

Dim wb As Workbook: Set wb = workbooks("A.xlsx")
Dim sh As Worksheet
Dim lRow as Long
Dim i as Long

For Each sh In wb.Worksheets
lRow=sh.Cells(Rows.Count,1).End(xlUp).Row
For i = 2 to lRow -1
sh.Range("M" & i+1).Formula = "=K" & i + "L" & i
Next i
Next sh

有人可以为这个问题提出任何改进或解决方案吗?非常感谢!

标签: vbaloopsformulatype-mismatch

解决方案


推荐阅读