kopya sayfa

[sadesinan12345]

Sevgili arkadaşlar öncelikle ilginiz ve yardımlarınız için teşekkür ederim. Ben sayfa1 a2 hücresinde yer alan isimde buton ile otomatik olarak yeni bir sayfa oluşturmak istiyorum. Ancak bu oluşturduğum yeni sayfa örneğin sayfa3 ün bir kopyası olmasını istiyorum. Desteğiniz ve ilginiz için şimdiden teşekkürler ...

 

[Murat OSMA]

Sayfa1'i son son sayfaya olarak kopyalar ve adını da Sayfa1'in A2 hücresinden alır...
Deneyiniz...

Sub Emre()
    Sheets("Sayfa1").Copy After:=Worksheets(Worksheets.Count)
    ActiveSheet.Name = Sayfa1.Range("A2").Value
End Sub

 

[sadesinan12345]

bu kod benim çok işime yaradı. Tam olarak istediğim kod buydu teşekkür ederim...

 

[zaffer1981]

ben tam olarak yapamadım aynı işlemi. makrolu dosyayı gönderebilirmisiniz. tşk.

 

[zaffer1981]

bu butona bastığımız zaman hep bir önceki sayfanın tüm verilerini yeni oluşturulan sayfaya kopyalayabilir mi

 

[sadesinan12345]

ben tam olarak yapamadım aynı işlemi. makrolu dosyayı gönderebilirmisiniz. tşk.

Ben bununla biraz uğraştıktan sonra yapabildim bi bakın...

 

[sadesinan12345]

Sevgili arkadaşlar, ben şimdi de sayfa adını bir kutucuğa girerek butona bastığımızda adı ile uyuşan sayfayı getiren bir macro uygulaması yapmak istiyorum. Eğer mümkünse bana yardımcı olabilir misiniz?

 

[zaffer1981]

üstad tşk ederim uğraşınız için. ama kopyalanan sayfaya mevcut bilgilerin haricinde veri giriyorum, formül giriyorum lakin yeni girilen verileri yeni kopyaya almıyor. sadece eskileri alıyor. tşk ederim..