「形式を選択して貼り付け」の処理を簡単にする。

授業の課題でエクセルのマクロを扱うものがあった。

指定した範囲を「形式を選択して貼り付け」する作業をマクロで記録したら、無駄な処理が出てきた。選択し、コピーしてという過程が煩わしいので、選択コピーを一つのコードで書いた。
修正前

Sub 更新機能2()
'
' 更新機能2 Macro
'

'

    Range("I2:N7").Select
    Selection.Copy
    Range("B2:G7").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Range("A1").Select


End Sub

修正後

Sub 更新機能2()
'
' 更新機能2 Macro
'

'

    Range("I2:N7").Copy
    Range("B2:G7").PasteSpecial Paste:=xlPasteValues
    Range("A1").Select


End Sub

はてなでVBAをうまく表示させるのはどうすればいいんだ。