人力検索はてな
モバイル版を表示しています。PC版はこちら
i-mobile

エクセルマクロに関する質問です

『Range(IA24,I26:P26I).Select』

の、ような式(?)を、

『Cells(24,1)』 と 『Cells(26,9).Resize(1,8)』

を、用いて表すのにはどうすればいいのでしょうか?

簡単に言うとCellsっての使って複数のセルを選択できるようにしたいのですが・・・

解る方のご回答お待ちしております。

●質問者: あややん
●カテゴリ:コンピュータ
✍キーワード:24 SELECT エクセル セル マクロ
○ 状態 :終了
└ 回答数 : 4/4件

▽最新の回答へ

1 ● vegah
●2ポイント

http://www.moug.net/tech/exvba/0050084.htm

セル範囲を参照する2(Cellsプロパティ) - Excel VBA モーグ即効テクニック集

連続した範囲であれば、次のような書き方でよく使うのですが、CELLSを使って離れたセルをいっぺんに選択するのがやった事がないですね。


Range(Cells(11, 5), Cells(12, 8)).Select


2 ● taske
●2ポイント

http://www.yahoo.co.jp/

Yahoo! JAPAN

URLはダミーです。

『Range(Cells(24,1),Cells(26,9)).Select』でいかがでしょうか?

◎質問者からの返答

それだと『Range(”A24:I26”).Select』と、27セル選択してる状態になっちゃいます。

『Range(Cells(24, 1), Cells(26, 9).Resize(1, 8)).Select』にしてもA24からP26までの48個のセルを選択してる状態になっちゃうのでNG・・・

『Cells(24,1)』の1セル と 『Cells(26,9).Resize(1,8)』の8セル

合計9セルを選択してる状態にしたいです。

引き続きご回答お待ちしております。


3 ● mitasan
●40ポイント

http://www.asahi-net.or.jp/~zn3y-ngi/YNxv20006.html

複数のセル範囲をまとめて1つのRangeオブジェクトにするにはUnionメソッドを使用すればok

Union(Cells(24, 1), Cells(26, 9).Resize(1, 8)).Select

◎質問者からの返答

OH!そんなメゾットがあったんですね・・・素晴らしいwこれで無事解決です。ありがとうございました♪


4 ● staki
●30ポイント

http://www.example.com/

Example Web Page

こういうことでよろしいでしょうか。

A24, I26:P26 の合計 9 セルが選択範囲になります。


Private Sub CommandButton1_Click()

Dim c1 As Range

Dim c2 As Range

Dim a As Range

Set c1 = Worksheets(”Sheet1”).Cells(24, 1)

Set c2 = Worksheets(”Sheet1”).Cells(26, 9).Resize(1, 8)


Set a = Union(c1, c2)

a.Select

End Sub

◎質問者からの返答

こちらの方法でも希望通りの動きになりました。ありがとうございました。

関連質問


●質問をもっと探す●



0.人力検索はてなトップ
8.このページを友達に紹介
9.このページの先頭へ
対応機種一覧
お問い合わせ
ヘルプ/お知らせ
ログイン
無料ユーザー登録
はてなトップ