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

我的代码在下面，给出错误的行，types不匹配，运行时错误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