Excel VBA 質問スレ Part84 (114ﾚｽ)
Excel VBA 質問スレ Part84 http://mevius.5ch.net/test/read.cgi/tech/1759297002/
上
下
前
次
1-
新
通常表示
512ﾊﾞｲﾄ分割
ﾚｽ栞
1: デフォルトの名無しさん [sage] 2025/10/01(水) 14:36:42.66 ID:lecUwKjm ExcelのVBAに関する質問スレ コード書き込みや作成依頼もOK 次スレは>>980が立てること 無理なら細かく安価指定 ※前スレ Excel VBA 質問スレ Part83 https://mevius.5ch.net/test/read.cgi/tech/1749348402/ http://mevius.5ch.net/test/read.cgi/tech/1759297002/1
95: デフォルトの名無しさん [sage] 2025/10/19(日) 10:59:45.64 ID:/YxBx4q/ テキストボックスのイベントでExitにIMEを元に戻す記述を書く https://www.javadrive.jp/excelvba/userform/index93.html sheet上でも出来るとは まぁ、知らん奴が使ったらヒステリー起こしそうだが https://infith.com/system/excel/ime_validation/ http://mevius.5ch.net/test/read.cgi/tech/1759297002/95
96: デフォルトの名無しさん [sage] 2025/10/28(火) 09:16:29.14 ID:Kk67eWAx Worksheet_BeforeRightClickを素早いクリックに反応させる方法ってありますか？ 例えば右クリックでカウントアップするような場合、ゆっくりクリックしないと取りこぼすので、それをできるだけ軽減したいという話です http://mevius.5ch.net/test/read.cgi/tech/1759297002/96
97: デフォルトの名無しさん [sage] 2025/10/28(火) 11:49:26.91 ID:BUlcRJ6d >>96 ワークシートのイベントはどれも動作が遅い 透明なオートシェイプをセルの上に重ねて、オートシェイプのClickイベントを使えば16連射も可能になる ただし右クリックでは動作しない http://mevius.5ch.net/test/read.cgi/tech/1759297002/97
98: デフォルトの名無しさん [sage] 2025/10/28(火) 13:00:23.09 ID:NppxA0uZ >>96 素早いクリックがダブルクリックと判定されてるかもね http://mevius.5ch.net/test/read.cgi/tech/1759297002/98
99: デフォルトの名無しさん [sage] 2025/10/28(火) 16:30:11.08 ID:xLHeS3+n そんなに連打が必要な業務なのかわからんけど マウスも一枚岩じゃ無いから(個体によって性能違ったり、有線無線で変わるかも知らんし) ユーザーフォームとかにオプションボタン並べて、○1 ○5 ○10 ○25 ○50 ・・とかを事前に選択してから 右クリさせるのはどうか 二度手間三度手間が嫌だとクレーム来るのとトレードオフに成るが Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean) Cancel = True ' Prevents the default right-click menu Application.ScreenUpdating = False ' Turn off screen updating ' Your optimized code here, e.g., displaying a custom menu or performing actions ' ... Dim i As Integer For i = 0 To 100 ' ステータスバーの表示が更新されない場合は、コメントをはずす 'DoEvents ' ステータスバーに出力 Application.StatusBar = "処理回数：" & i Next ' ステータスバーのクリア 'Application.StatusBar = False Application.ScreenUpdating = True ' Turn screen updating back on End Sub その辺で拾った野良のコードの合体モンだけど、回数：100にするのも一瞬なんだし http://mevius.5ch.net/test/read.cgi/tech/1759297002/99
100: デフォルトの名無しさん [] 2025/10/28(火) 18:40:17.09 ID:k7xgJ8GR そもそも右クリック連打が必要な設計を見直したほうが早いんじゃね http://mevius.5ch.net/test/read.cgi/tech/1759297002/100
101: デフォルトの名無しさん [sage] 2025/10/28(火) 19:08:25.22 ID:HpHj+cai よく読め、連打が必要な訳じゃないと思うぞ 俺も似たような問題にぶち当たったことがあるから言いたいことは分かる 俺の場合はユーザーフォームだったからなんとでもやりようがあったけど、シートイベントでどうすべきかは思い付かんなぁ ユーザーフォームなり透明オブジェクトなりで代用できそうか考えてみるのは大事かもな http://mevius.5ch.net/test/read.cgi/tech/1759297002/101
102: デフォルトの名無しさん [sage] 2025/10/28(火) 19:36:17.85 ID:xLHeS3+n そうか、迂闊か そういやチャタリング・チェックできるサイトとかあるから、そこでチェックもありか http://mevius.5ch.net/test/read.cgi/tech/1759297002/102
103: デフォルトの名無しさん [sage] 2025/10/28(火) 20:59:15.35 ID:WbU161W5 >>101 ダブルクリック判定にひっかかってるのかもしれんが、ユーザーフォームも単純な連打はうまく処理できない http://mevius.5ch.net/test/read.cgi/tech/1759297002/103
104: デフォルトの名無しさん [sage] 2025/10/28(火) 21:36:11.37 ID:uh3txXo7 要はこれっしょ VBA フォームのボタンの反応が遅い理由と対策 - t-hom’s diary https://thom.hateblo.jp/entry/2017/12/07/215055 これと同じようなことをワークシート右クリでやりたいってことやろ？ ワークシートだと安易に左クリックにはできない事情もあったりするし、こういう感じでフォームとかで代用できないか検討してみたら？ http://mevius.5ch.net/test/read.cgi/tech/1759297002/104
105: デフォルトの名無しさん [sage] 2025/10/28(火) 21:48:56.73 ID:xheP7Ub+ レス遅れてすみません！ まさに>>104さんの言う通りです！ より具体的に言うと５種類の値から選ばせたくて右クリックで順繰り変更するマクロを作ってたんですが、例えば４番目の値を選びたいときなんかに慣れてくるとどうしても「ｶﾁｶﾁｶﾁｶﾁ」って押してしまって反応が悪いと言われたのでどうにかしたくて 反応が悪いで済めばまだいいけど、それで間違った値のまま提出されたりすると困るのだ http://mevius.5ch.net/test/read.cgi/tech/1759297002/105
106: デフォルトの名無しさん [sage] 2025/10/28(火) 21:49:30.45 ID:xheP7Ub+ 困るのだ じゃなくて 困るので です！！ http://mevius.5ch.net/test/read.cgi/tech/1759297002/106
107: デフォルトの名無しさん [] 2025/10/28(火) 21:57:34.33 ID:DelTjWwd バカボンのパパ(´^ω^) http://mevius.5ch.net/test/read.cgi/tech/1759297002/107
108: デフォルトの名無しさん [sage] 2025/10/28(火) 22:41:09.17 ID:wDWtv1wu >>105 マウスじゃなくキーボードでトグルしていくUIはいかが？ こんなの（INSキーでA1セルの値が増える） Sub Init() Application.OnKey "{INSERT}", "ThisWorkbook.OnKey_Ins" End Sub Sub OnKey_Ins() Range("A1").Value = Range("A1").Value + 1 End Sub http://mevius.5ch.net/test/read.cgi/tech/1759297002/108
109: デフォルトの名無しさん [] 2025/10/29(水) 02:29:29.22 ID:SoMHk0As 馬鹿は馬鹿な頭で考えた馬鹿な方法に固執する例 http://mevius.5ch.net/test/read.cgi/tech/1759297002/109
110: デフォルトの名無しさん [] 2025/10/29(水) 06:43:39.82 ID:0NTgZ+aL これでいいのだ http://mevius.5ch.net/test/read.cgi/tech/1759297002/110
111: デフォルトの名無しさん [] 2025/10/29(水) 06:46:48.28 ID:0NTgZ+aL >>109 この人カバの逆立ちなのだ http://mevius.5ch.net/test/read.cgi/tech/1759297002/111
112: 96 [sage] 2025/10/29(水) 07:39:58.02 ID:K2GlQHDP 代案ありがとうございます！ やはり何かしらの大体策を考えるしかないですかね 右ダブルがキャッチできれば解決するんだけどなぁ http://mevius.5ch.net/test/read.cgi/tech/1759297002/112
113: デフォルトの名無しさん [sage] 2025/10/29(水) 18:26:50.09 ID:GMHlOV3c カバは逆立ちしてもカバなのだ http://mevius.5ch.net/test/read.cgi/tech/1759297002/113
114: デフォルトの名無しさん [] 2025/10/30(木) 03:56:51.64 ID:k5qTIKM4 【高市自民】自維連立に衝撃 維新トップに赤旗砲「重大疑惑」２千万円絡む疑惑と 共産党Ｘが「だから裏金自民党とも組めるのか」と攻撃 説明求める声 https://news.yahoo.co.jp/articles/89adcdb576a46579b90da08ae8924ad11c08b470 http://mevius.5ch.net/test/read.cgi/tech/1759297002/114
ﾒﾓ帳
(0/65535文字)
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
ｽﾚ情報
赤ﾚｽ抽出
画像ﾚｽ抽出
歴の未読ｽﾚ
AAｻﾑﾈｲﾙ
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.575s*