vorrei creare una macro che fosse in grado di:
- selezionare un foglio di lavoro
- duplicarlo nello stesso file
- e al momento della duplicazione si dovrebbe aprire una MessageBox che mi chiede come chiamarlo.
Elementarmente e per capire come operare, con il registratore di macro ho provato a duplicare il foglio chiamato “Default” e successivamente l’ho rinominato “giugno”
- Codice: Seleziona tutto
Sub CopiaSheet()
Sheets("Default").Select
Sheets("Default").Copy After:=Sheets(6)
Sheets("Default (2)").Select
Sheets("Default (2)").Name = "giugno"
ActiveWindow.SmallScroll Down:=-6
End Sub
Come potrei fare?
Grazie e buon proseguimento di giornata