同じオブジェクトに対して値を設定する等、複数の処理を実行する方法としてWithステートメントを使用する。 With オブジェクト名 処理1 処理2 処理3 End With 例: Sheet1をアクティブにし、セルの複数のプロパティに値をセットしたい場合。 Sub test() With …