VBA da textbox1 ve ekle butonu ile sayfa ekleme

[oornek1]

arkadaslar userform üzerinde textbox1 e yazdığım isimle exceldeki data adlı sayfamın kopyalanmasını nasıl yapacağım,

yani textbox1 e yazdığım isimle data adlı sayfamın koyalanması.
yardımlarınız bekliyorum teşekkürler.

 

[uzmanamele]

merhaba
şöyle birşey olabilir mi

Private Sub CommandButton1_Click()
ad = TextBox1.Text
Sheets("data").Select
    Sheets("data").Copy Before:=Sheets(2)
    Sheets("data (2)").Name = ad
End Sub

 

[hurkanpisirici]

Merhaba Kolay Gelsin.

Bende zamanında cari takiplerim için, hocalarımdan yardım alıp buna benzer bir şey yapmıştım.Size yaptığım dosyayı yolloyorum belki bir örnek teşkil eder sizin için.