• DİKKAT !

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak Dosya Yükleme tamamen ücretsizdir.

seçili sayfayı pdf kaydet

  1. Extor

    Çözüldü Seçili sayfayı PDF kaydet. Hatam nerede?

    Private Sub CommandButton4_Click() Dim strFilePath As String strFilePath = Application.GetSaveAsFilename(FileFilter:="PDF Files (*.pdf), *.pdf") If strFilePath <> "False" Then ElseIf Range("A1") = "İŞ YERİ TESLİM ve İŞE BAŞLAMA TUTANAĞI" Then Sayfa2.ExportAsFixedFormat Type:=xlTypePDF...
Geri
Üst