複数のアクティブなブック間での作業

Question

マクロ1のコードは、ブック1に格納されています。コマンドボタン1は、ユーザーが選択したブックを開くのをトリガーします。そのWorkbook 2を呼び出してみましょう（実際のWorkbookの名前は毎回異なります）。マクロ1は、ワークブック2でコード（主に書式設定コマンド）を実行します。

マクロ1が終了します。ワークブック2は開いたままです。ワークブック2のユーザーによる手動介入の後、ユーザーはマクロ2をトリガーするブック1のコマンドボタン2をクリックします。

マクロ2は、コードを実行しているブック2を再びアクティブ化することで開始します。ある時点で、コードは別のユーザーが選択したブックを開くように指示します。ワークブック3としましょう（ここでもファイル名は異なる場合があります）。そして、マクロ2は、バックワークブック2でアクションをとる、ブック3.私が午前問題は、私はワークブック名​​与えられたこれらのワークブックのそれぞれを暗くする方法を見つけ出すことができないです

に戻りコードを持っている/ワークシート名を変更します。また、新しいワークブックが異なるポイントで開かれているため、どのモジュールのどの部分をコードを追加する必要があるのか​​分かりません。

Dim wbBook1 As Workbook 
Dim wbBook2 As Workbook 

は、その後、各ワークブック（第2本が中であることに注意を設定する必要があります：あなたが必要

最初にワークブックを宣言します。

Answer 1

あなたは、例えば書籍やシートを暗くするために次の操作を行うことができます

Set wbBook1 = ThisWorkbook 
Set wbBook2 = Workbooks.Open("C:\PERSONAL_FOLDER\test.xlsm") 

シートがでます作業しているかを特定するためには、あなたが同様にこれらを宣言して設定する必要があります：セットが開かれている間

wsSheet1とを使用して

Dim wsSheet1 As Worksheet 
Dim wsSheet2 As Worksheet 
Set wsSheet1 = wbBook1.Worksheets("Sheet1") 
Set wsSheet2 = wbBook2.Worksheets("Sheet1") 

あなたが簡単にあなたがワークブックのテストを使用して行われたら、シート1にし、シート1

でワークブックのテストでは、あなたの現在のブックで何かをするマクロを実行することができますwsSheet2あなたがそれを閉じることができます次のコマンド：

wbBook2.close 

私はこれが役立つことを望みます。