Raporu Pdf Olarak Kayıt etmek

1 2
01/11/2016, 01:05

m_demir

Merhaba Hocalarım.
Eklediğim uygulamada Veresiye Satış Formunda Ayrıntılı Rapor veya Toplam Rapor butonuna tıkladığım zaman Yazıcı seç formu açılıyor. Bu forma Pdf Kaydet butonu ekledim. Raporu Pdf olarak kayıt etmek istiyorum. 

Eğer oluyorsa Pdf Kaydet butonuna tıkladığım zaman kayıt yapacağım klasörü sorsun. Kayıt kapılacak Klasörü seçip raporun adın yazarak kayıt yapmak istiyorum.  Bu konuda yardımlarınıza ihtiyacım var. İyi çalışmalar.
01/11/2016, 16:18

atoz112

sayın m_demir,

EK'te;
bahsettiğiniz talebinize yönelik olarak hazırlanmış örnek uygulama mevcuttur.inceleyebilirsiniz.

NOT
klasörü seçtikten sonra,Kaydet Diyalog Penceresindeki TAMAM butonuna tıklamanız yeterlidir.

bilginize...iyi çalışmalar,saygılar.
01/11/2016, 22:16

m_demir

Çok, çok teşekkürler Hocam ellerinize sağlık. Çok güzel olmuş.

Hocam klasörü seçtikten sonra,Kaydet Diyalog Penceresindeki TAMAM butonuna tıkladığım zaman daha önce kayıt yaptığım raporun üstüne kayıt yapıyor. 
Klasörü seçtikten sonra bir önceki raporun üstüne değil de faklı olarak kayıt yapmasını istiyorum. O denenle diyalog penceresi açıldığı zaman Klasör Adı: gibi Dosya Adı: metin kutusu da olsa çok iyi olur. 
02/11/2016, 01:47

ozanakkaya

Butonun tıklandığında olayındaki kodları aşağıdaki ile değiştirerek deneyiniz.

 Dim PencereAc As FileDialog
Dim AktarilanBelge As Variant

Set PencereAc = Application.FileDialog(msoFileDialogSaveAs)
   
   With PencereAc
       .Title = "Rapor Kaydet"
       .InitialFileName = "Genel Rapor " & Format(Now(), "ddmmyyyyhhnn") & ".pdf"
       
       If .Show = True Then
       
           For Each AktarilanBelge In .SelectedItems
               DoCmd.OutputTo acOutputReport, "GenelRapor", acFormatPDF, AktarilanBelge & ".pdf", True
           Next AktarilanBelge
       Else
           MsgBox "Dosya seçilmedi"
       End If
   End With
02/11/2016, 03:28

m_demir

Çok, çok teşekkürler Hocam ellerinize sağlık. Tam istediğim gibi olmuş.
Hocam konuyu taşıyabilirsiniz saygılarımla iyi çalışmalar.
02/11/2016, 11:19

atoz112

sayın m_demir,

EK'te;

konunuzun 3.mesajında

Alıntı:Klasörü seçtikten sonra bir önceki raporun üstüne değil de faklı olarak kayıt yapmasını istiyorum. O denenle diyalog penceresi açıldığı zaman Klasör Adı: gibi Dosya Adı: metin kutusu da olsa çok iyi olur. 

bahsettiğiniz talebinize yönelik,alternatif kullanım olarak hazırlanmış örnek uygulama mevcuttur.inceleyebilirsiniz.

bilginize...iyi çalışmalar,saygılar.
1 2