• ベストアンサー

EXCELのマクロ実行時の確認表示

SLK形式をXLS形式にして自動保存するマクロを 作りました。 このマクロをAUTO_OPENなどで実行させると 「同じファイルが有ります・・」とかなんとかで 上書きするか確認画面で出てしまいます。 いちいちOK押すのも面倒です。 このメッセージをでないようにするか 無視して自動上書きできないでしょうか?

  • dpux
  • お礼率51% (47/91)

質問者が選んだベストアンサー

  • ベストアンサー
  • ahsblue
  • ベストアンサー率58% (23/39)
回答No.1

処理の最初に Excel.Application.DisplayAlerts = False そして、処理の最後に Excel.Application.DisplayAlerts = True を追加してみてください。 確認なしで「はい」を選択したことになるはずです。

dpux
質問者

お礼

無事解決しました。 ありがとうございました!

関連するQ&A

  • xltから開いたファイルのマクロを実行したい

    "a.xls"のマクロから"b.xlt"のファイルを開くと"b1"(拡張子無し)の ファイルが開きますよね。 "b.xlt"にはauto_openのマクロが入っているのですが、この開き方では、 auto_openが実行されません。 そこで "Application.Run "b!auto_open" としてみても "Application.Run "b.xls!auto_open"としてみても、auto_openは実行されません。 一度保存しないと、xltから開いたファイルのマクロを走らせる事は不可能でしょうか?

  • エクセルで保存時に自動実行させるマクロ?

    エクセル97です。 起動時のAuto_Openや終了時のAuto_Closeのように、ファイルに保存をかけた時に自動的にマクロを実行させるにはどうしたらよいのでしょうか? フォームなどのマクロボタンで保存させるのではなく、通常に保存する場合です。 よろしくお願いします。

  • エクセルで上書保存時に自動実行するマクロって?

    Excel2000です。 ブックを開いた時に自動実行させるには、 Sub Auto_Open() で、作成すれば良いですが、 上書保存した際に、マクロを自動実行させるにはどうすれば良いのでしょうか?

  • エクセル マクロで自動実行と終了について

    エクセルで作ったマクロを自動実行・自動保存・自動終了したいので、下記のような 記述のマクロをつくり、Windowsのタスク処理で1回/日実行させようとしています。 ----<ここから>------------------------------------ Sub Auto_Open()    :   :   Workbooks("ekuseru.xls").Close SaveChanges:=True End Sub ----<ここまで>------------------------------------ 質問その1  マクロを編集したい場合はどうすればいいのでしょう?  そのBookを開くとマクロが動き出し、保存した上で終了してしまいます。  マクロ無効でBookを開くと「ツール」⇒「マクロ」⇒「マクロ」で「編集」はクリッ  クできないようになってます。 質問その2  マクロが終了するとき、Bookは閉じますがエクセル自体は閉じません。  (意味通じますか?)  エクセル自体を閉じるにはマクロの記述はどうすればいいのでしょう? 以上、よろしくお願いします。

  • マクロを上書き保存時に削除または停止させる

    エクセル2003での質問です。 Auto_Openでマクロを実行させ、上書き保存し、次に開くときはそのAuto_Openのマクロを実行しないようにしたのですが、何か良い方法はありますでしょうか? ちなみに、Auto_Openマクロでは他のファイルにリンクしている表をコピーして値のみ張付け、そのまま上書き保存してリンクをさせないようにしています。 どなたか分かる方がいらっしゃいましたら宜しくお願い致します。

  • どのファイルを開いた時もマクロを自動実行。エクセル

    新規にエクセルを開いたときだけマクロを自動実行するには、 personal.xlsで Sub auto_open() ' Macro1 Macro Range("A1").Value = "111" End Sub とすれば良いかと思いますが、 新規に開くどのファイルに対しても ファイル名ABC を含んでいる時だけ マクロを自動的に実行するにはどうしたらよいでしょうか? (ファイルを開いてから マクロボタンを押して マクロに”ファイル名を チェックしてA1にデータを書き込む”があるのはだめです。) (アドインでツールバーボタンを押すのもだめです。) エクセルは2003 OSはXPです。 説明不足でしたらすみません。

  • PowerPointからExcelのマクロを実行

    PowerPointのマクロを利用して、Excelを開く事はできたのですが、Excelのauto_openは実行されません。 ExcelであればApplication.Run "****.xls!macro"で呼び出す事ができるのですが、それに相当する事をPowerPointのマクロからやりたいのです。 ご教示いただければ幸いです。

  • Excelマクロの自動実行で新規ブックを保存せずに表示したい

    以下のようなマクロを作成しました。 これを、TEST.xls として保存し、サーバに登録しました。 これをwebサイトで <a href="TEST.xls">実行する</a> のようにして ダウンロードし実行しても、strNEWBKNM が表示されずに終了してしまいます。 auto_open をやめて、ダウンロード後に「ツール」→「マクロ」でマクロを実行すると strNEWBKNM が表示された状態で終了するのですが、 auto_open でも strNEWBKNM が表示された状態で終わらせたいです。 (保存はしたくありません。あくまで表示で終わらせたいです) どのようにしたらよいか、お分かりになる方がいらっしゃいましたら 教えてください。よろしくお願いします。 Sub auto_open() Dim strWKBKNM As String 'このブック名 Dim strNEWBKNM As String '新しいブック名 strWKBKNM = ThisWorkbook.Name '*** このブックの名前を設定 Workbooks.Add '*** 新しいブックを追加 strNEWBKNM = ActiveWorkbook.Name '*** 新しいブックの名前を設定 Sheets("Sheet1").Activate Range("A1") = "aaaaaa" Workbooks(strNEWBKNM).Activate Workbooks(strWKBKNM).Close SaveChanges:=False End Sub

  • エクセル タスクスケジューラでマクロ自動実行

    お世話になります。 win7/エクセル2010使用です。 エクセルのThisWorkbook_openでマクロを実行するファイルAを作っています。 ※Auto_Openは記述していません。 ファイルAをタスクスケジューラに設定いたしました。 問題なくマクロが自動実行されて、目的は果たしています。 ただ、不思議な点があります。 このファイルAをダブルクリックして開いても マクロは自動実行されていきます。 このファイルAをコピーして、ファイルBを作り それをダブルクリックで開くと、 ファイルBは、ブックが開いた後に、「セキュリティーの警告」がされて マクロの自動実行ができません。 通常は、「セキュリティーの警告」を出さないために Auto_Openなどでコードを記述すると思うのですが、 なぜ、Auto_Openを記述していないファイルAが自動実行されるのかがわかりません。 タスクスケジューラの設定に何か関係はあるのでしょうか? よろしくお願いします。

  • slk拡張子のエクセルファイルを保存せずに.xlsに変換するには

    slk拡張子のエクセルファイルを保存せずに.xlsに変換するには slk拡張子のエクセルファイルが開かれています。 私の勉強不足のせいかslkでマクロでピボットテーブルを実行するとエラーになってしまい それをエクセルファイル.xlsで一旦保存後、実行するとエラーにならずうまくいきます。 その為、slk拡張子のエクセルファイルを.xlsに変換したいと思います。 しかしやりたいのはデータ容量が大きいので保存せずにそのまま.slkファイルを.xlsファイルに変換したいのですがそんなマクロって出来ますでしょうか?

専門家に質問してみよう