Come copiare un foglio nascosto in Excel?
In Excel, possiamo spostare e copiare un foglio nella cartella di lavoro corrente o in un'altra in modo rapido e semplice, ma hai mai provato a copiare un foglio nascosto nella cartella di lavoro attiva? In questo articolo, introdurrò un codice VBA per copiare un foglio nascosto specifico nel file Excel attivo.
Copia un foglio di lavoro nascosto nella cartella di lavoro attiva con codice VBA
Copia un foglio di lavoro nascosto nella cartella di lavoro attiva con codice VBA
Per copiare un foglio nascosto da una cartella di lavoro e dargli un nome, il seguente codice VBA può farti un favore:
1. Tieni premuto il ALT + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.
2. Clic inserire > Modulie incolla il codice seguente nel file Moduli Finestra.
Codice VBA: copia un foglio di lavoro nascosto nella cartella di lavoro attiva:
Sub DupSheet()
'Updateby Extendoffice 20161109
Dim Actsheet As String
Application.ScreenUpdating = False
On Error Resume Next
ActiveWorkbook.Sheets("Sheet12").Visible = True
ActiveWorkbook.Sheets("Sheet12").Copy _
after:=ActiveWorkbook.Sheets("Sheet12")
ActNm = ActiveSheet.Name
ActiveSheet.Name = InputBox("Enter the name for the new sheet.")
Sheets(ActiveSheet.Name).Visible = True
ActiveWorkbook.Sheets("Sheet12").Visible = False
Application.ScreenUpdating = True
End Sub
Note:: Nel codice sopra, Foglio 12 è il foglio nascosto che vuoi copiare, modificalo secondo le tue necessità.
3. E poi premere F5 chiave per eseguire questo codice, verrà visualizzata una finestra di messaggio per ricordarti di specificare un nome per la nuova copia del foglio di lavoro nascosto, vedi screenshot:
4. Quindi fare clic OK pulsante e il foglio nascosto è stato copiato contemporaneamente con il nuovo nome nella cartella di lavoro attiva.
I migliori strumenti per la produttività in ufficio
Potenzia le tue competenze in Excel con Kutools for Excele sperimenta l'efficienza come mai prima d'ora. Kutools for Excel Offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Fai clic qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab Porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
- Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!
