Optimizing Code

Hello, the code below is an amalgamation of recorded macros. As I have only limited skills in VBA, can one of the gurus here help me optimize this for efficiency and speed?

Range("A2").Select
      Range("A2", Selection.End(xlDown)).Select
    
    With Selection
        Selection.NumberFormat = "General"
        .Value = .Value
    End With
    
    Range("G2").Select
      Range("G2", Selection.End(xlDown)).Select
    
    With Selection
        Selection.NumberFormat = "General"
        .Value = .Value
    End With
    
    Range("h2").Select
      Range("h2", Selection.End(xlDown)).Select
    
    With Selection
        Selection.NumberFormat = "General"
        .Value = .Value
    End With
    
    Range("l2", ActiveCell.SpecialCells(xlLastCell)).Select
    Application.Run "PERSONAL.XLSB!converttexttonumbers"