çalışma sayfasını pdf (veya word) olarak kaydetme?

[soyga0123]

Merhaba,
excelde sayfa 1'de girilen verilere göre sayfa 2'de grafik oluşturulacak. Userform'a eklenen bir butonla sayfa 2'yi PDF veya word olarak kaydedebilir miyim? Kaydolacak dosyanın adının günün tarihi (gg.aa.yyyy şeklinde) olması da hoş olur. Şimdiden teşekkürler.

 

[mancubus]

pdf:

ilgili UserForm'un kod modülüne kopyalanacak.

düğmenin adının CommandButton1 olduğu varsayılmıştır. değil ise aşağıda kod isminde değiştiriniz.

Private Sub CommandButton1_Click()
    Worksheets("Sayfa2").ExportAsFixedFormat _
        Type:=xlTypePDF, _
        Filename:=ThisWorkbook.Path & "\" & Format(Date, "dd.mm.yyyy"), _
        Quality:=xlQualityStandard, _
        IncludeDocProperties:=True, _
        IgnorePrintAreas:=False, _
        OpenAfterPublish:=False
End Sub

 

[soyga0123]

pdf:

ilgili UserForm'un kod modülüne kopyalanacak.

düğmenin adının CommandButton1 olduğu varsayılmıştır. değil ise aşağıda kod isminde değiştiriniz.

Private Sub CommandButton1_Click()
    Worksheets("Sayfa2").ExportAsFixedFormat _
        Type:=xlTypePDF, _
        Filename:=ThisWorkbook.Path & "\" & Format(Date, "dd.mm.yyyy"), _
        Quality:=xlQualityStandard, _
        IncludeDocProperties:=True, _
        IgnorePrintAreas:=False, _
        OpenAfterPublish:=False
End Sub

Hocam çalıştıramadım. Tıklıyorum hiçbir şey olmuyor. (makro etkin)

 

[mancubus]

dosyayı bir klasöre kaydedin.

 

[soyga0123]

dosyayı bir klasöre kaydedin.

resimdeki hatayı alıyorum.

 

[mancubus]

resim?

çalışan dosyadır.

bu da ürettiği dosya:

 

[soyga0123]

resim?

çalışan dosyadır.

bu da ürettiği dosya:

Run-time Error 5
Invalid Procedure Call or Argument :frown:

 

[Emir Hüseyin Çoban]

Run-time Error 5
Invalid Procedure Call or Argument :frown:

. . .

Office 2003 sürümünde PDF e çevirme özelliği yoktur.

Office 2007 de bu özellik ek yazılım ile yapılabilir.
Program ismi saveaspdfandxps, microsoftun kendi yazılımıdır.
Tıkla İndir ~ PDF Veya XPS Olarak Kaydet
Programı kurduktan sonra Farklı Kaydet ekranında PDF seçeneğini göreceksiniz.
Yukarıdaki kodların sizde çalışması için, bu programı yüklemelisiniz.

Office 2010 ve üstü sürümlerde ek yazılıma gerek kalmaksızın bu özellik mevcuttur.

. . .

 

[mancubus]

iş yerindeki filtreler nedeni ile resmi görememişim.

hüseyin bey teşekkürler.

eğer imkan dahilinde ise en 2010'a geçmeyi öneririm herkese.

 

[soyga0123]

. . .

Office 2003 sürümünde PDF e çevirme özelliği yoktur.

Office 2007 de bu özellik ek yazılım ile yapılabilir.
Program ismi saveaspdfandxps, microsoftun kendi yazılımıdır.
Tıkla İndir ~ PDF Veya XPS Olarak Kaydet
Programı kurduktan sonra Farklı Kaydet ekranında PDF seçeneğini göreceksiniz.
Yukarıdaki kodların sizde çalışması için, bu programı yüklemelisiniz.

Office 2010 ve üstü sürümlerde ek yazılıma gerek kalmaksızın bu özellik mevcuttur.

. . .

Teşekkürler hocam çalıştı :bravo:

 

[soyga0123]

iş yerindeki filtreler nedeni ile resmi görememişim.

hüseyin bey teşekkürler.

eğer imkan dahilinde ise en 2010'a geçmeyi öneririm herkese.

Teşekkürler hocam