こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

エクセルVBA セルの値で、複数の列範囲を同時に

セルの値を利用して複数の列範囲を選択したいです
セルA1に 3 と入力されていて、AA列がアクティブの場合

Range("AD:AF,AJ:AL").Select

の様に、アクティブ列から3列空けて、3列選択、3列空けて、3列選択の様にしたいです

AA、アクティブ
AB
AC
AD、選択
AE、選択
AF、選択
AG
AH
AI
AJ、選択
AK、選択
AL、選択
AM

投稿日時 - 2014-08-25 09:01:45

QNo.8729589

困ってます

質問者が選んだベストアンサー

丁寧に拾っていくだけです

sub macro1()
 dim i as long
 i = range("A1").value

 union( _
  activecell.offset(0, i).resize(1, i).entirecolumn, _
  activecell.offset(0, i * 3).resize(1, i).entirecolumn _
 ).select

end sub

投稿日時 - 2014-08-25 09:38:18

お礼

ありがとう御座います
拾っていきます

投稿日時 - 2014-08-26 08:16:19

ANo.1

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(1)

あなたにオススメの質問