Sorgu için arama sonuçları: ExportAsFixedFormat

  1. A

    Soru Excel Dosyasını Pdf Olarak kayıt etme

    ...As String Set s1 = Sayfa1 'çıktı alınacak sertifika sayfası konum = CreateObject("WScript.Shell").SpecialFolders("Desktop") & "\" adi = s1.Range("D3") & " EĞİTİM SERTİFİKASI " & s1.Range("E20") uzanti = ".pdf" s1.ExportAsFixedFormat Type:=xlTypePDF, Filename:=konum & adi & uzanti End Sub
  2. Korhan Ayhan

    Otomatik Pdf yapma

    ...S1.PageSetup.Orientation = xlPortrait Else S1.PageSetup.Orientation = xlLandscape End If S1.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:=ThisWorkbook.Path & "\" & Musteri & " - Mutabakat Mektubu.pdf", _ OpenAfterPublish:=False Next...
  3. B

    pdf Kaydetme Sorunu

    Çok Teşekkürler İşimi gördü bu kod Hürmetler
  4. dEdE

    pdf Kaydetme Sorunu

    Merhaba, kitap.Close False satırından önce aşağıdaki satırları ekleyerek dener misiniz? Yol_Dosya_Adı = "C:\Users\ozdem\Desktop\Aaaa.pdf" 'Kendinize göre değiştiriniz. ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=Yol_Dosya_Adı
  5. M

    PDF olarak mail göndermek.

    ...Dosya_Adi = Range("H16") & "-" & Range("I16") & " - " & Range("C14") & " " & Range("F6") & ".pdf" Range("Print_Area").ExportAsFixedFormat Type:=xlTypePDF, _ Filename:=Yol & "\" & Dosya_Adi, _ Quality:=xlQualityStandard, _ IncludeDocProperties:=True, _...
  6. M

    PDF olarak mail göndermek.

    ...Dosya_Adi = Range("H16") & " " & Range("C14") Range("Print_Area").ExportAsFixedFormat Type:=xlTypePDF, _ Filename:=Yol & "\" & Dosya_Adi, _ Quality:=xlQualityStandard, _ IncludeDocProperties:=True, _ IgnorePrintAreas:=False, _ OpenAfterPublish:=False Set...
  7. RBozkurt

    Soru VBA Word Doldurma Hatası Hakkında

    Sayın @Korhan Ayhan üstadım. Emeğinize sağlık. Verileri çoğaltıp denedim sonuç resimdeki gibi. Teşekkür ederim.
  8. Korhan Ayhan

    Soru VBA Word Doldurma Hatası Hakkında

    ...End If If Dir(Dosya) <> "" Then GoTo 10 .ExportAsFixedFormat OutputFileName:=Dosya, _ ExportFormat:=wdExportFormatPDF, OpenAfterExport:=False, OptimizeFor:= _ wdExportOptimizeForPrint, Range:=wdExportAllDocument...
  9. ReformTech

    Soru VBA ile belirli konumdaki veriyi Dosya adı olarak PDF kaydetme

    ...dosya adının alınması gereken hücre aralığını belirten kod Dosyadi = Worksheets("Veri").Range("I2:I10").Value ActiveSheet .ExportAsFixedFormat Type:=xlTypePDF, Filename:= "Path" & "Dosyadi" & ".pdf" Quality:=xlQualityStandard, IncludeDocProperties:=True...
  10. S

    VBA - PDF OLARAK DOSYAYA KAYIT

    Korhan Bey, İlginiz için teşekkür ederim. Textbox olarak yazabileceğim (Excel içerisinde) PDF ismini oluşturup belirttiğim dosyaya kaydetmesini sağlayamıyorum bir türlü.
  11. Korhan Ayhan

    VBA - PDF OLARAK DOSYAYA KAYIT

    ...MsgBox "İşleme devam edebilmeniz için dosya adını girmelisiniz!", vbCritical Exit Sub End If Sheets(1).ExportAsFixedFormat Type:=xlTypePDF, _ Filename:=File_Path & File_Name & ".pdf", _ Quality:=xlQualityStandard, _...
  12. S

    VBA - PDF OLARAK DOSYAYA KAYIT

    Merhaba, Yapamadığım için destek rica ediyorum.
  13. Korhan Ayhan

    VBA - PDF OLARAK DOSYAYA KAYIT

    Merhaba, Linkteki bağlantıları inceleyiniz. https://www.excel.web.tr/search/283467/?q=ExportAsFixedFormat&o=date
  14. E

    Makro ile pdf Kaydedilen dosyayı Mail Gönderme

    ...shf2.[G12].Value = shf2.[G33].Value Set shf2 = Nothing Set shf2 = Nothing End Sub Sub CreatePDF() ThisWorkbook.ExportAsFixedFormat xlTypePDF, Filename:="c:\PDF\" & "deneme _ " & Date & ".pdf" Application.Wait (Now + TimeValue("00:00:10")) Dim OutApp As Object...
  15. N

    Makro ile pdf Kaydedilen dosyayı Mail Gönderme

    Merhaba, Şöyle dener misiniz. ThisWorkbook.ExportAsFixedFormat xlTypePDF, Filename:="c:\PDF\" & "deneme _ " & Date & ".pdf"
  16. E

    Makro ile pdf Kaydedilen dosyayı Mail Gönderme

    ...Attachments kısmına yada başka bir yere ne gibi bir komut yazabilirim. Kod aşağıdadır. Sub CreatePDF() ThisWorkbook.ExportAsFixedFormat xlTypePDF, Filename:="\\c::\PDF\deneme.pdf" & "_" & Date Application.Wait (Now + TimeValue("00:00:10")) Dim OutApp As Object...
  17. halit3

    ListBoxta seçilen sayfaları PDF olarak Kaydetme

    ...= False yol = ThisWorkbook.Path say = CreateObject("Scripting.FileSystemObject").GetFolder(yol).Files.Count + 1 ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=yol & "\" & say & ".pdf", _ Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _...
  18. RBozkurt

    Word Dosyalarını Toplu PDF'ye Çevirmek

    @halit3 ustam merhaba. Makronuz çalışıyor. Problem yok. Excel dosyasının olduğu dizindeki word dosyalarını aynı dizine aynı isimle kaydediyor. Bu işlemi dosyaları browse yöntemiyle seçtirerek yapabilir miyiz? Teşekkür ederim.
  19. furkani

    Method 'ExportAsFixedFormat' of object '_Worksheet' failed

    ...şekilde gayet güzel çalışan makroda hata almaya başladım, nedenini bulamadığım için size sormak istedim. Hata metni; Method 'ExportAsFixedFormat' of object '_Worksheet' failed Hata aldığım satır ise; S1.ExportAsFixedFormat Type:=xlTypePDF, Filename:=Yol & "\" & Dosya_Adi...
  20. S

    rapor oluşturma

    ...= CreateObject("WScript.Shell") Klasor = oWSHShell.SpecialFolders("Desktop") Set oWSHShell = Nothing Sheets("GELENEVRAK").ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ Klasor & "\GELEN EVRAK KAYIT " & Format(Now, "yyyymmdddd hhmmss") & ".pdf", Quality:=xlQualityStandard, _...
Üst