Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
25731 / 76732 ←次へ　｜　前へ→
【56339】Re:ダブルクリックの影響範囲？
発言  Yuki  - 08/6/14(土) 8:15 -
引用なし
パスワード
   ▼takao さん：
こんにちは。

>ダブルクリックの変な動きで悩んでいます。
確認出来ました。

回避策として
標準モジュールに
public Flg as boolean

シートモジュールに
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
　　Cancel = True
　　Flg = True
　　UserForm1.Show 0
End Sub

フォームモジュールに
Private Sub ListBox1_Click()
　　If Flg Then
　　　　Flg = False
　　　　Exit Sub
　　End If
　　ActiveCell.Value = Me.ListBox1.Text
　　Unload Me
End Sub

でどうでしょう。
1 hits
▼ 【56337】ダブルクリックの影響範囲？ takao 08/6/14(土) 0:48 質問
【56339】Re:ダブルクリックの影響範囲？ Yuki 08/6/14(土) 8:15 発言≪
【56342】Re:ダブルクリックの影響範囲？ takao 08/6/14(土) 9:10 お礼
【56343】Re:ダブルクリックの影響範囲？ kanabun 08/6/14(土) 9:24 発言
【56344】Re:ダブルクリックの影響範囲？ takao 08/6/14(土) 9:46 お礼
【56347】Re:ダブルクリックの影響範囲？ kanabun 08/6/14(土) 10:51 発言
【56360】Re:ダブルクリックの影響範囲？ ｂｙｋｉｎ 08/6/15(日) 1:02 発言
【56346】Re:ダブルクリックの影響範囲？ Yuki 08/6/14(土) 10:44 発言
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
25731 / 76732 ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free