Puoi inserire in un modulo questa macro
- Codice: Seleziona tutto
Sub CreaFogliN()
NomeF = (InputBox("Inserisci il nome del nuovo Foglio"))
Worksheets.Add.Name = NomeF
Sheets(NomeF).Move After:=Worksheets(Worksheets.Count) '<<<< aggiunta riga per far posizionare il nuovo foglio alla fine
End Sub
Puoi richiamarla con pulsante creato sul foglio o, meglio, con tasti di scelta rapida (es.: Ctrl+m) che trovi nelle opzioni della macro
I tasti di scelta rapida funzionano in tutta la cartella e in qualsiasi foglio tu ti trovassi, mentre il pulsante lo hai (normalmente) su un foglio
ciao
EDIT ore 17:15 - aggiunta riga alla macro, vedi nota