• ベストアンサー

ブックの切り替えをする方法

条件を指定して、ブックの切り替えをする方法についてお聞きします。 現在をブックをBook1とし、もう一方のブックをBook2とします。 現在Book1がActiveになっていればBook2に切り替え、Book2がActiveになっていればBook1に切り替えるようにしたいのですが、どのような方法がありますか。 例えば、 Windows("Book1").Activate このような方法を考えたのですが、この方法ですと他のBookからBook1にしか切り替えることが出来ません。 ご回答宜しくお願いします。

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

  • ベストアンサー
  • watabe007
  • ベストアンサー率62% (476/760)
回答No.1

>現在Book1がActiveになっていればBook2に切り替え、Book2がActiveになっていればBook1 If ActiveWorkbook.Name = "Book1" Then   Workbooks("Book2").Activate ElseIf ActiveWorkbook.Name = "Book2" Then   Workbooks("Book1").Activate End If

di6351
質問者

お礼

ご回答ありがとうございます。 どちらのBookからも、もう一方のBookに切り替えることが出来ました。 是非使ってみたいと思います。

全文を見る
すると、全ての回答が全文表示されます。

関連するQ&A

  • Excelで画面切り替えを抑制できないでしょうか?

    Excelで、一方のブックから他のブックにデータを転載するマクロを作っています。 一方のブックの一行を見ては、該当する他のブックのシートに書き込んでいるので、画面がチラチラして大変です。また処理速度も遅くなっていると思います。 画面の切り替えが起きないようにする方法は無いでしょうか? ちなみに今は、Windows(sFname).Activate でブックの切り替えを行っています。

  • ブックを順番に切り替える方法

    複数開いているブックを、名前の指定はせずに順番に切り替える方法が分からずに困っています。 例えば、Book1、Book2、Book3を繰り返して切り替える等です。 どのような方法がありますか。 ご回答宜しくお願いします。

  • マクロ 別のブックを指定。

    エクセルマクロで特定の文字を含んだファイルを指定したいのですが、 ファイル名がその都度、book1,book2,book3,のように変わります。 Range("a1").Select Windows("Book10").Activate Range("a10").Select End Sub このような記述だと、book10にしか指定できず、bookを含むファイルを指定したいのですが どのようにしたらよろしいのでしょうか。 開いているbookを含むファイルは1ファイルのみです。                宜しくお願いいたします。

  • Excel VBAで他のブックを選択する方法を教えてください。

    こんにちは。VBA初心者です。 ブックを2つ開いた状態で、 マクロを保存してあるブック〔Book1〕から、 毎回ブック名が異なる[Book2]の選択されている2枚のシートを新しいブックに(仮Book3)コピーしたいのですが、どのように記述したらよいのでしょうか。(選択されるシートも毎回異なります。) 特に教えていただきたい部分は、 1.マクロが記録されているBOOK1以外のBookを操作する方法。 2.私以外の方が利用する為、Book1に保存したマクロから実行させる予定なのですが、Book1を毎回開いて実行させる方法がベストのやり方なのでしょうか。 マクロの記録では下記の感じになります。 Sub Macro4() Windows.Arrange ArrangeStyle:=xlVertical Windows("Book2.xls").Activate Sheets(Array("Sheet3", "Sheet4")).Select Sheets("Sheet4").Activate Sheets(Array("Sheet3", "Sheet4")).Copy End Sub 宜しくお願い致します。

  • Book間の移動

    Excel VBA でBook2にシートを移動した後、元のBook1に自動で戻る VBAを教えたください。 Sub シートを移動する() Windows("Book1.xls").Activate Sheets(エリカ).Select Sheets(エリカ).Move After:=Workbooks("Book2").Sheets(1) このあとBook1に戻りたい! End Sub

  • エクセル2010で複数のbookを切り替え

    エクセル2010を使っています。(OSはXPです。) 一度に複数のbookを開いて仕事をすることが多いです。、 2003の時はbook毎にタスクバーにタブが出てきたのですが 2010では、エクセルのタブ1つだけで、別のbookに切り替える場合は、 いちいち、「ウィンドウの切り替え」や「ウィンドウの分割」で出す以外に方法がわかりません。 2007の時は、エクセル独自のタブが下に出てきたのですが、 それを出す方法とか、ほかに何か簡単にbookを切り替える方法があるでしょうか。 よろしくお願いいたします。

  • ExcelのBook切り替えで反応しない。

    WinXPでExcel2000を使用しています。 Bookを沢山出して切り換えながら仕事をする事が有るのですが、しょっちゅう、切り換えたBookがマウスに反応しません。 他のBookに再度切り替えを繰り返すと、そのBookに触れるようになります。 頻繁にBook切り替えを繰り返す時に、とても不便です。 何が原因なのでしょうか? 解決策等ありましたら、アドバイス願います。

  • excel VBA マクロ 他のブックの指定方法

    こんにちは、 excelのVBAにて、Abookのマクロを他のbookへ書き込み(実行)をしたいのですが、 以下2パターンにおいて、どのように指定をしたらよいか教えてください。 1:"A"bookと書き込み(実行)したいファイルの"○×△見積"bookの2ファイルのみを開いている状態において Abookから、 Windows("○×△見積.xlsx").Activate とファイル名指定をせずに、ThisWorkbook以外という指定方法を知りたいです。 2:"A"bookと書き込み(実行)したいファイルの"○×△見積"bookの他に複数のファイルが開いている際に、 Abookから、”見積”の名前がつくファイルを見つけて書き込み(実行)する方法を知りたいです。 どうぞ宜しくお願いいたします。

  • 同一フォルダ内で、エクセルを自動リンクさせる方法

    同一フォルダ内で、エクセルを自動リンクさせる方法を教えて下さい。 デスクトップ>書類>データ の順にフォルダを作成し、 「データ」フォルダの中に、Excelのブックを複数作っています。 「データ」フォルダ内に、 Book1、Book2、Book3、Book4があるとして、 Book1の情報を更新すれば、Book2、Book3、Book4も関数を介して全て変わるようにしたいです。 [BOOK1.xls]で、他のBookに反映するようにしたところ、 Book1の情報を読み込むために、ルート(デスクトップ¥書類¥データ)まで遡るため、 処理に時間がかかります。 同じフォルダ内のため、「データ」フォルダを基点に、自動リンクを指定できないものでしょうか。 条件: それぞれのBookには、複数のシートを作成しているため、同じBook内に全て入れることが出来ません。 WIndows XPでExcel 2000を使用しています。 軽く処理出来るようにしたいので、 他にやり方があれば、どのような方法でも構いませんので教えて頂けると助かります。 何卒、宜しくお願い致します。

  • エクセルのブックの切り替え

    会社で、エクセルを使っていて、2つ以上のエクセルを開くとタスクバーに開いた分のタスクが表示されるのでブックの切り替えが簡単ですが、NTのコンピュータだけ、2つ以上開いても、1つしかタスクが表示されません。したがってエクセルのウインドウから切り替えを行っています。これは、最初からなのでしょうか? OSは、NT、OFFICEは2000です。

このQ&Aのポイント
  • 液晶画面にタッチパネルエラーが表示され、操作ができない問題についてご相談いただきました。
  • 液晶パネル内に空気のようなものが見られ、濡れているように見えるとのことです。
  • 問題の解決方法として、以下の情報を教えていただきました。 - パソコンもしくはスマートフォンのOSはWindows11です。 - 接続は無線LANで行われています。
回答を見る