Excel VBA 質問スレ Part84 (114ﾚｽ)

Excel VBA 質問スレ Part84 http://mevius.5ch.net/test/read.cgi/tech/1759297002/

上下前次1-新
通常表示 512ﾊﾞｲﾄ分割 ﾚｽ栞
抽出解除 必死ﾁｪｯｶｰ(本家) (べ) 自ID ﾚｽ栞 あぼーん

---

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

102: デフォルトの名無しさん [sage] 2025/10/28(火) 19:36:17.85 ID:xLHeS3+n そうか、迂闊か そういやチャタリング・チェックできるサイトとかあるから、そこでチェックもありか http://mevius.5ch.net/test/read.cgi/tech/1759297002/102

---

ﾒﾓ帳

(0/65535文字)

---

上下前次1-新書関写板覧索設栞歴

---

ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.567s*