シートを取得する• すべてのシートを取得する シートを取得する インデックスで取得 Sheets の引数にインデックスを指定すると、そのシートを取得できます。 1 番目のシートを取得するには Sheets 1 または Worksheets 1 を入力します。 1 番左のシートが 1 です。 Print ws. Name Sheets と Worksheets の違いはワークシート以外を取得するかどうかです。 Sheets:すべてのシートを取得• Worksheets:ワークシートのみ取得(グラフシートなどは取得しない) シート名で取得 Sheets の引数に名前を指定すると、そのシートを取得できます。 シート名「Sheet1」のシートを取得するには Sheets "Sheet1" または Worksheets "Sheet1" を入力します。 Print ws. Index 指定したシートが存在しないときは「」が発生します。 アクティブなシートを取得 アクティブなシートを取得するには ActiveSheetを入力します。 Print ws. Name アクティブなシートとは、表示しているシートです。 選択しているシートを取得 選択しているシートを取得するには ActiveWindow. SelectedSheetsを入力します。 複数のシートが選択されているときは、そのすべてのシートを取得します。 SelectedSheets "Sheet2" ' 選択しているシート「Sheet2」を取得 Debug. Print ws. Name ActiveWindow は VBA を実行しているシートではなく、アクティブなワークブックのシートを取得します。 最後のシートを取得 最後のシートを取得するには Sheets Sheets. Count または Worksheets Worksheets. Count を入力します。 最後とは 1 番右のシートのことです。 Count ' 最後のシートを取得 Debug. Print ws. Name 別のワークブックを取得 Workbooks の引数にインデックスかブック名を指定すると、そのブックのシートを取得できます。 ブック名「Book2. xlsx」のブックを取得するには Workbooks "Book2. xlsx". Sheetsまたは Workbooks "Book2. xlsx". Worksheetsのように入力します。 Dim ws As Worksheet ' ブック「Book2. xlsx". Sheets 2 Debug. Print ws. Name スポンサーリンク.
次の
表題の件、を作成しました。 業務をしていてあると便利だな、と。 MyCommand. Workbooks. Quit 各変数を解放(. ブロックでOut-Nullしているのは実行すると「0 0 0」と表示されるため). Runtime. Interopservices. Runtime. Interopservices.
次の
Excelでデータの集計を行うときに、シート名をセルから参照したい場合もあります。 たとえば、支店ごとに作成した売上を合計する場合です。 東京、千葉、神奈川という支店について1支店1シートで売上を入力しておきます。 1支店1シートで売上を入力 各支店の売上を「売上合計」シートで集計します。 各支店の売上の合計 このとき、「東京支店の売上」は、どのように取得すれば良いでしょうか。 B14」と入力する方法があります。 支店の売上を取得する原始的な方法 ただし、この方法ではA列の支店名(シート名)が変更されたときにB列の式も修正する必要があるので面倒です。 B14」と入力してもうまく参照できません。 その場合、INDIRECT関数が役立ちます。 この関数はセルに入力された文字列を参照に変えてくれる関数です。 セルに入力された内容からシートやセル範囲を参照できるようになります。 B14" 」と入力すれば「A2に入力されたシート名のセルB14」を参照できるようになります。 それにより、東京シートのセルB14に入力された売上を取得することができます。 A列の支店名が変更された場合も、参照するシートを変更するためB列の式を修正する必要はありません。 他のセルも同じように入力(オートフィルでも)すれば、セルに入力された支店名からシート名を参照できます。 セルに入力されたシート名を参照する.
次の