セルA1の値を小数点以下2桁表示に、セルA2を文字列に設定するには
次のように指定します。

    Range("A1").Select
    Selection.NumberFormat = "#,##0.00"  '小数点以下2桁
    Range("A2").Select
    Selection.NumberFormat = "@"         '文字列