Forum CDRinfo.pl - Makro w excelu

Forum CDRinfo.pl (https://forum.cdrinfo.pl/)

- Off topic (https://forum.cdrinfo.pl/f5/)

- - Makro w excelu (https://forum.cdrinfo.pl/f5/makro-excelu-63985/)

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)

Kod:

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)" :)

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