![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
以下のVBAが なぜか 2回繰り返し実行してしまう時があります。
- 必ずではありません。
どのような場合に2回実行されるのかよくわかりません。
Sub ABC()
ActiveCell.Offset(-1, 3).Activate
ActiveCell.FormulaR1C1 = "A"
ActiveCell.Offset(0, 1).Activate
ActiveCell.FormulaR1C1 = "B"
ActiveCell.Offset(0, 1).Activate
ActiveCell.FormulaR1C1 = "C"
ActiveCell.Offset(0, -4).Activate
End Sub
宜しくお願いします。
No.4
- 回答日時:
他の回答者様もおっしゃるとおり、コードは2回実行されるようになっていないと思います。
もしかしてマウスの左ボタンが調子悪くてチャタリングが発生しているのでは?
現在のマウスの左ボタン以外でクリックしてみて同じようになるかどうか試してみてはいかがでしょうか。
方法ですが、以下のようなものが考えつきます。
A.マウスを交換する
B.コントロールパネル「マウス」で左右のボタンを入れ替える
C.コントロールパネル「ユーザー補助のオプション」の「マウス キー機能」(マウスキー)を使う
(コントロールパネルはWindows XPの場合であり、他のWindowsでは異なる可能性があります。)
No.3
- 回答日時:
No.2 です。
補足を拝見しました。
では、そのボタンのプロシージャを丸ごと(Private Sub から)この補足に書き込み願います。
もちろん、差支えがなければ・・です。
No.2
- 回答日時:
こんにちは。
記載のプロシージャには問題はなく、また標準プロシージャなので呼び出し側の問題と思います。
ブレークポイントを設定してデバッグすることをおすすめします。
(参考)
http://www.moug.net/tech/exvba/0150019.html
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) サブフォルダ(データ)にある複数の.xlsxファイルのSheet3のA2セルの値で01から左側をB2 2 2022/08/14 15:46
- Excel(エクセル) エクセルマクロで教えてください 2 2022/05/04 09:07
- Visual Basic(VBA) 【VBA】写真の縦横比を変えずに貼り付ける 5 2023/06/13 11:42
- Excel(エクセル) エクセルでの左のセルのコピー 3 2022/07/25 12:31
- Visual Basic(VBA) excel VBA if文について 3 2022/03/27 17:42
- 工学 CR発振回路 C1=C2=C=0.001【uF】 R1=R2=R3=16【kΩ】 R4は出力電圧が正 2 2023/05/10 19:13
- Visual Basic(VBA) ワークブック内すべて検索 2 2022/12/20 20:13
- Visual Basic(VBA) 2つのシートの任意のセルの番号が一致したら、一致した行をコピーする VBA 2 2023/06/19 20:48
- Visual Basic(VBA) vbaでセルに入力したときに,その横にあるセルを保護し入力不可にするマクロを作りたいです。 2 2022/04/24 20:59
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2022/10/13 08:41
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教えるわが家の防犯対策術!
ホームセキュリティのプロが、家庭の防犯対策を真剣に考える 2組のご夫婦へ実際の防犯対策術をご紹介!どうすれば家と家族を守れるのかを教えます!
-
excel VBA YESNO付きのメッセージボックスが2回出てしまいます。
Excel(エクセル)
-
どこにもフォーカスを当てたくない
Access(アクセス)
-
ユーザーフォームを表示中にシートの操作をさせるには
Excel(エクセル)
-
-
4
VBAでエクセルシートを更新(リフレッシュ)する方法を教えて下さい。
Excel(エクセル)
-
5
エクセルVBA 連続してメッセージで判断
Access(アクセス)
-
6
エクセルVBA ブックを閉じる前に確認メッセージを表示したい
Excel(エクセル)
-
7
Application.ScreenUpdating = Falseが効きません
Visual Basic(VBA)
-
8
エクセルVBAで、MsgBox やInputBox は、画面の中央以外に表示させたい。
Excel(エクセル)
-
9
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
10
コンボボックスにリストが表示されません・・・
Excel(エクセル)
-
11
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
12
エクセルVBA
Excel(エクセル)
-
13
VBAのコマンドボタンの文字列の改行方法は?
Visual Basic(VBA)
-
14
メッセージを1度だけ表示したい。
Visual Basic(VBA)
-
15
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
16
worksheet_changeがループする
PowerPoint(パワーポイント)
-
17
VBAで「致命的なエラー」が出ました。どのくらい致命的なんでしょうか?
Access(アクセス)
-
18
サブフォームに対してGoToRecordするには?
その他(Microsoft Office)
-
19
Current、Openがそれぞれ2回発動する
Access(アクセス)
-
20
VBA:Openステートメントで開いたCSVファイルの特定行を削除する方法
その他(プログラミング・Web制作)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
マウスのポインタが勝手に上下...
-
マウスのクリック、指離したの...
-
マウスでの範囲指定の動きがお...
-
「丸印の中に三角のマークが上...
-
右クリックで出る「ここにコピ...
-
Excelのセルが選択できない
-
Windows10 に画面にした 端っこ...
-
キーが押されっぱなし(のよう...
-
ミッキーマウスのポインタ
-
マウスでスクロールすると画面...
-
Excelで選択セルが固定されて動...
-
マウスカーソルが反転?
-
Excel 矢印キーでセル移動し...
-
ドラッグ部分がすぐ消える
-
マウス表示が手のマークになっ...
-
キーボード操作で同意ボタンが...
-
インターネットブラウザ上で右...
-
VBA 2回実行してしまう?
-
タスクバーにマウスの電池残量...
-
選択範囲がとまりません
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
マウスのクリック、指離したの...
-
マウスのポインタが勝手に上下...
-
「丸印の中に三角のマークが上...
-
選択範囲がとまりません
-
右クリックで出る「ここにコピ...
-
マウスでの範囲指定の動きがお...
-
2画面にするとマウスポインタ...
-
キーが押されっぱなし(のよう...
-
windows10でBluetoothが急に無...
-
マウス表示が手のマークになっ...
-
Windows10 に画面にした 端っこ...
-
マウスでスクロールすると画面...
-
マウスカーソルが反転?
-
ペイントで、左クリックのまま...
-
勝手にダブルクリック?
-
ディスプレイに一部の画面しか...
-
VBA 2回実行してしまう?
-
ミッキーマウスのポインタ
-
キーボードから左クリックを入...
-
Excelのセルが選択できない
おすすめ情報