Kaydet Butonuna Basılınca PDF Olarak Kaydetme [YARDIM - ÇÖZÜLMEDİ]

[halit3]

11 NO'lu mesajda hazır kodu yazdım GENE olmadı diyorsunya, al o hazır kod dediğin kodun ekran görüntüsü.. O dediğin eklendi kurulmuş olmasına rağmen..

http://prntscr.com/vgwap

Bu konuya mesaj yazdığımdan bu yana tam 12 gün geçmiş ben konuyu unutmuştum.

Bu konu ile ilgili formda bir çok konu başlığı var siz olmuyor diyorsunuz başka bir şey söylemiyorsunuz ofis 2010 da bir çok dll uyuşmazlıkları var ben ofis 2010 kullanmıyorum ofis 2007 de durum böyle ama işin mantığı aynı

Bu görsel videoda herşeyi anlıyacaksınız.


görsel video

 

[ayhanfuat]

asi kral'ın kodunu 2010'da şu şekilde değiştirince çalıştı bende.

Sub pdf()
Dim SYF As Long, S1 As Worksheet
For SYF = 2 To Sheets.Count
Set S1 = Sheets(SYF)
S1.ExportAsFixedFormat Type:=xlTypePDF, Filename:="D:\musteriler\" & S1.Name & ".pdf", Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False
Next
End Sub

 

[uyguralp]

sanırım oldu ama tek sayfa yazdırmak gerekiyor 44 sayfa yazıyor.