No.2ベストアンサー
- 回答日時:
こんにちは、
勘違いかも知れませんが、ワークシートのダブルクリックイベントを呼ぶ事を
考えているのでしょうか?
であれば、適切な処理とは思えません。
イベントを呼ばずとも処理したいコードを別プロシージャに書けばよいかと思います。
むしろ、こちらをメインにしてダブルクリックイベントからもこのプロシージャを呼び出せばよいと思います。
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True
Dim dummy As Variant
Call Module2.Sample(dummy) 'Targetを使用するなら引数に食われることも可能です。
End Sub
Private Sub Test()
Dim dummy As Variant
Call Module2.Sample(dummy)
End Sub
Module2に記載
Public Sub Sample(dummy As Variant) ’ダミー引数があるのでユーザーに表示されない。
MsgBox ("OK") 'メイン処理
End Sub
複数のモジュール間でプロシージャを実行する事はよくあると思います。
Publicはオブジェクト名を明示する事で呼び出せても
Privateは同じモジュール内でなければ呼べないかと、、
しかしPublic sub をユーザー(リボンなどから)から実行できないようにする場合
引数を付ければリボンなどには表示されなくなります。引数は、ダミーで良いので簡単です。
せっかく作ったイベント処理を活用しよとムキになってました。だいぶ頭が固くなって回転、機転が利かなくなた、、、。
「イベントを呼ばずとも処理したいコードを別プロシージャに書けばよい」の一言に「我にかえりました。」ありがとうございます。
パンチのきいた一言に感謝します。時間節約になりました。
ありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
ちょっと先の未来クイズ第2問
9月9日(月)に発表される「第3回子どもマネー川柳」に入賞する川柳を考えてこちらに投稿してください。
-
フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
あなたが普段思っている「これまだ誰も言ってなかったけど共感されるだろうな」というあるあるを教えてください
-
映画のエンドロール観る派?観ない派?
映画が終わった後、すぐに席を立って帰る方もちらほら見かけます。皆さんはエンドロールの最後まで観ていきますか?
-
海外旅行から帰ってきたら、まず何を食べる?
帰国して1番食べたくなるもの、食べたくなるだろうなと思うもの、皆さんはありますか?
-
天使と悪魔選手権
悪魔がこんなささやきをしていたら、天使のあなたはなんと言って止めますか?
-
VBA(エクセル)で自動的にボタンをクリックさせるには
その他(プログラミング・Web制作)
-
エクセル マクロ 標準モジュールのマクロから、シートモジュールのマクロを呼び出す
Excel(エクセル)
-
Private Sub内でSubをCallしたい
その他(プログラミング・Web制作)
-
-
4
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
5
Excel vbaで別ブックのコマンドボタンをクリック
Visual Basic(VBA)
-
6
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
7
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
8
メッセージボックスのOKボタンをVBAでクリックさせたい
Visual Basic(VBA)
-
9
メッセージボックスに表示する文字を大きくしたい
Excel(エクセル)
-
10
VBAでfunctionを利用しようとしたときに「引数は省略できません」というエラーが出ます
Visual Basic(VBA)
-
11
エクセルVBA 配列からセルに「関数式」を一気代入したい
Visual Basic(VBA)
-
12
Application.Runエラー(1004)
Excel(エクセル)
-
13
他のフォームから別のフォームのサブルーチンを呼び出す
Visual Basic(VBA)
-
14
プロシージャからイベントをコールする
Visual Basic(VBA)
-
15
VBAでエクセルシートを更新(リフレッシュ)する方法を教えて下さい。
Excel(エクセル)
-
16
Application.ScreenUpdating = Falseが効きません
Visual Basic(VBA)
-
17
Sub ***( ) と Private Sub ***( ) の違い
Visual Basic(VBA)
-
18
Accessのマクロでモジュールを実行させたい。
Access(アクセス)
-
19
エクセルのエラーメッセージ「400」って?
Visual Basic(VBA)
-
20
VBAで別モジュールへの変数の受け渡し方法
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
IF文に時間(何時から何時ま...
-
【C#/Java?】try-catchでcatch...
-
private subモジュールを他のモ...
-
vbaのエラー対応(実行時エラー...
-
【C#】Page_Loadさせない方法に...
-
Functionで戻り値を複数返す方法
-
Word VBA。各マクロの間に待ち...
-
シェルスクリプトでファイル内...
-
VB6にてネットワーク上にある共...
-
シグナル 6(SIGABRT)とは?
-
LoadPicture のオートメーショ...
-
エクセル VBAで複数セル選択時...
-
VBA プログレスバー
-
【Vb.net】プリンタジョブの取得
-
特定の名前のオートシェイプの...
-
VCでビープ音を鳴らし続ける
-
For ~ Next文
-
ストアドプロシージャの処理終...
-
ASP.netにて質問です。
-
【VB2005】タイマーイベント
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
【C#/Java?】try-catchでcatch...
-
vbaのエラー対応(実行時エラー...
-
IF文に時間(何時から何時ま...
-
private subモジュールを他のモ...
-
特定の名前のオートシェイプの...
-
どう増強すべきか
-
Excelプロセスが消えない
-
シグナル 6(SIGABRT)とは?
-
マクロで、次のコードへ行く前...
-
特定のファイルを他のプロセス...
-
エクセル VBAで複数セル選択時...
-
Excel VBA セルの名前があるか...
-
順番に処理させたい
-
ExcelのVBAで、選択したファイ...
-
VB6にてネットワーク上にある共...
-
【C#】Page_Loadさせない方法に...
-
Word VBA。各マクロの間に待ち...
-
ListViewから選択中の文字列を取得
-
【Vb.net】プリンタジョブの取得
-
VBA 複数の行を高速で削除する...
おすすめ情報
質問が不透明ですみません。補足させていただきます。
ワークシートのイベントでは、ダブルクリック時
Private Sub Worksheet_BeforeDoubleClick(ByVal target As Range, Cancel As Boolean)
のように変数targetが引数として使用されます。ダブルクリックをトリガーとして記述した処理の実行となりますが、マウスクリックした特定のセルを対象としての処理を期待します。
質問は、同じシート上のA1~A9のセルを連続してダブルクリックイベントの処理を実行したいとき他のモジュールから
Private Sub Worksheet_BeforeDoubleClick()を使う方法を教えて頂くことを期待しています。
よろしく願いします。