-
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
-
Sayfayı pdf formatında buton ile kaydetme
Sub test() Dim pth$, sh$ pth = ThisWorkbook.Path & "\" sh = Sheets("Sheet1").Range("C8").Value Sheets(sh).ExportAsFixedFormat Type:=xlTypePDF, Quality:=xlQualityStandard, _ Filename:=pth & sh & ".pdf" End Sub- veyselemre
- Posta #2
- Forum: Makro-VBA Soruları
-
-
Masaüstü klasör
...= True ----------------------------------------------------------------------- ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ PDFAdresi, Quality:= _ xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _...- muratgunay48
- Posta #9
- Forum: Makro-VBA Soruları
-
B
Masaüstü klasör
...araya biçimlendirme ekleyeceğiz o halde 1.adım exceli açalım 2.Adım Biçimlendir 3.Adım Pdf Kaydet Vs Workbooks.Open Filename:=ExcellAdresi '1.Adım Sheets("TV").Select ....... Application.PrintCommunication = True ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ '3.Adım- bosislermuduru
- Posta #8
- Forum: Makro-VBA Soruları
-
Masaüstü klasör
- muratgunay48
- Posta #7
- Forum: Makro-VBA Soruları
-
Masaüstü klasör
Hiç o açıdan düşünmemiştim. Teşekkür ederim hocam. Emeğinize sağlık.- muratgunay48
- Posta #6
- Forum: Makro-VBA Soruları
-
B
Masaüstü klasör
...PDFAdresi = ActiveWorkbook.Path & "\PDF RAPORLAR\test.pdf" Workbooks.Open Filename:=ExcellAdresi ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ PDFAdresi, Quality:= _ xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _...- bosislermuduru
- Posta #5
- Forum: Makro-VBA Soruları
-
Masaüstü klasör
...RAPORLAR\test.xlsx" ChDir "C:\Users\murat\OneDrive\Masaüstü\RAPORLAR\PDF RAPORLAR" ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\Users\murat\OneDrive\Masaüstü\RAPORLAR\PDF RAPORLAR\test.pdf", Quality:= _ xlQualityStandard...- muratgunay48
- Posta #3
- Forum: Makro-VBA Soruları
-
M
seçili alanı yazdırma ve pdf kaydetme
...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ı...- muhasebeciyiz
- Posta #2
- Forum: Makro-VBA Soruları
-
N
Makroda çözümü kolay olabilecek bir sorun yaşıyorum
....ChartArea.Select End With ChDir "C:\Users\homenar\Desktop\deneme" ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\Users\homenar\Desktop\deneme\" & Sheets("ANADOSYA").Range("B" & satirBaslangic) & ".pdf"...- Narhome
- Posta #3
- Forum: Makro-VBA Soruları
-
M
Makroda çözümü kolay olabilecek bir sorun yaşıyorum
....ChartArea.Select End With ChDir "C:\Users\homenar\Desktop\deneme" ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\Users\homenar\Desktop\deneme\" & Sheets("ANADOSYA").Range("B" & satirBaslangic) & ".pdf"...- muhasebeciyiz
- Posta #2
- Forum: Makro-VBA Soruları
-
N
Makroda çözümü kolay olabilecek bir sorun yaşıyorum
...& i .ChartArea.Select End With ChDir "C:\Users\homenar\Desktop\deneme" ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\Users\homenar\Desktop\deneme\" & Sheets("ANADOSYA").Range("B" & i) & ".pdf", Quality:= _...- Narhome
- Konu
- Cevaplar: 2
- Forum: Makro-VBA Soruları
-
N
Makro ile Grafikleri Yazdırırken Hata alıyorum. ( ActiveSheet.Shapes("Grafik 3") )
...= "='veritabanı'!B & i" ActiveChart.ChartArea.Select ChDir "C:\Users\narhome\Desktop\deneme" ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\Users\narhome\Desktop\deneme\" & Sheets("veritabanı").Range("B" & i) & ".pdf", Quality:= _...- Narhome
- Konu
- Cevaplar: 0
- Forum: Makro-VBA Soruları
-
N
pdf kaydetme 2nci sayfada veri yoksa 1 sayfa pdf
...End If Set shsayfa = Sheets("Bilgi Formu") yol = ActiveWorkbook.Path & "\" & [A3] shsayfa.ExportAsFixedFormat Type:=xlTypePDF, Filename:=yol, Quality:=xlQualityStandard, _ IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True End Sub- necati
- Posta #2
- Forum: Makro-VBA Soruları
-
N
pdf kaydetme 2nci sayfada veri yoksa 1 sayfa pdf
...EDİN") Exit Sub End If Set shsayfa = Sheets("Bilgi Formu") yol = ActiveWorkbook.Path & "\" & [A3] shsayfa.ExportAsFixedFormat Type:=xlTypePDF, Filename:=yol, Quality:=xlQualityStandard, _ IncludeDocProperties:=True, IgnorePrintAreas:=False...- netvolxxx
- Konu
- Cevaplar: 2
- Forum: Makro-VBA Soruları
-
tüm sayfalarda aynı hücreleri toplu pdf olarak kaydetme
...fileName = folderPath & ws.Name & ".pdf" ws.Select ' Sayfayı seç exportRange.ExportAsFixedFormat Type:=xlTypePDF, Filename:=fileName, Quality:=xlQualityStandard MsgBox ws.Name & " sayfası PDF olarak kaydedildi.", vbInformation Next...- okan32
- Posta #4
- Forum: Excel'e Yeni Başlayanlar
-
tüm sayfalarda aynı hücreleri toplu pdf olarak kaydetme
...ws In ThisWorkbook.Sheets fileName = folderPath & ws.Name & ".pdf" ws.Range("AM1:AZ41").ExportAsFixedFormat Type:=xlTypePDF, Filename:=fileName, Quality:=xlQualityStandard MsgBox ws.Name & " sayfası PDF olarak kaydedildi."...- okan32
- Posta #2
- Forum: Excel'e Yeni Başlayanlar
-
Z
Soru Sheets("Sheet2").Select hatası
..." & Range("D2").Value & " - " & Range("B4").Value Sheets("Sheet2").Select ActiveSheet.PageSetup.PrintArea = "A1:D79" ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:=PrintFile, Quality:=xlQualityStandard, _ IncludeDocProperties:=True, IgnorePrintAreas:=False, _...- zozotr
- Konu
- Cevaplar: 2
- Forum: Makro-VBA Soruları
-
sayfalar buton tek pdf yapma
Makro Kaydet => Sub Makro1() Sheets(Array("ÜRÜN", "ÖZELLİKLER")).Select ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "C:\Users\EMRE\Downloads\PDF KAYDET.pdf", Quality:=xlQualityStandard, _...- veyselemre
- Posta #2
- Forum: Makro-VBA Soruları
-
M
Yazdırma alanını hücreden belirtme
Teşekkür ederim. Çalıştı.- Mehmet Sait
- Posta #9
- Forum: Makro-VBA Soruları