söylemiş olduğum düzeltme yapmamışsın ben 4 sayfa ekleyip bunları yazdırma butonu eklenebilirmi onu sormuştum teşekkürler

Sn: Beyazasker programda 29 sayfa var sen yapmak istediğini bir dosya ile upload edersen ona göre daha iyi yardımcı oluruz yani datanı ve formunu hazırla eksiklerin için yardımcı olayım Örnek olarak bir kod vereyim

Private Sub yaz_Click()

On Error Resume Next

soru = MsgBox("Sayfa Yazdırılacak, Önizleme Yapmak İstiyor musunuz?", vbYesNo, "Önizleme")

If soru = vbYes Then

DataAc.Hide

Sheets("Print").PrintPreview

DataAc.Show

Range("A1").Select

Else

Sheets("Print").PrintOut

End If

End Sub 

Birde vermiş olduğum Likten bu Programı indirip incelersen sana yardımcı olacaktır

http://www.4shared.com/file/141535477/17...itesi.html

Paylaşım için teşekkürler.

Teşekkürler...

tesekkur ederım

Selamlar. Programınız çok güzel. Sizden bir ricam olacak. Bizim bir futbol turnuvamız var. Bu programda A-B-C değerleri yerine takım isimlerini bunun içinede futbolcu bilgilerini yazmak istiyorum. nasıl düzenleyebilirim. Saygılarımla