
VBA初心者です。
同じ書式の表(シート)が20枚以上あるBookで、各シートのDとF列に変更が有った場合自動でグラフに反映するプロシージャーを教えてもらって何とか動くようにできたのですが、これだけシートが増えてくると目次のシートが必要だと思い、シートを目次を追加して品名をクリックすると目的のシートに飛ぶようにリンクを張りました。
ところが目次のシートにもVBAが仕込んであり、これとバッティング?することが分かりました。
そこでBookモジュールのイベントプロシージャに特定のシート(目次)は動作対象外、というような設定は出来ないかと。
No.1ベストアンサー
- 回答日時:
こんにちは
>特定のシート(目次)は動作対象外、
>というような設定は出来ないかと。
可能だと思いますが、現状がどうなっているのか不明なので、はっきりとはわかりません。
以下は、全て推測によるものなので、質問者様の実際の環境とは違っている可能性があります。
「BookモジュールのVBA」というのが、
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
で設定されているのであれば、最初の1行目に
If Sh.Name = "hoge" Then Exit Sub
を追加することで、ご質問のようになると思います。
※ ”hoge” 部分には、除外したいシート名(一つだけ)を設定してください。
早々のご回答、それも推察でのご回答ありがとうございます。
当方も投稿してすぐに、実際のコードを記載するべきだったと思っていたところでした。
一発回答ですんなり解決できました!!
後追いで意味ないですが下記のコードで、元々あったsampleXのVBAのトリガーをD-F列が変更された場合、というツギハギのVBAで初心者ゆえの質問でした。
あっさり解決でした。
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Sh.Name = "品名リスト" Then Exit Sub
If (Target.Column >= 4 And Target.Column <= 6) Then
Call sampleX
End If
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルで複数のシートをフォ...
-
日産キューブのシートを交換したい
-
括弧があるとHYPERLINKで飛べな...
-
フォルツァ バッテリーを外して...
-
【マクロ】シートの変数へ入れ...
-
癒着してしまったテレビの液晶...
-
失敗したスライムの捨て方につ...
-
EXCEL VBA 複数のシートに同じ...
-
TL125のダブルシート化
-
原付 レッツシート開け方
-
エスティマのコンソールボック...
-
エクセルVBA 4行飛ばしで転記す...
-
IHクッキングヒーターの操作パ...
-
台所流しの水音を小さくしたい
-
スティードのシートのはずす方
-
スバルサンバー助手席シートを...
-
XJR400Rのシートについて
-
バイクに3段シート付けたいので...
-
【サマーランド場所取り】 テン...
-
BRIDEのシート張り替えってでき...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルで複数のシートをフォ...
-
括弧があるとHYPERLINKで飛べな...
-
IHクッキングヒーターの操作パ...
-
フォルツァ バッテリーを外して...
-
エクセルVBA 4行飛ばしで転記す...
-
シートベルトの固定解除
-
Excel複数シートから日付と文字...
-
【マクロ】シートの変数へ入れ...
-
Vba Array関数について教えてく...
-
原付 レッツシート開け方
-
BRIDEのシート張り替えってでき...
-
ポップコーンの捨て方
-
建築模型、カーブの作り方
-
水の染み込んだバイクのシート...
-
XR250BAJAのシートのはずし方を...
-
癒着してしまったテレビの液晶...
-
カッティングシートの上からア...
-
プリメーラ(P10)の"Tm""Te""...
-
PowerQuery(パワークエリ)のエ...
-
台所流しの水音を小さくしたい
おすすめ情報