Makro w excelu

[loki7777]

Mam zrobic makro wstawiajace nowy arkusz wedlug podanego wczesniej wzoru, czyli innego arkusza. Wszystko ladnie piekni rejestruje, makro dziala, robi to co ma robic, ale mam problem, a raczej dwa.Po pierwsze raz udalo mi sie zrobic z tego makra w vba takie okienko dialogowe, ktore uruchamia sie wraz z otwarciem excela, teraz cos mi nie chce wyjsc, czy moze mi ktos pomoc?I drugie tez onstatni arkusz, ktory jest wzorem ma nazwe wzor-rok i gdy uzywam makra wstawia wzor-rok(liczba) czy da sie tak napsac to makro by sie jeszcze pytal o nazwe tego nowego arkusza?Prosze o pomoc, bo googlowanie nic nie dalo
Tak wyglada kod tego makra
Sheets("Wzór-rok").Select
Sheets("Wzór-rok").Copy After:=Sheets(5)

[MQs]

Sub Makro()
    Dim mySheet As String
    mySheet = Application.InputBox(prompt:="Podaj nazwę arkusza: ", Title:="Add Sheet!", Type:=1 + 2)
    Sheets("Wzór-rok").Copy after:=Sheets(5)
    Sheets("Wzór-rok (2)").Name = mySheet
End Sub

Działa wielokrotnie pod warunkiem, że nie nazwiesz któregoś "Wzór-rok (2)"

[loki7777]

dziala ale nie do konca, bo kiedy np sie rozmysle, to i tak wstawi arkusz tylko ze z nazwa FALSE