複数セルを選択する。

目的

• 複数セルを選択したい。
• 二通り試してみる。
  1. Range
  2. Union
• エラーの発生例を見る。

その一例

1. 白紙のワークシートでテストしてみます。
   

Sub A2とB3を選択する()
  Range("A2,B3").Select
End Sub

1. ワークシートが同じではない場合、エラーが発生するようです。
   

   Sub エラー発生_シート1のA2とシート2のB3を選択する()
     Range("Sheet1!A2,Sheet2!B3").Select
   End Sub

   
   
2. エラー発生。
   

Union

Union メソッドを使用してみます。

1. 下記マクロを実行してみます。
   

   Sub Unionメソッド()
     Union(Range("A2"), Range("B3")).Select
   End Sub

   1. Union で複数エリアをまとめています。
2. セルが選択されました。
   

1. ワークシートが同じではない場合、エラーが発生するようです。
   

   Sub エラー発生_Unionメソッド()
     Union(Worksheets(1).Range("A2"), Worksheets(2).Range("B3")).Select
   End Sub

   
   
2. エラー発生。
   

テスト環境

• Windows 10
• Microsoft Office Excel 2003

以上、閲覧ありがとうございました。