使用VBA运行时错误13'类型不匹配'，同时将修改的单元格值分配回单元格

Question

我的代码如下，给出错误的行，类型不匹配，运行时错误13是for循环中的行。 为什么会发生这种情况，我该如何避免呢？

Workbooks(theFile).Worksheets(1).Columns("G:G").EntireColumn.NumberFormat = "0.00"

For Each myCell In Columns("G:G")
    myCell.Value = WorksheetFunction.Trim(WorksheetFunction.Clean(myCell.Value))
Next

Answer 1

可能是类似的东西

For Each myCell In Columns("A:A").Cells
     myCell.Value = WorksheetFunction.Trim(myCell.Value)
Next