Belli bir sayfayı yeni oluşturulan kitaptaki sayfaya kopyalama

[gecemavisi]

Saygıdeğer arkadaşlar;

mesela benim "kitap1" adlı kitabım var. öyle bir kod yazmalıyım ki,

"kitap1" in içinde ki deneme adlı sayfanın "n19" hücresindeki değer userformun içindeki "TextBox1" e yazdığım kitap adını baz alarak yeni kitap açacak ve "kitap1" in içindeki "kalem" adlı sayfadaki verilerin tümünü seçerek yeni açılan kitabın ilk sayfasına yapıştıracak..

Sizce bu iş nasıl olur?

Saygılarımla....

 

[gecemavisi]

Saygıdeğer arkadaşlar;
Biliyorum çok yoğun işleriniz var ama benim soruma da küçük bir cevap yazmanızı rica ederim....

 

[zafer]

Merhaba

"kitap1" in içinde ki deneme adlı sayfanın "n19" hücresindeki değer userformun içindeki "TextBox1" e yazdığım kitap adını baz alarak yeni kitap açacak ve "kitap1" in içindeki "kalem" adlı sayfadaki verilerin tümünü seçerek yeni açılan kitabın ilk sayfasına yapıştıracak..

Textbox'a yazdığınız isme göre yeni sayfa açma ve kopyalama işlemi olabilir fakat
N19 hücresindeki değer ne iş yapacak ,Textbox1 e yazılan yazıyı nasıl baz alacak..Nasıl yeni kitap açacak.

Yazdığınız açıklamanızı lütfen önce okuyun.Cevap anlaşılmadığı için verilmemiş olabilir.

 

[gecemavisi]

Sn Zafer Hocam;
aslında deneme sayfasının içindeki n19 a gerek yok. Bir butona basıyorum ve karşıma userform geliyor. userformun içindeki "textbox1" e değer giriyorum( bu değer oluşturmak istediğim sayfanın adı oluyor. ) ondan sonra altındaki butona basıyorum ve "kitap1" in içindeki "kalem" adlı sayfadaki verilerin tümünü seçerek yeni açılan kitabın ilk sayfasına yapıştıracak..
Saygılarımla...

 

[zafer]

Merhaba

Ekli dosyayı inceleyiniz.
userform daki
ActiveWorkbook.SaveAs Filename:="D:\Dosyalar\EXCEL\KITAPLIK\" & TextBox1
satırnı kendi dizin yapınıza göre düzenleyin

Lütfen mesajlarınızdalki açıklamalarınız anlaşılır bir biçimde olursa sizin cevap almanız çabuk olur bizde zamanımızı boşa vermemiş oluruz.