ExcelVBA入門 - 制御構造　With

制御構造　With

オブジェクトの一括制御です．．．？
ひとつのオブジェクトに対するプロパティをいくつも設定するようなとき、
With を使ってオブジェクト名を省略することが出来ます。

With 省略する対象オブジェクト
　　.オブジェクトに対する処理
End With

例えばこのプログラムは

Sub test_13()
　　
　　'制御構造 With の勉強中
　　
　　Range("B2").Font.ColorIndex = 5
　　Range("B2").Font.Bold = True
　　Range("B2").Font.Italic = True
　　
End Sub

With を使ってプログラムを書くと
Range("B2").Font が共通なので、

Sub test_13()
　　
　　'制御構造 With の勉強中
　　
　　With Range("B2").Font
　　　　.ColorIndex = 5
　　　　.Bold = True
　　　　.Italic = True
　　End With
　　
End Sub

このプログラムを実行すると
実行前

こうなります。

Range("B2").Font は「B2」の文字。
ColorIndex = 5 は色が緑
Bold = True 太字にする
Italic = True 斜体にする

2004年8月

ホーム > プログラミング入門 > Lesson11： 制御構造 With