[[20140615091632]]　『マクロ有りブックをマクロ無効で開く』（田吾作）　ページの最後に飛ぶ

『マクロ有りブックをマクロ無効で開く』（田吾作）

 マクロ有りブックのマクロを編集するために、Shiftキーを押しながらブックを開くとマクロ無効
 で開けると思うのですが、すでに他のブック(ブックAとします)が開いている状態でマクロ有り
 ブック(ブックBとします)をShiftキーを押しながらブックを開くとブックBのマクロが作動してし
 まいます。

 ブックAがマクロを含んでいても含んでいなくても、また、ブックAをマクロ無効で開いていた場合
 でもブックBのマクロが作動してしまいます。

 マクロ有りブックから他のマクロ有りブックを

 Function macromukou(ByVal fpath As String)
  Dim xl As Object
   If UCase(FSO.getextensionname(fpath)) Like "XL*" Then
      Set xl = CreateObject("Excel.application")
      xl.AutomationSecurity = msoAutomationSecurityForceDisable
      xl.Workbooks.Open Filename:=fpath
      xl.Visible = True
      xl.AutomationSecurity = msoAutomationSecurityByUI
      Set xl = Nothing
  End If
 End Function

 とマクロ無効で開くことは出来ます。
 手作業でブックを編集しているときに手軽にマクロ無効でブックを開きたい時が不便です。
 すでに他のブックが開いているときに手作業でマクロ有りブックをマクロ無効で開く方法をご存知の
 方、ご教示お願いいたします。

＜使用 Excel：Excel2007、使用 OS：WindowsVista ＞

ファイルアイコンではなく「ファイルを開く」ウィンドウから
Shiftを押しながら開くとご希望の動作になるかと思われます

それとは別に、コードの編集が目的ならAlt+F11は如何でしょうか
（すし） 2014/06/16(月) 03:47

 すしさん、ご回答ありがとうございます。

 >「ファイルを開く」ウィンドウから 
 >Shiftを押しながら開くとご希望の動作になるかと思われます

 この方法ですと、該当のブックに行きつくまで辿るのに時間がかかってしまいました。

 >それとは別に、コードの編集が目的ならAlt+F11は如何でしょうか

 この方法を試しましたが、ブックを開くことはできませんでした。
 手順は、
 該当のブックのアイコンをクリックしてアクティブにした状態で
 Alt+F11
 としました。
 手順が間違っているのでしょうか？
（田吾作） 2014/06/16(月) 22:18

説明が足りずすみません。
Alt+F11はコード編集画面を開くショートカットです。
コード編集したいブックを開いた状態でAlt+F11を押せば
ボタンをダブルクリックしたりせずにコード編集できます。
ショートカットを使えばマクロ有効・無効に左右されず、
手軽にコード編集できるはずです。
（すし） 2014/06/20(金) 09:37

 すしさん、ご回答ありがとうございます。

 当該ブックにはブック起動時に作動するマクロが
 設定してあります。

 そのマクロを作動させずにブックを開きたいのです。

 他にブックが開いていない状態ですと、
 Shiftキーを押しながらブックを開くとマクロ無効で開けるのですが、
 すでに他のブックが開いている状態ですと、Shiftキーを押しながら
 ブックを開いてもマクロが作動してしまうのです。

 今回お聞きしたいのはVBAの編集の仕方ではありません。
 マクロを無効にしてブックを開く方法です。
（田吾作） 2014/06/20(金) 10:22

 最初からセキュリティーセンターの設定を
 「警告を表示してすべてのマクロを無効にする」
 にしておけばいいんじゃないでしょうか？
 必要があれば有効にする。

 むしろ、そうするべきだと考えますが・・・。

 それすら手間だとしたら、いっそファイルの一覧をシート上に展開して、セルクリックイベント
 に先ほどのコードを入れたらいかがですか？
http://www.asahi-net.or.jp/~ef2o-inue/vba_o/sub05_110_080.html

（稲葉） 2014/06/20(金) 13:03

 稲葉さん、ご回答ありがとうございます。

 >最初からセキュリティーセンターの設定を
 >「警告を表示してすべてのマクロを無効にする」
 >にしておけばいいんじゃないでしょうか？
 >必要があれば有効にする。

 ほとんどのブックにマクロを記述しており、また、マクロ有りブックから他のマクロ有りブックを
 呼び出したりしていますので、通常マクロを無効にしておく、という運用は難しいです。

 >それすら手間だとしたら、いっそファイルの一覧をシート上に展開して、セルクリックイベント
 >に先ほどのコードを入れたらいかがですか？

 複数のフォルダを開いてマクロを編集してマクロを手動でコピーして他のブックのVBEに貼り付け
 たりしていますのでファイル一覧をシートに書き出して、というのも出来なさそうです。

 当初の
 > すでに他のブックが開いているときに手作業でマクロ有りブックをマクロ無効で開く方法
 はなさそうですので、デスクトップ上に、ドラッグ＆ドロップしたブックをマクロ無効で開く
 VBSを配置しておくことにします。

 いろいろご提示いただきましたすしさん、稲葉さん、ありがとうございました。
（田吾作） 2014/06/20(金) 23:22

コメント返信：

[ 一覧(最新更新順) ]

[[20140615091632]] 『マクロ有りブックをマクロ無効で開く』（田吾作） ページの最後に飛ぶ

[[20140615091632]]　『マクロ有りブックをマクロ無効で開く』（田吾作）　ページの最後に飛ぶ