Excel VBA 質問スレッド No.813 (解決済)

複数のセル範囲の一括指定

投稿者 : 三次     投稿日時 : 2022/06/20(Mon) 14:41:37     OS : Windows 10     EXCEL : Excel 2003
すみませんがご教示願います。

'----B列の最終行から上方向の終端セルを選択
LASTROW = ws.Cells(Rows.Count, 3).End(xlUp).Row

  Range("C3:E15,H3:J15").Select  ’このように飛び地に範囲指定したいのですが

   ↓どのように書けばよいのでしょう?これではエラーになります
Range("Cells(3, 3):Cells(LASTROW + 1, 5), Cells(3, 8):Cells(LASTROW + 1, 10)").Select

[返信 1] Re : 複数のセル範囲の一括指定
投稿者 : さんこう     投稿日時 : 2022/06/20(Mon) 15:10:43
原型を活かすなら、こんな感じでしょうか。

Range(Cells(3, 3).Address & ":" & Cells(LASTROW + 1, 5).Address & "," & Cells(3, 8).Address & ":" & Cells(LASTROW + 1, 10).Address).Select

まあ、普通はこんな感じになります。

Range("C3:E" & LASTROW + 1 & ",H3:J" & LASTROW + 1).Select

[返信 2] Re : 複数のセル範囲の一括指定
投稿者 : 文字連結     投稿日時 : 2022/06/20(Mon) 15:16:38
Range("C3:E" & 40 & ",H3:J" & 40).Select
ってな感じ。
ただの文字連結

[返信 3] Re : 複数のセル範囲の一括指定
投稿者 : 三次     投稿日時 : 2022/06/20(Mon) 16:04:42
ありがとうございます。

>原型を活かすなら、こんな感じでしょうか。

Range(Cells(3, 3).Address & ":" & Cells(LASTROW + 1, 5).Address & "," & Cells(3, 8).Address & ":" & Cells(LASTROW + 1, 10).Address).Select

まあ、普通はこんな感じになります。

>Range("C3:E" & LASTROW + 1 & ",H3:J" & LASTROW + 1).Select

>Range("C3:E" & 40 & ",H3:J" & 40).Select
ってな感じ。
ただの文字連結

文字連結を使うのですね、検索しても良くわからず困っていました。
ありがとうございました!

当掲示板について
返信入力フォーム
お 名 前  :
内  容   :
ステータス  : この質問を解決済みにする

認証コード  :
        キャプチャ画像


( 処理日時 : 2022-07-07 13:39:44 )

Page
Top