seçili alanı yazdırma ve pdf kaydetme

[onur3466]

merhaba arkadaşlar ,
ekte belirttiğim dosyada teklif formu sayfasında sadece seçili alanı pdf kaydetme butonu koymak istiyorum ve yazdırmak istiyorum. ayrıca kalibrasyon formu sayfasınıda sadece seçili alanı yazdırmak istiyorum . yardımcı olurmusunuz.

 

[muhasebeciyiz]

Sub Kaydet_ve_Yazdir()
    Dim ws As Worksheet
    Dim pdfName As String

    Set ws = ActiveSheet
    pdfName = ThisWorkbook.Path & "\" & ws.Name & ".pdf"
   
    ws.ExportAsFixedFormat Type:=xlTypePDF, Filename:=pdfName, Quality:=xlQualityStandard
   
    ActiveSheet.PrintOut
End Sub

Excel sayfanızda seçili alanları belirleyin

1. Excel'de, klavyeden Alt + F11 tuşlarına basarak VBA düzenleyicisini açın.
2. Üst menüden "Insert" üzerine gelin ve ardından "Module" seçeneğine tıklayarak yeni bir modül oluşturun.
3. Verilen kodu buraya kopyalayın
4. Gerek teklif formu sayfasında ve gerekse kalibrasyon sayfasında bu makroyu bir butona atayarak daha kolay erişim sağlayabilirsiniz.
5. Sonrasında makroyu kullanarak belirli bir sayfadaki verileri PDF olarak kaydedebilir ve ardından yazdırabilirsiniz.

 

[onur3466]

çok teşekkür ederim