方法: ブック内のワークシートをプログラムによって移動する

[アーティクル]
02/21/2013

ブック内の他のワークシートに対し、ワークシートの位置をプログラムで変更できます。ワークシートの移動先を指定しない場合は、新しいブックが作成され、そこに移動されます。

対象: このトピックの情報は、Excel 2013 と Excel 2010 のドキュメントレベルのプロジェクトおよびアプリケーションレベルのプロジェクトに適用されます。詳細については、「Office アプリケーションおよびプロジェクトタイプ別の使用可能な機能」を参照してください。

ドキュメントレベルのカスタマイズでワークシートを移動するには

ブック内のワークシートの合計数を変数に代入し、次に 1 番目のワークシートをブックの末尾に移動します。

Dim totalSheets As Integer = Application.ActiveWorkbook.Sheets.Count
Globals.Sheet1.Move(After:=Globals.ThisWorkbook.Sheets(totalSheets))

int totalSheets = this.Application.ActiveWorkbook.Sheets.Count;
Globals.Sheet1.Move(Globals.ThisWorkbook.Sheets[totalSheets]);

アプリケーションレベルのアドインでワークシートを移動するには

ブック内のワークシートの合計数を変数に代入し、次に 1 番目のワークシートをブックの末尾に移動します。

Dim totalSheets As Integer = Application.ActiveWorkbook.Sheets.Count
CType(Application.ActiveSheet, Excel.Worksheet).Move(After:=Application.Worksheets(totalSheets))

int totalSheets = this.Application.ActiveWorkbook.Sheets.Count;
((Excel.Worksheet)Application.ActiveSheet).Move(
    this.Application.Worksheets[totalSheets]);