• ベストアンサー

Excel起動時にAuto_Openでマクロを動作させています。

hige_082の回答

  • ベストアンサー
  • hige_082
  • ベストアンサー率50% (379/747)
回答No.2

一例です Sub auto_open() If ThisWorkbook.Name = "Book1" Then Call 処理 End If End Sub sub 処理() auto_openにあった処理をこっちへ移動する end sub の様にして If ThisWorkbook.Name = "Book1" Then この行に、最初のファイル名を記入しておき判断させ ファイル名が変わったら"処理"マクロは実行されない 参考まで

関連するQ&A

  • マクロ auto_open がうまくゆかない

    マクロで たとえば auto_open()  Sheets("sheet1").select というように編集しても ファイルをオープンした時全然このマクロ自体が有効にならず、手動で、「セキュリティの警告 マクロが無効にされました オプション」 となっている「オプション」をクリックしてはじめて sheet1 が自動表示されます。 AUTO_ OPEN はファイルを開いた時に即有効になるんではないかと思いますが、どうしてでしょうか。

  • マクロ Auto_Openがうまく動きません

    マクロ Auto_Openについてお伺いします。 エクセル立ち上げ時IMEは半角英数になっており、手動でひらがな入力にしますが、 そこである雑誌を見ると Sub Auto_open () Send Keys ("{Kanji}") End Sub のマクロを組み込めば立ち上げ時日本語入力になるとのこと XPの時はこれで問題なかったように記憶しております。 しかしwindows7になるとうまく働きません。ステップINで確認すると、確かに日本語入力に変わりますが、エクセル立ち上げ時、自動的に変わりません。なぜなのでしょうか。 windows7の場合OSか何か変わったのでしょうか? なんとかwindows7でエクセル立ち上げ時、自動的に日本語ローマ字入力にしたいのですが、 どちら様か良い知恵をアドバイスお願いいたします。

  • アクセスでauto_openは使えない?

    エクセルの場合は、ブックを開いたと同時にマクロを実行させたい時は、 auto_openと言うマクロを標準モジュールに作れば可能ですが、 アクセスVBAの標準モジュールに、auto_openというプロシージャーを作って、 アクセスを再起動しても何も起こりません。 アクセスにおいて ファイルの起動と同時にマクロを実行させたいのなら、 どこかのフォームのOpenイベントに実行させたいコードを記載して、 起動時の設定で、そのフォームを選択するしかないのでしょうか?

  • エクセル起動時に、オートオープンマクロでもう一つのエクセル(以下『マス

    エクセル起動時に、オートオープンマクロでもう一つのエクセル(以下『マスタ情報』と表示)が 連動して起動するように設定をしているのですが、この『マスタ情報』のエクセルが起動している 事実をユーザーに秘密にしておく設定は可能でしょうか?(保存先を知らせたくないためです)  ActiveWindow.Visible = False 『マスタ情報』のエクセルをアクティブにして上記のマクロ構文を付け加えれば確かにウィンドウが 非表示にはなるのですが、ユーザーにツール『ウィンドウ』の『再表示』メニューをクリックされて しまうと、せっかく非表示にした『マスタ情報』のエクセルが再表示されてしまいます。  Sheets(1).Visible = xlVeryhidden ユーザーに再表示させたくない対象のオブジェクトがシートの場合であれば、上記のマクロ構文で 解決できるのですが・・・  ActiveWindow.Visible = xlVeryhidden 上記マクロ構文を試してみたところ、エラーは発生しなかったのですが『マスタ情報』のエクセルは 非表示に設定されることなくマクロの処理が終了してしまいました。ブック(ウィンドウ)を完全に 非表示にする方法をご存知の方、是非教えて頂けますよう宜しくお願いします。

  • Auto_Openマクロ

    Excel2003のマクロで、 Sub Auto_Open() ActiveSheet.DisplayAutomaticPageBreaks = True End Sub としているのですが、起動時に開くシートにしか適用されません。 ページが増えていくのでブック内の全シートに適用するにはどうしたらいいでしょうか?

  • Auto_Open シフトキーの無効

    マクロを有効時にシフトキーを押しながらマクロを有効にするを押すと Auto_Openの処理が動きません(仕様)  逆に、シフトキーを押されてもAuto_Openの処理等のマクロを実行させる方法はありますか? あれば、教えてください。 使用するエクセルは、Excel2003以上で使用します。

  • EXCELアドイン自動起動マクロ

    アドインに登録し、不特定のCSVファイルを読み込んだとき(OPENしたとき)に内容を判別し、起動するマクロを作成しようとしています。 標準モジュールに”Sub Auto_Open()”により記述し、アドイン登録しましたが、期待する動作となりません。 ----------------------------- Sub Auto_Open() MsgBox "ファイルが開く毎に起動させたい" End Sub ----------------------------- ☆EXCEL未起動→ファイルオープンしたときには、上記MsgBoxが表示されるが、EXCEL起動中→ファイルオープンでは表示されません。 ファイルを開くたびに動作するマクロを登録するためには、どのようなテクニックが必要なのでしょうか?

  • マクロを組んだエクセルの動作が遅い

    OS: Windows 2000 マクロを組んだエクセルの動作が非常に、異常に遅いのです。 マクロを組んでいないエクセルはすぐに起動でき、すぐに印刷、終了ができるのですが、 マクロを組んでいるエクセルは起動するのに1~2分、印刷も終了も同じく遅いのです。 また、マクロを組んでいるエクセルを開く際に、タスクマネージャでCPU使用率を見て みると、必ず100%になっているんです(マクロを組んでないものは100%までいかない)。 日に日に動作が遅くなっているように感じ、とても困っています。 ご教授ください。m(__)m

  • マクロの自動オープンの方法を教えて下さい

    エクセルAのマクロAでエクセルBをオープンした時にエクセルBのマクロBをオープンする方法を教えて下さい。(マクロBをAuto_Openにしてもオープンしません)

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

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