ダブルクリックされたセル位置を取得 : Excel(エクセル)

OnDoubleClick プロパティ をセットすることで、セルをダブルクリックした場合、指定のプロシージャを呼び出すことができます。 
使用例
 ActiveSheet.OnDoubleClick = "実行されるプロシージャ名"
 Application.OnDoubleClick = "実行されるプロシージャ名"

ダブルクリックされたセル位置は、ActiveCell.Address() で取得できます。

Excel Tipsメニューに戻る

スポンサーリンク



1)イベントプロシージャを表示させる

1.VBE画面でModule1をダブルクリックします。
VBE画面

スポンサーリンク



2.コードを入力します。

'開いた時、自動的に呼び出される
Private Sub auto_open()
    'ダブルクリックすると DoDubleClick が呼び出される
    ActiveSheet.OnDoubleClick = "DoDubleClick"
End Sub

Private Sub DoDubleClick()
    Dim s1 As String

    'アクティブなセルの位置を取得
    s1 = ActiveCell.Address()
    'Excelのタイトルに表示する
    Application.Caption = s1
End Sub

3.ファイルを閉じて再オープンします。

セル内をダブルクリックすると、Excelの最上部のタイトルにセル位置が表示されます。
セル内をダブルクリック

Excel Tipsメニューに戻る

スポンサーリンク






■■■
このサイトの内容を利用して発生した、いかなる問題にも一切責任は負いませんのでご了承下さい
■■■
当ホームページに掲載されているあらゆる内容の無許可転載・転用を禁止します


Copyright (c) Excel-Excel ! All rights reserved