Workbook オブジェクト (Excel)

Microsoft Excel ブックを表します。

注釈

Workbook オブジェクト は、Workbooks コレクションのメンバー です。 Workbooks コレクションには、現在開かれているすべての Workbook オブジェクトが含まれています。

Application オブジェクトの ThisWorkbook プロパティは、コードが実行されているブックVisual Basic返します。 ほとんどの場合、これは作業中のブックと同じです。 ただし、Visual Basicコードがアドインの一部である場合、ThisWorkbook プロパティはアクティブなブックを返すわけではありません。 この場合の作業中のブックはアドインを呼び出しているブックですが、ThisWorkbook プロパティはアドイン ブックを返します。

Visual Basic コードからアドインを作成する場合は、ThisWorkbook プロパティを使用して、アドインにコンパイルするブックで実行する必要があるステートメントを修飾する必要があります。

一の Workbook オブジェクト を取得するには、ブック 名またはインデックス番号が index である Workbooks (index) を使用 します。 次の使用例は、ブック 1 をアクティブ化します。

Workbooks(1).Activate

データ系列のインデックス番号は、データ系列がグラフに追加された順序と対応します。 Workbooks(1) は最初に作成されたブックで、 Workbooks(Workbooks.Count) 最後に作成されたブックです。 ブックをアクティブ化しても、インデックス番号は変更されません。 非表示の場合でも、すべてのブックがインデックス数に含まれます。

Name プロパティ は、ブック名を返します。 このプロパティを使用して名前を設定することはできません。名前を変更する必要がある場合は、 SaveAs メソッドを使用して別の名前でブックを保存します。

次の使用例は、Cogs.xls という名前のブックで Sheet1 をアクティブ化します (ブックは既に開いている必要Microsoft Excel)。

Workbooks("Cogs.xls").Worksheets("Sheet1").Activate

Application オブジェクトの ActiveWorkbook プロパティは、現在アクティブなブックを返します。 次の使用例は、作業中のブックの作成者の名前を設定します。

ActiveWorkbook.Author = "Jean Selva"

次の使用例は、指定した電子メール アドレスと件名を使用して、アクティブなブックからワークシート タブに電子メールを送信します。 このコードを実行するには、アクティブなワークシートのセル A1 に電子メールアドレス、セル B1 に件名、セル C1 に送信するワークシート名を含める必要があります。

Sub SendTab()
   'Declare and initialize your variables, and turn off screen updating.
   Dim wks As Worksheet
   Application.ScreenUpdating = False
   Set wks = ActiveSheet

   'Copy the target worksheet, specified in cell C1, to the clipboard.
   Worksheets(Range("C1").Value).Copy

   'Send the content in the clipboard to the email account specified in cell A1,
   'using the subject line specified in cell B1.
   ActiveWorkbook.SendMail wks.Range("A1").Value, wks.Range("B1").Value

   'Do not save changes, and turn screen updating back on.
   ActiveWorkbook.Close savechanges:=False
   Application.ScreenUpdating = True
End Sub

イベント

メソッド

プロパティ

関連項目

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。