Jennifer deve spesso creare copie dei fogli di lavoro una volta che ha impostato il primo foglio di lavoro di una cartella di lavoro, e di solito è un buon numero di copie. Ad esempio, non è insolito per lei dover creare 20 copie di un particolare foglio di lavoro. Si chiede se c’è un modo per fare facilmente più copie. Fare clic con il pulsante destro del mouse e utilizzare la funzione di spostamento / copia diventa piuttosto faticoso dopo un po ‘.

C’è un modo per utilizzare l’opzione sposta / copia in modo un po ‘più efficiente. Diciamo, ad esempio, che desideri creare 20 fogli di lavoro da quello originale. Puoi seguire questi passaggi:

  1. Assicurati che il tuo singolo foglio di lavoro sia selezionato.

  2. Fare clic con il pulsante destro del mouse sulla scheda del foglio di lavoro. Excel visualizza un menu contestuale.

  3. Scegli Sposta o Copia dal menu contestuale. Excel visualizza la finestra di dialogo Sposta o Copia.

  4. Seleziona l’opzione (vai alla fine).

  5. Assicurati che la casella di controllo Crea una copia sia selezionata.

  6. Fare clic su OK. Ora hai due copie del tuo foglio di lavoro (l’originale e la copia che hai appena fatto).

  7. Seleziona entrambi i fogli di lavoro facendo clic sulla prima scheda del foglio di lavoro e tenendo premuto il tasto Maiusc mentre fai clic sull’ultima scheda del foglio di lavoro.

  8. Fare clic con il pulsante destro del mouse sulle schede del foglio di lavoro selezionate. Excel visualizza un menu contestuale.

  9. Scegli Sposta o Copia dal menu contestuale. Excel visualizza la finestra di dialogo Sposta o Copia.

  10. Seleziona l’opzione (vai alla fine).

  11. Assicurati che la casella di controllo Crea una copia sia selezionata.

  12. Fare clic su OK. Ora hai quattro copie del tuo foglio di lavoro.

  13. Seleziona tutti i fogli di lavoro facendo clic sulla prima scheda del foglio di lavoro e tenendo premuto il tasto Maiusc mentre fai clic sull’ultima scheda del foglio di lavoro.

  14. Fare clic con il pulsante destro del mouse sulle schede del foglio di lavoro selezionate. Excel visualizza un menu contestuale.

  15. Scegli Sposta o Copia dal menu contestuale. Excel visualizza la finestra di dialogo Sposta o Copia.

  16. Seleziona l’opzione (vai alla fine).

  17. Assicurati che la casella di controllo Crea una copia sia selezionata.

  18. Fare clic su OK. Ora hai otto copie del tuo foglio di lavoro.

  19. Seleziona tutti i fogli di lavoro facendo clic sulla prima scheda del foglio di lavoro e tenendo premuto il tasto Maiusc mentre fai clic sull’ultima scheda del foglio di lavoro.

  20. Fare clic con il pulsante destro del mouse sulle schede del foglio di lavoro selezionate. Excel visualizza un menu contestuale.

  21. Scegli Sposta o Copia dal menu contestuale. Excel visualizza la finestra di dialogo Sposta o Copia.

  22. Seleziona l’opzione (vai alla fine).

  23. Assicurati che la casella di controllo Crea una copia sia selezionata.

  24. Fare clic su OK. Ora hai 16 copie del tuo foglio di lavoro.

  25. Seleziona quattro dei tuoi fogli di lavoro facendo clic sulla prima scheda del foglio di lavoro e tenendo premuto il tasto Maiusc mentre fai clic sulla quarta scheda del foglio di lavoro.

  26. Fare clic con il pulsante destro del mouse sulle schede del foglio di lavoro selezionate. Excel visualizza un menu contestuale.

  27. Scegli Sposta o Copia dal menu contestuale. Excel visualizza la finestra di dialogo Sposta o Copia.

  28. Seleziona l’opzione (vai alla fine).

  29. Assicurati che la casella di controllo Crea una copia sia selezionata.

  30. Fare clic su OK. Ora hai 20 copie del tuo foglio di lavoro.

Possono sembrare molti passaggi, ma in realtà non lo sono: tutto ciò che hai fatto è utilizzare la funzione di spostamento / copia cinque volte invece di 20 volte per ottenere il numero di fogli di lavoro desiderato. C’è un avvertimento a questo approccio, tuttavia: se il foglio di lavoro che stai copiando contiene tabelle definite, non sarai in grado di andare oltre il passaggio 8. Quando proverai il passaggio 9, riceverai un messaggio che dice che non è possibile copiare o spostare un gruppo di fogli di lavoro quando uno di essi contiene tabelle. (Puoi copiare o spostare un singolo foglio di lavoro contenente una tabella, ma non un gruppo di essi.)

C’è un’altra scorciatoia che puoi usare e non implica l’uso della finestra di dialogo Sposta o Copia. Tutto quello che devi fare è selezionare il foglio di lavoro che desideri copiare e trascinare il nome del foglio di lavoro (nella scheda del foglio di lavoro) a destra. Vedrai una piccola icona “documento” apparire accanto al puntatore del mouse. Premere il tasto Ctrl a questo punto e un segno più appare all’interno dell’icona. Quando rilasci il pulsante del mouse, il foglio di lavoro viene copiato. Puoi anche copiare gruppi di fogli di lavoro in questo modo a meno che, ancora una volta, non ci siano tabelle definite nei fogli di lavoro nel gruppo.

Un’altra opzione per copiare il tuo foglio di lavoro è fare quanto segue:

  1. Crea il tuo foglio di lavoro “master”, come desideri.

  2. Aggiungi abbastanza fogli di lavoro vuoti in modo da averne uno per ogni copia che desideri creare. (Un buon modo per aggiungere fogli di lavoro vuoti è premere Maiusc + F11.)

  3. Seleziona il foglio di lavoro principale.

  4. Premi Ctrl + A. Excel seleziona tutto nel foglio di lavoro principale.

  5. Premi Ctrl + C. Tutto è ora copiato negli Appunti.

  6. Fare clic sulla scheda del foglio di lavoro per il primo foglio di lavoro vuoto creato.

  7. Tieni premuto il tasto Maiusc mentre fai clic sulla scheda del foglio di lavoro per l’ultimo foglio di lavoro vuoto che hai creato.

  8. Premi Ctrl + V. Il contenuto degli Appunti viene incollato in ciascuno dei fogli di lavoro selezionati.

Copia tutto dal foglio di lavoro principale, ma non copia alcune cose come la larghezza delle colonne, l’altezza delle righe o le impostazioni del layout di stampa.

È possibile eseguire alcuni passaggi aggiuntivi per copiare alcuni di questi, ma è difficile copiarli tutti.

Per pura velocità e comodità, tuttavia, l’utilizzo di una macro per creare le copie è (a mio avviso) il più semplice. Ecco una macro molto semplice che farà copie del foglio di lavoro selezionato fino al punto in cui ci saranno un totale di 20 fogli di lavoro nella cartella di lavoro:

Sub SimpleCopy1()

Do While Sheets.Count < 20         ActiveSheet.Copy After:=Sheets(Sheets.Count)

Loop End Sub

Se la tua cartella di lavoro contiene già fogli di lavoro aggiuntivi (oltre a quello che vuoi copiare), allora potresti trarre vantaggio dall’utilizzo di questa versione:

Sub SimpleCopy2()

Dim J As Integer

For J = 1 To 20         ActiveSheet.Copy After:=Sheets(Sheets.Count)

Next J End Sub

Puoi rendere la tua macro un po ‘più generale facendola chiedere all’utente quante copie dovrebbero essere fatte:

Sub SimpleCopy2()

Dim J As Integer     Dim iWanted As Integer

On Error GoTo Done     iWanted = Cint(InputBox("Number of copies?"))



If iWanted >0 And iWanted < 201 Then         For J = 1 To iWanted             ActiveSheet.Copy After:=Sheets(Sheets.Count)

Next J     End If Done:

On Error GoTo 0 End Sub

Questa macro limita anche il numero di copie del foglio di lavoro eseguite tra 1 e 200 (al di fuori di tale intervallo, non farà nulla). La gestione degli errori viene aggiunta nel caso in cui la cartella di lavoro abbia già un numero elevato di fogli di lavoro e l’aggiunta di altri supera il numero di fogli di lavoro che è consentito avere in una cartella di lavoro.

Indipendentemente dall’approccio macro scelto, è una buona idea aggiungerlo alla barra degli strumenti di accesso rapido o assegnarvi un tasto di scelta rapida. In questo modo puoi copiare i tuoi fogli di lavoro molto rapidamente.

_Nota: _

Se desideri sapere come utilizzare le macro descritte in questa pagina (o in qualsiasi altra pagina dei siti ExcelTips), ho preparato una pagina speciale che include informazioni utili.

Fare clic qui per aprire quella pagina speciale in una nuova scheda del browser.

ExcelTips è la tua fonte di formazione economica su Microsoft Excel.

Questo suggerimento (1600) si applica a Microsoft Excel 2007, 2010, 2013, 2016, 2019 e Excel in Office 365.