• DİKKAT

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

  • Merhaba,
    Forumumuz yeni bir sunucuya taşındı.

    Bazı kullanıcı bilgilerinin taşınmasında hatalar olmuş.
    Foruma giriş yapamıyorsanız lütfen bir süre bekleyin. Eksik verileri tamamlamak için çalışıyoruz.
    Hata düzelince tekrar bilgi paylaşacağız.


    Eksik kullanıcı verileri geri yüklendi.
    Sorun yaşamaya devam eden varsa lütfen admin@excel.web.tr ye bilgi verin.

Sorgu için arama sonuçları: ExportAsFixedFormat

  1. A

    Çözüldü Hücre İsmine Göre PDF olarak Farklı Kaydetme

    Aşağıdaki kod işinizi görebilir. Kolay gelsin Sub PDFYazdır() ActiveWorkbook.Sheets("form").ExportAsFixedFormat _ Type:=xlTypePDF, _ Filename:="C:\Users\USER\Desktop\Yeni klasör\" & Sheets("form").Range("H8").Value & ".pdf", _ Quality:=xlQualityStandard, _...
  2. Korhan Ayhan

    Textbox icerisindekini makroda kullanma

    ...Seri = Trim(Replace(Worksheets("Electric").Shapes("TextBox 52").TextFrame2.TextRange.Characters.Text, vbTab, "")) ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:=Path & Model & "_" & Seri & ".pdf", _ Quality:=xlQualityStandard, _ IncludeDocProperties:=True, _...
  3. F

    Textbox icerisindekini makroda kullanma

    Hocam çok teşekkür ederim ellerinize sağlık tam istediğim gibi çok sağolun.
  4. Korhan Ayhan

    Textbox icerisindekini makroda kullanma

    ...Seri = Worksheets("Material removal").Shapes("TextBox 51").TextFrame2.TextRange.Characters.Text ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:=Path & Model & "_" & Seri & ".pdf", _ Quality:=xlQualityStandard, _ IncludeDocProperties:=True, _...
  5. M

    Textbox icerisindekini makroda kullanma

    textbox1 nesnesi sayfanızın üzerindemi,bende herhangi bir hata vermeden çalışıyor
  6. F

    Textbox icerisindekini makroda kullanma

    ...Path = Worksheets("Ayarlar").Range("B1").Text Model = Worksheets("Material removal").Range("textbox52").Value Seri = Worksheets("Material removal").Range("textbox51").Value Worksheets("Material removal").ExportAsFixedFormat xlTypePDF, Filename:=Path & Model & "_" & Seri & ".pdf" End Sub
  7. M

    Textbox icerisindekini makroda kullanma

    ...Destination:=NewSheet.Cells For Each obj In NewSheet.Shapes obj.Delete Next obj NewSheet.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:=DosyaYolu, _ Quality:=xlQualityStandard, _ IncludeDocProperties:=True, _...
  8. F

    Makro İle Dosyayı .xlsx Formatında Outlook a Atmak

    ...Exit Sub End If Yol = ThisWorkbook.Path Dosya_Adi = Range("AX18") & ".pdf" Range("Print_Area").ExportAsFixedFormat Type:=xlTypePDF, _ Filename:=Yol & "\" & Dosya_Adi, _ Quality:=xlQualityStandard, _ IncludeDocProperties:=True, _ IgnorePrintAreas:=False, _...
  9. M

    Çözüldü Makro ile Sectigimiz Raporlari PDF olarak print almak

    ...To RaparNo2 Range("I3").Value = "NFE1-TFN-PIP-PWHT-" & i ' PDF'leri kaydetme islemi ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, FileName:=FilePath & "NFE1-TFN-PIP-PWHT-" & i & ".pdf", Quality:=xlQualityStandard Next i ' Islem tamamlandi...
  10. A

    tikladikca büyüyen buton yazisi

    ...& ".PDF" yol = "C:\Users\aadigital\Documents\Dispense_Unit\" With Sheets("Dispense_unit") .ExportAsFixedFormat _ Type:=xlTypePDF, _ Filename:=yol & isim, _ Quality:=xlQualityStandard, _ IncludeDocProperties:=True, _ IgnorePrintAreas:=False, _...
  11. A

    Pdf i webbrowsera kaydetme

    ...& ".PDF" yol = "C:\Users\oezcan\document\Dispense_Unit" With Sheets("Dispense_unit") .ExportAsFixedFormat _ Type:=xlTypePDF, _ Filename:=yol & isim, _ Quality:=xlQualityStandard, _ IncludeDocProperties:=True, _ IgnorePrintAreas:=False, _ OpenAfterPublish:=False...
  12. byfika

    Office 2007 de PDF yapma hatası

    ...As String simdi = Now simdi = Replace(simdi, ":", ".") Sheets("Satıs").Visible = True Sheets("Satıs").Select Sheets("Satıs").ExportAsFixedFormat Type:=xlTypePDF, Filename:="C:\Users\windows 8.1\Desktop\S P\A V\SATIŞLAR\" & Sheets("Satıs").Range("b2") & " - " & simdi & ".pdf"...
  13. ttb

    Çözüldü MAKRO İLE FARKLI BİR SHEETİ PDF OLARAK KAYDETME

    Çok teşekkür ederim. Elinize sağlık.
  14. M

    Kod içindeki klasör yolunu düzenlemek

    ...Set Yeni_Mail = Uygulama.CreateItem(0) Dosya_Adi = S1.Range("G3").Value & " " & S1.Range("G5").Value & ".pdf" S1.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:=Yol & "\" & Dosya_Adi, _ Quality:=xlQualityStandard, _ IncludeDocProperties:=True, _...
  15. Korhan Ayhan

    Çözüldü MAKRO İLE FARKLI BİR SHEETİ PDF OLARAK KAYDETME

    Merhaba, Şu bölümü; ActiveSheet.ExportAsFixedFormat Aşağıdaki gibi değiştirip deneyiniz. Sheets("EK2A").ExportAsFixedFormat
  16. ttb

    Çözüldü MAKRO İLE FARKLI BİR SHEETİ PDF OLARAK KAYDETME

    ...şekilde ifade edebilmişimdir. Tekrar teşekkürler. Private Sub EK2A() Application.ScreenUpdating = False ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ CreateObject("WScript.Shell").SpecialFolders("Desktop") & "/EK2A" & Sheets("EK2A").Range("F30") &...
  17. halit3

    Pdf olarak kaydetmek

    ...= False Yol = ThisWorkbook.Path Say = CreateObject("Scripting.FileSystemObject").getfolder(Yol).Files.Count + 1 ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:=Yol & "\" & Say & ".pdf", _ Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _...
  18. T

    Çözüldü Excel Çalışma Kitabındaki Sayfanın xlsx Uzantılı Olarak Microsoft Outlook Programına Giden Maile Ek Olarak Eklenmesi Hk.

    ...yok" Exit Sub End If Kaynak = "C:\Perform_pdf\" If Right(Kaynak, 1) <> "\" Then End If yer = Kaynak & dosya_adı Range("A1:AU48").ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ yer, Quality:=xlQualityStandard, _ IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False...
  19. skaan

    Çözüldü Excel Çalışma Kitabındaki Sayfanın xlsx Uzantılı Olarak Microsoft Outlook Programına Giden Maile Ek Olarak Eklenmesi Hk.

    ...& Satir4).Value = Bilgi4 ' Yazdırma alanını belirle ve PDF olarak kaydet With Proforma .ExportAsFixedFormat Type:=xlTypePDF, Filename:=TamDosyaAdi, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False End With...
Üst