Aggiungere un nuovo foglio di lavoro con il nome desiderato

Sheets.Add After:=Sheets(Sheets.Count)
Sheets(Sheets.Count).Select
Sheets(Sheets.Count).Name = "NomeDesiderato" 

Tags: , , ,

Ti è stato utile?