エラーなしでmenuに戻るには

解決

VBビギナー 2008-05-10 18:38:35 No: 100699

１つのエクセルbookにsheeteを20ケ作成しsheet1をmenu 2〜20を作業ファイルで作成、ハイパーリンクで飛ばした処、サイズが3MBを超え遅くて使えません。そこで、１〜２０をそれぞれ別bookにて作成しmenuを開き"wookbooks.open"命令で別bookに飛ばし別bookでの作業終了時に作成したコマンドボタンにて"ActiveworkBook.save"にて上書き、menuに戻るため
"wookbooks.open"にてmenuを指定したのですが"menuが開いているため二重に開くとこれまでの変更内容が破棄されます"とエラーメッセージが出てしまいます。１つのコマンドボタンを押してエラー無しにmenuに戻る方法をご教授下さい。

やじゅ 2008-05-11 07:09:24 No: 100700

回答が付かないのは、質問の意味が良くわからないからです。
menuってどこを指しているのかとかね

まさやん 2008-05-11 07:20:08 No: 100701

DisplayAlertプロパティを調べてみて下さい。

LESIA 2008-05-11 20:26:28 No: 100702

menuというのが、すでに開いているブック"menu.xls"を指しているなら
Workbooks("menu.xls").Select

VBビギナー 2008-05-13 02:04:16 No: 100703

Workbooks("menu.xls").Selectを使い無事に動きました。

要領の悪い書き込みで申し訳有りませんでした。

VBビギナー 2008-05-13 02:04:18 No: 100704

Workbooks("menu.xls").Selectを使い無事に動きました。

要領の悪い書き込みで申し訳有りませんでした。