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

解決

VBビギナー  2008-05-10 09:38:35  No: 100699  IP: 192.*.*.*

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

編集 削除
やじゅ  2008-05-10 22:09:24  No: 100700  IP: 192.*.*.*

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

編集 削除
まさやん  2008-05-10 22:20:08  No: 100701  IP: 192.*.*.*

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

編集 削除
LESIA  2008-05-11 11:26:28  No: 100702  IP: 192.*.*.*

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

編集 削除
VBビギナー  2008-05-12 17:04:16  No: 100703  IP: 192.*.*.*

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

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

編集 削除
VBビギナー  2008-05-12 17:04:18  No: 100704  IP: 192.*.*.*

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

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

編集 削除