はじめてのVBA その2

ある特定の対象に対して、複数の操作をしたい時（プロパティを変えるなど）に、 まとめて書くやり方withを使う方法がある。
withTestはそれぞれ一つづつ書いた場合。
WithTest2はwithを使ってまとめた場合。

Sub WithTest()
    Range("A1").Value = "hello"
    Range("A1").Font.Bold = True
    Range("A1").Font.Size = 16
    Range("A1").Interior.Color = vbRed
End Sub
Sub WithTest2()
    With Range("A2")
        .Value = "hello"
        With .Font
            .Bold = True
            .Size = 16
        End With
        .Interior.Color = vbRed
    End With
End Sub

セルの値を取得する場合。 ValueかFont.Sizeで値や文字サイズを取得可能。

Sub GetTest()
    MsgBox (Range("A1").Value)
    MsgBox (Range("A1").Font.Size)
End Sub

メソッド名を書くと何らかの処理が行われる。

Sub MethodTest()
    ' Range("B2").Clear
    ' Range("B5").Delete shift:=xlShiftUp
    Worksheets.Add after:=Worksheets("Sheet2"), Count:=2　' 
End Sub

2行目はセルの中身削除。
3行目はセルのB5を削除して上に詰める。
4行目はシート2から二つシートを追加。