如何：在工作簿中移动工作表

可以通过编程方式更改工作簿中工作表相对于其他工作表的位置。 如果不为移动的工作表指定位置，Excel 将创建新的工作簿来容纳它。

**适用于：**本主题中的信息适用于 Excel 2007 和 Excel 2010 的文档级项目和应用程序级项目。有关更多信息，请参见按 Office 应用程序和项目类型提供的功能。

在文档级自定义项中移动工作表

• 将工作簿中的工作表的总数分配给一个变量，然后移动第一个工作表，使其成为最后一个工作表。

  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(missing, Globals.ThisWorkbook.Sheets[totalSheets]);
  

在应用程序级外接程序中移动工作表

• 将工作簿中的工作表的总数分配给一个变量，然后移动第一个工作表，使其成为最后一个工作表。

  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(missing, 
      this.Application.Worksheets[totalSheets]);
  

请参见

任务

如何：隐藏工作表

如何：从工作簿中删除工作表

如何：保护工作表

参考

Copy

概念

使用工作表

对 Office 项目中对象的全局访问