Excel VBA質問箱 IV

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

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


39744 / 76732 ←次へ | 前へ→

【42096】組込inputboxを自動でキャンセルしたい
質問  雅(みやび)  - 06/8/31(木) 18:22 -

引用なし
パスワード
   初めまして。よろしくお願いします。
以下の事について質問いたします。


  For I = 3 To NOWLINE - 2 Step 1
Application.DisplayAlerts = False
   On Error Resume Next
    Cells(I, 30).Select

  ActiveCell.Value = "=IF(LEFT(" & Cells(I, 3) & ",1)=" & Chr(34) & "1" & Chr(34) & ",100,IF(LEFT(" _
中略& ")))))))"  '大費目入力
  
  Next I

上記の様なセルに順番に費目(決められた数値)を自動入力するループで、
「合計行が複数あります範囲していしてください」
と組込ダイアログボックスが出ます。
ひたすらキャンセルボタンを押し続けると、(費目入力行回数終了後)マクロ完了して期待した入力は完成されています。
この途中で出るダイアログボックスは、2000のバージョンではでなかったので、解らなくなっています。
ひたすらキャンセルボタンを自動的に押す事はできますでしょうか?
教えてください。
0 hits

【42096】組込inputboxを自動でキャンセルしたい 雅(みやび) 06/8/31(木) 18:22 質問
【42098】Re:組込inputboxを自動でキャンセルしたい Ned 06/8/31(木) 22:20 発言
【42099】Re:組込inputboxを自動でキャンセルしたい Ned 06/8/31(木) 23:11 発言
【42109】Re:組込inputboxを自動でキャンセルしたい 雅(みやび) 06/9/1(金) 12:23 お礼
【42106】Re:組込inputboxを自動でキャンセルしたい ハト 06/9/1(金) 11:14 発言

39744 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free