Makro hata

[muratgunay48]

Arkadaşlar bu hata nedir. Sürekli çıkmıyor. Bazen çıkıyor. Devam deyince PDF çeviriyor yine. Sanki Acrobatla ilgisi var.
Şimdiden teşekkür ederim.
Saygılarımla.

 

[Korhan Ayhan]

Standart pdf kaydetme kodlarıdır. Verdiği hata nedir?

 

[muratgunay48]

Standart pdf kaydetme kodlarıdır. Verdiği hata nedir?

Hocam, Belge açık diyor. Açık değil. End tıklarsam PDF alıyor ama userform kapanıyor. Debug tıklarsam. Biraz önce koyduğum fotoğraf çıkıyor.

 

[Korhan Ayhan]

Örnek dosyanızı ekleyin bizde deneyelim.

 

[muratgunay48]

Örnek dosyanızı ekleyin bizde deneyelim.

Hocam, daha önce de söylemiştim. Affınıza sığınarak 100 yerde kurum adı geçiyor. Size özel olsa gönderirim. Yalnız şöyle.

Application.PrintCommunication = True
ChDir "C:\Users\Günay\Desktop\ALINAN\RAPORLAR"
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Users\Günay\Desktop\ALINAN\RAPORLAR\XXXXXX.pdf", Quality:= _
xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
OpenAfterPublish:=False
'ActiveWorkbook.Save
'ActiveWindow.Close

Bu alttakileri kapattım, tıklayınca tüm raporları çevirip kaydediyor. Userformu en son kapatınca (soruyor, kaydet-kaydetme-tümünü kaydet) diye. Tümünü kaydet diyorum. 100 kere tıklamamış oluyorum.
Geçici bir çözüm sanki ama.

 

[Korhan Ayhan]

Yaptığınız uygulama çözüm olduysa mesele yoktur.

 

[muratgunay48]

Yaptığınız uygulama çözüm olduysa mesele yoktur.

İlginize çok teşekkür ederim hocam.
Bir şey öğrendiysek sizler sayesine.