Düşey Ara formul sonucunu okutmak.

[mf.murat]

ARkadaşlar Ek'te gönderdiğim dosyada PDF butonuyla sayfayı pdf olarak kaydediyorum.Tabi masa üstünde kayıtlı olduğunda. Farklı klasör içine aldığımda kayıt işleminde hata veriyor.

Pdf dosya ismini D5 hücresindeki değere göre kaydetmesini istiyorum fakat D5 hücres başka sayfadan Düşey ara formuluyle veri aldığı için Pdf dosyası isimsiz kaydediliyor.Formul sonucunu okuyamıyor.

D5 hücresindeki formul sonucuna göre pdf dosya ismini nasıl oluşturabilirim.

Lütfen yardımlarınızı bekliyorum.

 

[Korhan Ayhan]

Selamlar,

Kod bloğunuza aşağıdaki satırları uygulayın.

    Pdf_adi = syf.Range("D5")
    yol = ThisWorkbook.Path & "\" & Pdf_adi & ".ps"

 

[mf.murat]

teşekkür ederim.Verdiğiniz kodlar ile dosya ismini alabiliyorum.

Peki sayfayı başka klasör içine aldığım zaman neden pdf çalışmıyor.
Sadece exceli masa üstünde tuttuğumda çalışıyor.