Sayfa kopyalarken makro butonunu

[coselimoglu]

Tekrar merhaba,

Hemen soruya geçiyorum.

Oluşturduğum dosyada sayfaların birinde değişik sayfalardan veri alarak bir form oluşturdum. Formun bulunduğu sayfada "Yazdırma Alanı"nın dışında diğer sayfalara gitmek için makrolu butonlar var. Ayrıca oluşturduğum formu farklı bir dosyada bağlantı içermeden oluşturabilmek için de ayrı bir makrolu buton var.

Yapmak istediğim kısaca şöyle;

"Generate Order Form" isimli butona bastığımda yeni bir dosya açılsın, oluşturduğum form herhangi bir veri, biçim ve resim kaybı olmadan yeni dosyaya aktarılsın ama butonlardan hiçbiri gelmesin.

Yardım edebilirseniz sevinirim.


İyi günler

 

[zafer]

Merhaba

Kodlar aşağıda dır

Bu işlemi Makrolardan yeni kayıt yarat'ı seçip
sonra işlemlerinizi yaparsanız sizde kodların nasıl oluştuğuna dair bilgilendirilmiş olursunuz.


Makro yeni kayıt yarat'ı seçin

1 - kopyalanacak tüm sayfayı seçin
2 - Kopyala ya basın
3 - yeni bir sayfa açın
4 - yapıştırı seçin

Makrolarda kaydı durduru seçin

kodlarınız aşağıdaki gibi olacaktır.
Sub ekle()
Cells.Select
Selection.Copy
Workbooks.Add
ActiveSheet.Paste
Range("a1").Select
End Sub

 

[coselimoglu]

Sayın Zafer,

Teşekkür ederim.