| |
▼kuni さん：
おはようございます。再送です
これはApplicationのイベントを利用します。
>ダブルクリックをするとセルに色をつけたりする方法は知っているのですが、
>マクロが組み込まれていないファイルでも同様のことができないでしょうか？
>例えば、
> FileA：ダブルクリックでセルを黄色にするマクロを含む。
> FileB：マクロを含まない任意のファイル。
> としたときに、FileB中でダブルクリックをすることでFileB中の任意のセルを
> 黄色にする。ということをしたいと考えています。
> ただし、FileAとFileBは同時に開いています。
FileAというよりBookＡの
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というよりBookＢの適当なセルにて
ダブルクリックしてみてください。
勿論、BookＡの任意のセルでもダブルクリックしてみてください。
イベントが発生します。
|
|
![[未読]](./data/excel/image/read_icon.gif){kind=icon}
