https://ja.extendoffice.com/documents/excel/3923 …
上記の内容を参考にVBAを使いたいのですが、
例だとB1からB10セルまでの範囲が対象となります。
たとえば、この範囲が
B1からB10
D1からD10
F3~F5
といったように、複数の範囲となる場合はどのように記述すればよろしいですか?
なお、複数範囲は間で別の記述があるため、まとめて一つ(B1からF10)のようには
いかないです。
説明不足がありましたら、ご指摘ください。
No.1ベストアンサー
- 回答日時:
If Not Intersect(Target, Range("B1:B10")) Is Nothing Then
を
If Not Intersect(Target, Range("B1:B10,D1:D10,F3:F5")) Is Nothing Then
のように。
No.2
- 回答日時:
こんばんは、
範囲の指定の仕方ですね。
If Not Intersect(Target, Range("B1:B10")) Is Nothing Then
この意味は理解しているとして"B1:B10"が対象の範囲です。
指定方法はいくつかあるのですが、コードを書いて説明するより
多分今後も活用できる簡単な方法を提案します。
Excelにはマクロの自動記録があります。
その範囲を選択して記録すればコードが作れますので参考になります。
実は書く時に面倒な複雑な範囲のクリアーなどの場合、私は今でも使っています。(だってミスが少ないから)
A1(該当しない)セルを選択して 記録を開始して
Ctrl+で選択していきます。(これはご存知かと)
すべてを選択して記録を終了する
標準モジュールに Sub Macro?()のプロシージャが出来ます
範囲を選択したコードが出来ますので、参考にして
Range("B1:B10")の"B1:B10"部分をそっくりコピペなどで書き直すと
対象範囲がダブルクリック時に発生する処理範囲になりますね
コードはべたな範囲指定方法になりますが、Range指定の方法を覚えていくうちにべたコードを書き直せたり、サラッとかけるようになりますよ。
OffsetやResizeなどを覚えていくにしたがって色々な書き方が出来るようになると思いますが、取り敢えず記録される指定方法から覚えるのが良いと思います。
回答ありがとうございました。
Intersect関数を調べ、
Intersect(Target, Range("B1:B10"),Range("D1:D10"))Is~ のように
記述していたことが原因でした。
Range内で複数指定すれば良かったんですね。
マクロ記録なども参考に、自己解決できるように頑張ります。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルVBA 複数行にまたがっている選択を判定するには 2 2023/05/21 21:54
- Excel(エクセル) Excelについて A1からA12まで、1月〜12月と入力し、 B1からB12の範囲に、C1とD1に 4 2022/05/26 22:48
- Visual Basic(VBA) Sheet2からオートフィルターで売上日を抽出した件数をカウントし、その件数をSheet1のセルB1 2 2023/01/12 12:24
- その他(Microsoft Office) エクセルに関しての質問 2 2022/06/25 18:40
- Excel(エクセル) エクセルの数式について教えてください。 1 2023/03/21 09:46
- Excel(エクセル) 余計なお世話的な「入力規則」?対策は? 2 2023/01/14 12:39
- Excel(エクセル) エクセル 条件に合う日付に入力された時間数の合計したい 4 2022/06/17 22:18
- Visual Basic(VBA) 複数シート一括作成後に、特定範囲の数式は値で貼り付けしたい 3 2022/10/07 11:18
- Excel(エクセル) Excel VBA 空白行があるセル範囲に色を付ける 3 2022/06/13 15:58
- Excel(エクセル) 複数の同じ様式のエクセルデータの任意セルへの入力について 3 2022/04/27 15:00
このQ&Aを見た人はこんなQ&Aも見ています
-
風水の観点で選ぶ観葉植物とは?置き場所や上げたい運気ごとの注意点を紹介!
観葉植物で運気をアップするコツを、風水デザイン1級建築士の福島昌彦さんに伺った。
-
エクセルマクロ セルをクリックするたびに記号を入力
Excel(エクセル)
-
複数条件でのダブルクリック
Excel(エクセル)
-
同じシート内にイベントプロシージャが二つある時
Excel(エクセル)
-
-
4
一括でダブルクリックした状態にする方法
Excel(エクセル)
-
5
VBA セルをダブルクリック→違うセルに値をコピー
Excel(エクセル)
-
6
Excel VBA ダブルクリックで入力 複数まとめる
Visual Basic(VBA)
-
7
VBA ダブルクリックするたびにセルの色が順番に変わる
Excel(エクセル)
-
8
ダブルクリック 条件 分岐
Visual Basic(VBA)
-
9
Excelにて、セルをダブルクリックすると、数字や日付が入る。又、ユーザーフォームを表示する
Excel(エクセル)
-
10
セルをクリック⇒そのセルに入力された文字を○で囲む
Excel(エクセル)
-
11
ダブルクリックすると現在の時刻が表示されるVBA
Excel(エクセル)
-
12
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
13
エクセル マクロ クリックしたセルの内容を貼り付け
Excel(エクセル)
-
14
エクセル イベントマクロ Changeイベントを複数作りたい
Access(アクセス)
-
15
エクセルVBAでダブルクリックをしたらA列のデータが別シートに転記されるにはどうしたらよいですか?
Visual Basic(VBA)
-
16
XL:BeforeDoubleClickが動かない
その他(プログラミング・Web制作)
-
17
Excel Vbaを使って 結合セルをダブルクリックでチェックマークしたいのですが手順を教えてくださ
Excel(エクセル)
-
18
エクセルでセルをクリックすると“○”と入力
Excel(エクセル)
-
19
エクセル マクロで セルの範囲を指定する方法
Visual Basic(VBA)
-
20
エクセルマクロPrivate Subを複数にする方法
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
visual studio でインデントを...
-
エクセル マウスで選択した範...
-
テーブルリンク エクセルの4...
-
Cell内の一部を指定する方法(Wo...
-
エクセル ダブルクリック入力の...
-
画像の背景を白にしたい。
-
Wordでの範囲指定について
-
VBAを利用し、Excelの指定範囲...
-
EXCEL ボリュームゾーンごとの...
-
選択範囲の空白セルに0を入れる...
-
エクセルである行以下全部を削...
-
EXCEL VBAで全選択範囲の解除
-
Photoshop で8bit /チャンネル ...
-
白飛びした(明るい)写真をiPhon...
-
Androidのスマホで毎回毎回ホー...
-
Excel VBA あるセルでENTERを押...
-
「無」と「未」の使い方
-
Wordでドロップダウンリスト連動
-
VBAでファイルを開くときにファ...
-
マウスカーソルをレーザーポイ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
visual studio でインデントを...
-
エクセル ダブルクリック入力の...
-
エクセル マウスで選択した範...
-
テーブルリンク エクセルの4...
-
選択範囲の空白セルに0を入れる...
-
EXCELで、関数を使って対象の項...
-
エクセルのマクロで選択範囲の...
-
Cell内の一部を指定する方法(Wo...
-
セル削除右(又は下)方向にシフト
-
Wordデータの色を反転させたい
-
反転する時の色を変えたいのですが
-
EXCEL VBA----離れたセル範囲の...
-
EXCEL ボリュームゾーンごとの...
-
読み上げ機能について
-
エクセルのマクロを教えてくだ...
-
EXCEL VBAにて画像処理のアドイ...
-
Dreamweaverで「選択範囲の周囲...
-
Wordで一括範囲指定について
-
アドレスを指定して削除できる...
-
VBA 罫線を消さずに切り取り A1...
おすすめ情報