Search code examples
excelvbaruntime-errortype-mismatch

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


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

Solution

  • Probably something like

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