共用方式為

HOW TO：複製工作表

  • 發行項

更新： 2008 年 7 月

適用於

本主題中的資訊僅適用於指定的 Visual Studio Tools for Office 專案和 Microsoft Office 版本。

專案類型

  • 文件層級專案

  • 應用程式層級專案

Microsoft Office 版本

  • Excel 2003

  • Excel 2007

如需詳細資訊，請參閱依應用程式和專案類型提供的功能。

您可以建立工作表複本，然後在活頁簿的現有工作表之前或之後插入該工作表。如果不指定要插入工作表的位置，則 Excel 會建立一個新活頁簿以包含這個新工作表。

注意事項：

無論您以程式的方式複製工作表，還是使用者以手動方式複製工作表，新工作表都沒有後置程式碼，且新工作表上的控制項不起作用。這是因為，新複製的工作表是 Microsoft.Office.Interop.Excel.Worksheet 物件，而不是 Microsoft.Office.Tools.Excel.Worksheet 主項目。只可將 Windows Form 控制項和主控制項加入主項目。如需詳細資訊，請參閱主項目和主控制項的程式設計限制。

若要透過文件層級自訂將複製的工作表加入至活頁簿

  • 使用 Copy 方法複製目前活頁簿中的第一個工作表，並將複本置於第三個工作表之後。

    Globals.Sheet1.Copy(After:=Globals.ThisWorkbook.Sheets(3))

    Globals.Sheet1.Copy(missing, Globals.ThisWorkbook.Sheets[3]);

若要透過應用程式層級增益集將複製的工作表加入至活頁簿

  • 使用 Copy 方法複製目前活頁簿中的第一個工作表，並將複本置於第三個工作表之後。

    Dim worksheet1 As Excel.Worksheet = CType(Application.ActiveWorkbook.Worksheets(1),  _
Excel.Worksheet)
Dim worksheet3 As Excel.Worksheet = CType(Application.ActiveWorkbook.Worksheets(3),  _
Excel.Worksheet)
worksheet1.Copy(After:=worksheet3)

    Excel.Worksheet worksheet1 = ((Excel.Worksheet)Application.ActiveWorkbook.Worksheets[1]);
Excel.Worksheet worksheet3 = ((Excel.Worksheet)Application.ActiveWorkbook.Worksheets[3]);
worksheet1.Copy(missing, worksheet3);

請參閱

工作

HOW TO：在活頁簿中加入新的工作表

HOW TO：從活頁簿中刪除工作表

HOW TO：選取工作表

概念

使用工作表

主項目和主控制項概觀

全域存取 Visual Studio Tools for Office 專案中的物件

主項目和主控制項的程式設計限制

了解 Office 方案中的選擇性參數

其他資源

Excel 主控制項

變更記錄

日期

記錄

原因

2008 年 7 月

加入可以用於應用程式層級增益集的程式碼範例。

客戶回函。