|
▼ichinose さん:
朝早くから回答ありがとうございます。
教えていただいた記述を使用することで、
意図したとおりのことが出来ました。
ありがとうございました。
>▼kuni さん:
>おはようございます。再送です
>これはApplicationのイベントを利用します。
>
>>ダブルクリックをするとセルに色をつけたりする方法は知っているのですが、
>>マクロが組み込まれていないファイルでも同様のことができないでしょうか?
>>例えば、
>> FileA:ダブルクリックでセルを黄色にするマクロを含む。
>> FileB:マクロを含まない任意のファイル。
>> としたときに、FileB中でダブルクリックをすることでFileB中の任意のセルを
>> 黄色にする。ということをしたいと考えています。
>> ただし、FileAとFileBは同時に開いています。
>FileAというよりBookAの
>
>Thisworkbookのモジュールに
>'=============================================================
>Option Explicit
>Private WithEvents app As Application
>Sub 設定()
> Set app = Application
>End Sub
>'========================================================================
>Private Sub app_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
> MsgBox Sh.Parent.Name & "の" & Sh.Name & "の" & Target.Address & "でダブルクリックされました"
>End Sub
>
>として、一度だけ
>ThisWorkbook.設定を実行後、FileBというよりBookBの適当なセルにて
>ダブルクリックしてみてください。
>
>勿論、BookAの任意のセルでもダブルクリックしてみてください。
>
>イベントが発生します。
|
|