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


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

の、ような式(?)を、

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

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

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

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

回答の条件
  • URL必須
  • 1人2回まで
  • 登録:
  • 終了:--
※ 有料アンケート・ポイント付き質問機能は2023年2月28日に終了しました。

回答4件)

id:vegah No.1

回答回数496ベストアンサー獲得回数2

ポイント2pt

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

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

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


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

id:taske No.2

回答回数64ベストアンサー獲得回数2

ポイント2pt

URLはダミーです。

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

id:gsjapan

それだと『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セルを選択してる状態にしたいです。

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

2005/12/24 14:27:18
id:mitasan No.3

回答回数14ベストアンサー獲得回数1

ポイント40pt

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

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

id:gsjapan

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

2005/12/24 18:14:20
id:staki No.4

回答回数14ベストアンサー獲得回数0

ポイント30pt

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

id:gsjapan

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

2005/12/24 18:20:39

コメントはまだありません

この質問への反応(ブックマークコメント)

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

回答リクエストを送信したユーザーはいません