• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Sorgu için arama sonuçları: ExportAsFixedFormat

  1. W

    VBA ile gönderilen mail kodunda PDF düzeltmesi

    Geç gördüm cevabınızı. Teşekkürler destek için
  2. H

    VBA ile gönderilen mail kodunda PDF düzeltmesi

    ...isim = Date & "-" & s1.Name ' PDF satırlarını tamamen kaldırdık ' yol = ActiveWorkbook.Path & "\" & isim ' s1.ExportAsFixedFormat Type:=xlTypePDF, Filename:=yol, Quality:=xlQualityStandard, _ ' IncludeDocProperties:=True, IgnorePrintAreas:=False...
  3. W

    VBA ile gönderilen mail kodunda PDF düzeltmesi

    Sayın @muhasebeciyiz teşekkürler, buda alternatif güzel bir çözüm. Mail gitmeden önce yüklenmiş olarak ekranda, gönder olayını manuel yapıyoruz. Mail üzerinde değişiklik yapılabiliyor.
  4. M

    VBA ile gönderilen mail kodunda PDF düzeltmesi

    ...isim = Format(Date, "yyyy-mm-dd") & "-" & s1.Name yol = ActiveWorkbook.Path & "\" & isim pdfPath = yol & ".pdf" s1.ExportAsFixedFormat Type:=xlTypePDF, Filename:=pdfPath, Quality:=xlQualityStandard, _ IncludeDocProperties:=True, IgnorePrintAreas:=False...
  5. W

    VBA ile gönderilen mail kodunda PDF düzeltmesi

    ...As Worksheet Set s1 = ActiveSheet isim = Date & "-" & s1.Name yol = ActiveWorkbook.Path & "\" & isim s1.ExportAsFixedFormat Type:=xlTypePDF, Filename:=yol, Quality:=xlQualityStandard, _ IncludeDocProperties:=True, IgnorePrintAreas:=False...
  6. Korhan Ayhan

    Soru pdf yapma macro yavaşlığı

    ...= masaustu & dosyaAdi hedefDosya = hedefYol & dosyaAdi '--- PDF'yi masaüstüne oluştur ActiveSheet.Range("A1:Q164").ExportAsFixedFormat _ Type:=xlTypePDF, _ Quality:=xlQualityMinimum, _ OpenAfterPublish:=False, _ Filename:=kaynakDosya '---...
  7. I

    Soru pdf yapma macro yavaşlığı

    Teşekkür ederim çok güzel olmuş
  8. Korhan Ayhan

    Soru pdf yapma macro yavaşlığı

    ...= masaustu & dosyaAdi hedefDosya = hedefYol & dosyaAdi '--- PDF'yi masaüstüne oluştur ActiveSheet.Range("A1:Q164").ExportAsFixedFormat _ Type:=xlTypePDF, _ Quality:=xlQualityMinimum, _ OpenAfterPublish:=False, _ Filename:=kaynakDosya '---...
  9. I

    Soru pdf yapma macro yavaşlığı

    ...MAİLLER\" yil = Year(Date) ay = Month(Date) gun = ActiveSheet.Name If Len(ay) < 2 Then ay = 0 & ay ActiveSheet.Range("A1:Q164").ExportAsFixedFormat Type:=xlTypePDF, Quality:=xlQualityMinimum, OpenAfterPublish:=True, fileName:=yol & "TR - " & yil & "-" & ay & "-" & gun & ".pdf" End Sub
  10. netzone

    Çalışma Sayfasını PDF olarak kayderken excel uzantısını yazmaması

    ...tam yol SvAs = PathName & "\" & ThisWorkbookName & "_" & ThisSheetName & ".pdf" ' PDF olarak kaydet ActiveSheet.ExportAsFixedFormat _ Type:=xlTypePDF, _ Filename:=SvAs, _ Quality:=xlQualityStandard, _ IncludeDocProperties:=True, _...
  11. M

    makro kaydetme sorunu

    ...= Path & DosyaAdi & "_" & Sayac & ".pdf" Sayac = Sayac + 1 Loop ' PDF kaydet Worksheets("İZİN FORMU").ExportAsFixedFormat _ Type:=xlTypePDF, _ Filename:=TamYol MsgBox "PDF başarıyla kaydedildi:" & vbCrLf & TamYol, vbInformation End Sub Dener...
  12. S

    makro kaydetme sorunu

    ...Worksheets("AYARLAR").Range("J11").Text ADISOYADI = Worksheets("İZİN FORMU").Range("C5").Value Worksheets("İZİN FORMU").ExportAsFixedFormat xlTypePDF, Filename:=Path & ADISOYADI & "_" & Date & ".pdf" End Sub Merhaba, Bu şekil de kaydetmek için çalıştırdığım bir makrom var...
  13. E

    VBA ile Word dosyasındaki belirli sayfaları isim seçerek yazdırmak

    Elinize Emeğinize sağlık. Allah işinizi rast getirsin. Teşekkür ederim
  14. N

    VBA ile Word dosyasındaki belirli sayfaları isim seçerek yazdırmak

    ...With .Sections(i) isim = Split(.Range.Paragraphs(2).Range.Text, vbCr)(0) ActiveDocument.ExportAsFixedFormat ActiveDocument.Path & "\" & isim & ".pdf", _ wdExportFormatPDF, False, wdExportOptimizeForPrint, wdExportFromTo, i, i, wdExportDocumentWithMarkup, _...
  15. E

    VBA ile Word dosyasındaki belirli sayfaları isim seçerek yazdırmak

    isim = Rng.Paragraphs(2).Range.Text run-time error '5941' Grupta listelenen eleman yok hatası veriyor
  16. N

    VBA ile Word dosyasındaki belirli sayfaları isim seçerek yazdırmak

    ...Name:="\page") isim = Rng.Paragraphs(2).Range.Text isim = Replace(isim, vbCr, "") .ExportAsFixedFormat .Path & "\" & isim & ".pdf", _ wdExportFormatPDF, False, wdExportOptimizeForPrint, wdExportFromTo, i, i, wdExportDocumentWithMarkup, _ False, False...
  17. M

    word Adres mektup birleştirme ile üretilen sayfaları tek tek pdf yapma

    ...fileName = Replace(fileName, "/", "-") Else fileName = "Page_" & I End If tempDoc.ExportAsFixedFormat OutputFileName:=xPathStr & "\" & fileName & ".pdf", _ ExportFormat:=wdExportFormatPDF, OpenAfterExport:=False, _...
  18. E

    word Adres mektup birleştirme ile üretilen sayfaları tek tek pdf yapma

    ...Then xEndPage = ActiveDocument.BuiltInDocumentProperties(wdPropertyPages) End If For I = xStartPage To xEndPage ActiveDocument.ExportAsFixedFormat xPathStr & "\Page_" & I & ".pdf", _ wdExportFormatPDF, False, wdExportOptimizeForPrint, wdExportFromTo, I, I, wdExportDocumentWithMarkup, _ False...
  19. E

    VBA ile Word dosyasındaki belirli sayfaları isim seçerek yazdırmak

    ...= ActiveDocument.BuiltInDocumentProperties(wdPropertyPages) End If For I = xStartPage To xEndPage ActiveDocument.ExportAsFixedFormat xPathStr & "\Page_" & I & ".pdf", _ wdExportFormatPDF, False, wdExportOptimizeForPrint, wdExportFromTo, I, I...
  20. celikomerh

    Userform sayfa yazdırma (Başlık sabitleme)

    ...& SonSatır wsExtre.PageSetup.PrintArea = Alan PDFYolu = ThisWorkbook.Path & "\PDF\" & TbS1 & ".pdf" wsExtre.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ PDFYolu, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _ :=False...
Üst