Jeff vorrebbe creare una copia del suo foglio di lavoro “principale”, richiedere un nome per il nuovo foglio di lavoro e spostarlo alla fine delle schede del foglio di lavoro, il tutto da una macro. Ha provato a registrare una macro per farlo, ma non ha funzionato.

Il fatto che la macro registrata non abbia funzionato non è particolarmente sorprendente.

Quando registri una macro, dici a Excel di registrare i passaggi che esegui.

Quei passaggi (in questo caso) includevano la denominazione del foglio di lavoro, in modo che il nome fosse registrato nella macro. Prova a eseguire la macro una seconda volta e riceverai un errore perché il foglio di lavoro che stai cercando di creare nel secondo passaggio è già stato creato nel primo.

In questo caso devi scrivere una macro manualmente. Puoi iniziare con la registrazione del processo e otterrai un codice come il seguente:

Sub Macro1()

Sheets("Master").Select     Sheets("Master").Copy After:=Sheets(3)

Sheets("Master (2)").Select     Sheets("Master (2)").Name = "NewMaster"

End Sub

Si noti che il codice inserisce il foglio di lavoro (dopo il terzo foglio) e quindi lo denomina sempre la stessa cosa. C’è molto da cambiare qui. Quello che vuoi fare è cambiarlo in qualcosa di simile al seguente:

Sub CopyRename()

Dim sName As String     Dim wks As Worksheet     Worksheets("Master").Copy after:=Sheets(Worksheets.Count)

Set wks = ActiveSheet     Do While sName <> wks.Name         sName = Application.InputBox _           (Prompt:="Enter new worksheet name")

On Error Resume Next         wks.Name = sName         On Error GoTo 0     Loop     Set wks = Nothing End Sub

Questa macro copierà il foglio di lavoro denominato “Master” alla fine dell’elenco di fogli (indipendentemente dal numero di fogli presenti nella cartella di lavoro) e continuerà a richiedere un nuovo nome di foglio di lavoro finché non viene immesso un nome valido.

_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 (3898) si applica a Microsoft Excel 97, 2000, 2002 e 2003. Puoi trovare una versione di questo suggerimento per l’interfaccia a nastro di Excel (Excel 2007 e versioni successive) qui:

Creazione e denominazione di un foglio di lavoro utilizzando una macro.