如何在Excel中復制隱藏的工作表？

在Excel中，我們可以快速輕松地移動工作表并將其復制到當前工作簿或其他工作簿中，但是您是否曾經嘗試過將隱藏工作表復制到活動工作簿中？ 本文，我將為您介紹VBA代碼，以將特定的隱藏工作表復制到活動的Excel文件中。

使用VBA代碼將隱藏的工作表復制到活動工作簿

使用VBA代碼將隱藏的工作表復制到活動工作簿驚人的！ 在 Excel 中使用高效的選項卡，如 Chrome、Firefox 和 Safari！每天節省50％的時間，并減少數千次鼠標單擊！

要從工作簿中復制隱藏的工作表并為其命名，請使用以下VBA代碼：

1。 按住 ALT + F11 鍵打開 Microsoft Visual Basic應用程序 窗口。

2。 點擊 插頁 > 模塊，然后將以下代碼粘貼到 模塊 窗口。

VBA代碼：將隱藏的工作表復制到活動工作簿中：

Sub DupSheet()Updateby Extendoffice 20161109Dim Actsheet As StringApplication.ScreenUpdating = FalseOn Error Resume NextActiveWorkbook.Sheets("Sheet12").Visible = TrueActiveWorkbook.Sheets("Sheet12").Copy _after:=ActiveWorkbook.Sheets("Sheet12")ActNm = ActiveSheet.NameActiveSheet.Name = InputBox("Enter the name for the new sheet.")Sheets(ActiveSheet.Name).Visible = TrueActiveWorkbook.Sheets("Sheet12").Visible = FalseApplication.ScreenUpdating = TrueEnd SubCopy

備注：在上面的代碼中， 表12的 是您要復制的隱藏工作表，請根據需要進行更改。

3。 然后按 F5 運行該代碼的關鍵，將彈出一個提示框，提醒您為隱藏的工作表的新副本指定名稱，請參見屏幕截圖：

4。 然后點擊 OK 按鈕，并且隱藏的工作表已使用新名稱立即復制到活動工作簿中。

最佳辦公生產力工具

將小時轉化為分鐘 Kutools for Excel!

準備好增強您的 Excel 任務了嗎？ 利用的力量 Kutools for Excel - 您終極的節省時間的工具。 簡化復雜的任務并像專業人士一樣瀏覽數據。 以閃電般的速度體驗 Excel！

為什么需要 Kutools for Excel