AccessTr.neT

Excelde secili alanı rapor olarak PDF formatında outlook üzerinden mail gönderme öncelikle PFD formatına dönüştürmek için klasör içerisinde bulunan SaveAsPDFandXPS.exe dosyasını kurmamız gerekir ve Office 2007 ve üstü formatlarda çalışır.

Link açılmıyor.

(23/02/2016, 17:15)brhmkrtog yazdı: [ -> ]Link açılmıyor.

Hangi link açılmıyor acaba?

Merhaba,
Hatalı yazım olmuş link değil ek olacaktı.
Fakat açtım eki sıkıntı yok TEŞEKKÜR ederim

Sorum şu şekilde ;
Kullanmış olduğum Excel dosyasında belirli olan stunlar jpg formatında yada pdf formatında otomatik olarak belirli saatlerde kişiye mail atacak.
Sayfa kendidi belirli saatlerde yenileyecek ve maili gönderecek.

Bunun için elimde şu formül mevcut ;


Sub zaman()
On Error Resume Next
Application.DisplayAlerts = False
Application.OnTime Now + TimeValue("23:59:59"), "zaman"


Application.OnTime TimeValue("10:30:00"), "PERSONAL.XLSB!aaa"
Application.OnTime TimeValue("10:35:00"), "Send_Range"

Application.OnTime TimeValue("12:00:00"), "PERSONAL.XLSB!aaa"
Application.OnTime TimeValue("12:05:00"), "Send_Range"

Application.OnTime TimeValue("13:00:00"), "PERSONAL.XLSB!aaa"
Application.OnTime TimeValue("13:05:00"), "Send_Range"

Application.OnTime TimeValue("14:00:00"), "PERSONAL.XLSB!aaa"
Application.OnTime TimeValue("14:05:00"), "Send_Range"

Application.OnTime TimeValue("15:00:00"), "PERSONAL.XLSB!aaa"
Application.OnTime TimeValue("15:05:00"), "Send_Range"

Application.OnTime TimeValue("16:00:00"), "PERSONAL.XLSB!aaa"
Application.OnTime TimeValue("16:05:00"), "Send_Range"

Application.OnTime TimeValue("17:25:00"), "PERSONAL.XLSB!AAAA"
Application.OnTime TimeValue("17:26:00"), "Send_Range"

Application.OnTime TimeValue("18:00:00"), "PERSONAL.XLSB!aaa"
Application.OnTime TimeValue("18:05:00"), "Send_Range"

Application.OnTime TimeValue("19:00:00"), "PERSONAL.XLSB!aaa"
Application.OnTime TimeValue("19:05:00"), "Send_Range"

Application.OnTime TimeValue("20:00:00"), "PERSONAL.XLSB!aaa"
Application.OnTime TimeValue("20:05:00"), "Send_Range"

Application.OnTime TimeValue("21:00:00"), "PERSONAL.XLSB!aaa"
Application.OnTime TimeValue("21:05:00"), "Send_Range"

Application.OnTime TimeValue("22:00:00"), "PERSONAL.XLSB!aaa"
Application.OnTime TimeValue("22:05:00"), "Send_Range"

End Sub



otomatik mail ve pdf çevirmeyi yapamadım yadımcı olabilirmsinizi?