Note: The other languages of the website are Google-translated. Back to English
English English

 Come copiare il foglio e rinominare automaticamente in Excel?

In Excel, come potresti copiare un foglio di lavoro e rinominarlo automaticamente senza digitare il nome come al solito? In questo articolo, parlerò di come copiare un foglio una o più volte e dare loro nomi specifici contemporaneamente.

Copia un foglio di lavoro più volte e rinominalo con i nomi delle schede di incremento utilizzando il codice VBA

Copia un foglio di lavoro più volte e rinominalo con nomi personalizzati usando Kutools per Excel


Se devi copiare un foglio di lavoro più volte e dare loro nomi di serie, come KTE-1, KTE-2, KTE-3, KTE-4 ..., 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 > Moduloe incolla il codice seguente nel file Modulo Finestra.

Codice VBA: copia un foglio di lavoro più volte e rinominalo contemporaneamente:

Sub Create()
'Updateby Extendoffice
    Dim I As Long
    Dim xNumber As Integer
    Dim xName As String
    Dim xActiveSheet As Worksheet
    On Error Resume Next
    Application.ScreenUpdating = False
    Set xActiveSheet = ActiveSheet
    xNumber = InputBox("Enter number of times to copy the current sheet")
    For I = 1 To xNumber
        xName = ActiveSheet.Name
        xActiveSheet.Copy After:=ActiveWorkbook.Sheets(xName)
        ActiveSheet.Name = "KTE-" & I
    Next
    xActiveSheet.Activate
    Application.ScreenUpdating = True
End Sub

3. Quindi premere F5 chiave per eseguire questo codice e una finestra di messaggio ti ricorderà quante copie del foglio di lavoro corrente che desideri copiare, vedi screenshot:

doc rinominare i fogli copiati 1

4. Immettere il numero di copie nella finestra di dialogo visualizzata, quindi fare clic su OK pulsante, il foglio di lavoro corrente è stato duplicato 5 copie e rinominato con il nome della sequenza come mostrato nella seguente schermata:

doc rinominare i fogli copiati 2

Note:: Nel codice sopra, puoi cambiare il testo del nome del foglio di lavoro "KTE-"Al tuo bisogno.


Forse i codici VBA di cui sopra sono difficili da applicare, qui introdurrò uno strumento facile- Kutools for Excel, Con la sua Crea fogli di lavoro per sequenze utilità, è possibile eseguire questo compito senza alcuno sforzo.

Kutools for Excel : con oltre 300 utili componenti aggiuntivi di Excel, da provare gratuitamente senza limitazioni in 30 giorni. 

Dopo l'installazione Kutools for Excel, si prega di fare come segue:

1. Clic Kutools Plus > Foglio di lavoro > Crea fogli di lavoro per sequenze, vedi screenshot:

2. Nel Crea fogli di lavoro per sequenze la finestra di dialogo:

(1.) Selezionare il nome del foglio di lavoro che si desidera copiare dal file Foglio di lavoro di base menu `A tendina;

(2.) Quindi specificare il numero di foglio di lavoro in cui si desidera copiare Il numero di creazione casella di testo;

(3.) E poi controlla Numeri di sequenza sotto il Nomi dei fogli basati su sezione;

(4.) Alla fine, crea i nomi dei fogli di lavoro della sequenza nel riquadro di destra che desideri, vedi screenshot:

doc rinominare i fogli copiati 4

3. Dopo aver terminato le impostazioni, fare clic su Ok pulsante e il foglio di lavoro specifico è stato copiato più volte e rinominato in base alla sequenza creata in una nuova cartella di lavoro, vedi screenshot:

doc rinominare i fogli copiati 5

Fai clic su Scarica gratuitamente Kutools per Excel ora!


Kutools for Excel: con più di 300 utili componenti aggiuntivi di Excel, liberi di provare senza limitazioni in 30 giorni. Scarica e prova gratuita ora!

I migliori strumenti per la produttività in ufficio

Kutools per Excel risolve la maggior parte dei tuoi problemi e aumenta la tua produttività dell'80%

  • Riutilizzo: Inserisci rapidamente formule complesse, grafici e tutto ciò che hai usato prima; Crittografa celle con password; Crea mailing list e invia email ...
  • Bar Super Formula (modifica facilmente più righe di testo e formula); Layout di lettura (leggi e modifica facilmente un gran numero di celle); Incolla su intervallo filtrato...
  • Unisci celle / righe / colonne senza perdere dati; Contenuto delle celle divise; Combina righe / colonne duplicate... Impedisci celle duplicate; Confronta intervalli...
  • Seleziona Duplica o Unico Righe; Seleziona Righe vuote (tutte le celle sono vuote); Super Find e Fuzzy Find in molte cartelle di lavoro; Selezione casuale ...
  • Copia esatta Più celle senza modificare il riferimento della formula; Riferimenti di creazione automatica a più fogli; Inserisci punti elenco, Caselle di controllo e altro ...
  • Estrai testo, Aggiungi testo, Rimuovi per posizione, Rimuovi spazio; Creare e stampare totali parziali di paging; Converti contenuto e commenti tra celle...
  • Super filtro (salva e applica schemi di filtri ad altri fogli); Ordinamento avanzato per mese / settimana / giorno, frequenza e altro; Filtro speciale in grassetto, corsivo ...
  • Combina cartelle di lavoro e fogli di lavoro; Unisci tabelle in base a colonne chiave; Suddividi i dati in più fogli; Conversione in batch xls, xlsx e PDF...
  • Più di 300 potenti funzionalità. Supporta Office / Excel 2007-2019 e 365. Supporta tutte le lingue. Facile distribuzione nella tua azienda o organizzazione. Funzionalità complete Prova gratuita di 30 giorni. Garanzia di rimborso di 60 giorni.
scheda kte 201905

Scheda Office porta l'interfaccia a schede a Office e semplifica notevolmente il lavoro

  • 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 centinaia di clic del mouse ogni giorno!
fondo officetab
Commenti (2)
Ancora nessuna valutazione. Puoi essere il primo a votare!
Questo commento è stato fatto dal moderatore sul sito
Wow, questo mi ha fatto risparmiare un sacco di tempo! Grazie!
Questo commento è stato fatto dal moderatore sul sito
È possibile aggiungere in questo codice un'opzione per copiare anche celle specifiche. Ad esempio: ho in una cella il numero 1 e vorrei che quando duplico il foglio cambi per +1. Grazie
Non ci sono ancora commenti pubblicati qui
Lasciate i vostri commenti
Pubblicazione come ospite
×
Valuta questo post:
0   Personaggi
Posizioni suggerite