Using VBA Runtime error 13 'type mismatch' while assigning a modified cell value back to the cell

Question

My code is below, the line that gives the error, type mismatch, runtime error 13 is the line within the for loop. WHy is this happening and how can I avoid it?

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

Probably something like

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