Gelen maille aktif olabilecek bir program yazılabilirmi?

[kadirdaylight]

Herkese merhaba,

Benim sorum şu; Elimde bir program var bu programa veri girişi yapılınca kendisi otomatik olarak atadığım adrese mail yollayabiliyor.

Benim derdim ise bu mail yollanınca gittiği yerde öyle bir program olsun ki çalıştırıp ekrana veri girişi yapıldı şeklinde uyarı versin.

Bunu Excel ile VB ile yapmak mümkün mü? Eğer mümkün değilse araştırmamı hangi alanda yapmalıyım yardımcı olurmusunuz?

 

[kadirdaylight]

Lütfen birisi yardımcı olabilirmi?

 

[Mehmet Şahin]

Merhaba,
mail gönderdiğimiz bilgisayarda outlook varsa ve açık olan bir excel dosyası varsa, içindeki macro'yu çalıştırabiliyoruz. Eğer istediğiniz böyle bir şey ise yardımcı olabiliriz, saygılar.

 

[kadirdaylight]

Merhaba,
mail gönderdiğimiz bilgisayarda outlook varsa ve açık olan bir excel dosyası varsa, içindeki macro'yu çalıştırabiliyoruz. Eğer istediğiniz böyle bir şey ise yardımcı olabiliriz, saygılar.

Sayın dentex,
Kullanmış olduğumuz program çeşitli alanlara veri girişinde tanımladığım adreslere mail yollayabilecek. 22 farklı bilgisayardaki outlook hesaplarına (hangi alanı ilgilendiren veri girişi yapılmışsa o alana) mail yollayabiliyoruz (en azından sistemi kuran kişi bunu yapabileceğini söyledi)

Mail gönderilecek 22 pc için ayrı ayrı outlook hesabı açar ve 24 saat aktif olmasını sağlayabilirim. Bunun yanında bahsetmiş olduğunuz excel i de açık tutarım. Bu durumda nasıl bir kodlama yapmamız gerekli? Ben basit düzeyde VB ve Excel biliyorum yardımcı olabilirseniz çok sevinirim.

 

[Mehmet Şahin]

Merhaba,
tamamdır. Sadece "Veri girilmiştir" uyarısı mı almak istiyorsunuz.
Bir de merakımı mazur görün, eğer sadece bir uyarı ise, outlook, zaten mail gelince uyarı penceresi açabilir.
Bunun dışında yukarıda yazdığım gibi excelin içinde bir makroyu tetikleyip sesli ve görsel uyarı verebilir ve kayıt vb. gibi bir
işi yaptırabiliriz. Siz buna karar verin ben yordamı burada detaylı olarak açıklayacağım, saygılar.

 

[Mehmet Şahin]

Outlook açıkken Alt+F11 ile visualbasic editörüne girin. Insert - Module ile modül ekleyin ve aşağıdaki kodu yapıştırın.
Araçlar - Başvurular (Tools - References) dan Microsoft Excel 11.0 Object Library veya Microsoft Excel 12.0 Object Library hangisi varsa
işaretleyin ve saklayın. Outlook'u kapatıp yeniden açın. Araçlar ve seçeneklerden Kurallar ve İkaz(Rules and Alert) - Yeni Kural(New Rule) oluşturun ve Yeni mesaj gelince(check message when they arrive) seçin sonraki(next) aşamaya geçin, burada belirlenebilecek bir çok kural vardır.
Örneğimizde, konuda özel kelime(Specific words in the Subject)işaretleyin, aşağıdaki bölümde beliren özel kelime(spesific word) seçeneğini tıklayın. Açılacak pencereye kendi belirlediğiniz bir kelime yazıp, ekleyerek bu pencereyi kapatın. Sonraki(next) ile sonraki aşamaya geçin ve (run script) Türkçesi "betik çalıştır" olabilir, işaretleyin.
Ekteki excel dosyası açıkken konu bölümünde yukarıda belirlediğiniz kelime yazan mail gelince macro çalışacak ve sesli uyarı verip mesaj penceresi açılacaktır.

Sub ExcelMacro(MyMail As MailItem)

Dim objMail As Outlook.MailItem
Dim eApp As Excel.Application
    Set eApp = GetObject(, "Excel.Application") 
    eApp.Run "test"
End Sub

 

[kadirdaylight]

Merhaba,
tamamdır. Sadece "Veri girilmiştir" uyarısı mı almak istiyorsunuz.
Bir de merakımı mazur görün, eğer sadece bir uyarı ise, outlook, zaten mail gelince uyarı penceresi açabilir.
Bunun dışında yukarıda yazdığım gibi excelin içinde bir makroyu tetikleyip sesli ve görsel uyarı verebilir ve kayıt vb. gibi bir
işi yaptırabiliriz. Siz buna karar verin ben yordamı burada detaylı olarak açıklayacağım, saygılar.

Açıklamanız için çok teşekkür ederim. Evet benim istediğim mail gelince görsel ve sesli olarak uyarı verdirebilmek. Excel i kullanmamdaki amaç hem görsellik katmak hemde ileriye dönük başka verileri tetikleme yada kayıt tarzı işlemleri yapabilmektir.

Diğer msjınızda yazmış olduklarınızı henüz deneyemedim şuan iş yerindeyim eve gidince ilk işim denemek olacak tekrar teşekkür ediyorum. Görüşmek üzere..

 

[kadirdaylight]

Outlook açıkken Alt+F11 ile visualbasic editörüne girin. Insert - Module ile modül ekleyin ve aşağıdaki kodu yapıştırın.
Araçlar - Başvurular (Tools - References) dan Microsoft Excel 11.0 Object Library veya Microsoft Excel 12.0 Object Library hangisi varsa
işaretleyin ve saklayın. Outlook'u kapatıp yeniden açın. Araçlar ve seçeneklerden Kurallar ve İkaz(Rules and Alert) - Yeni Kural(New Rule) oluşturun ve Yeni mesaj gelince(check message when they arrive) seçin sonraki(next) aşamaya geçin, burada belirlenebilecek bir çok kural vardır.
Örneğimizde, konuda özel kelime(Specific words in the Subject)işaretleyin, aşağıdaki bölümde beliren özel kelime(spesific word) seçeneğini tıklayın. Açılacak pencereye kendi belirlediğiniz bir kelime yazıp, ekleyerek bu pencereyi kapatın. Sonraki(next) ile sonraki aşamaya geçin ve (run script) Türkçesi "betik çalıştır" olabilir, işaretleyin.
Ekteki excel dosyası açıkken konu bölümünde yukarıda belirlediğiniz kelime yazan mail gelince macro çalışacak ve sesli uyarı verip mesaj penceresi açılacaktır.

Sub ExcelMacro(MyMail As MailItem)

Dim objMail As Outlook.MailItem
Dim eApp As Excel.Application
    Set eApp = GetObject(, "Excel.Application") 
    eApp.Run "test"
End Sub

Merhaba,

Bu anlatmış olduklarınız sanırım Outlook Express de olmuyor bu yüzden outlook hesabı oluşturmam mı gerekiyor?

 

[kadirdaylight]

Sayın dentex,

"Araçlar ve seçeneklerden Kurallar ve İkaz(Rules and Alert) - Yeni Kural(New Rule) oluşturun ve Yeni mesaj gelince(check message when they arrive) seçin sonraki(next) aşamaya geçin, burada belirlenebilecek bir çok kural vardır. "

Outlook hesabı açtım ve yukarıdaki kısma kadar tamamladım. Fakat o kısım bende yok. seçeneklerin içerisinde Tercihler, posta kurulumu, Posta biçimi, Yazım denetimi, Güvenlik ve Diğer var.. Bulamadım

 

[Mehmet Şahin]

Merhaba,
Araçlar başlığının altında olması gerek. Tüm seçenekler gösterilmemiş olabilir. Aşağı doğru ok alması gerek, ona tıklayın. Kurallar ile ilgili bir başlık görmelisiniz, iyi çalışmalar.

 

[kadirdaylight]

Çok özür dilerim kural sihirbazı şeklinde var.. Gözümden kaçmış devam ediyorum

 

[kadirdaylight]

Outlook sesli ve görsel uyarıyı veriyor ancak excel çalışmadı. Acaba nerede hata yaptım kodları modüle ekledim ve kaydettim

 

[Mehmet Şahin]

Benim eklediğim excel dosyası açık olsun, gönderdiğiniz mailin konusu ile outlook kurallarına kayıt ettiğiniz kelime aynı olmalı. Açıklamaları tekrar gözden geçirin. Örneğin referenaslara ilgili seçeneği eklemelisiniz. Mutlaka çalışacaktır, saygılar.

Not: Outlook Macro güvenlik seviyesi ayarlarını en alt seviyeye getirip deneyin ve kapatıp yeniden açın.

 

[kadirdaylight]

Merhaba,
Araçlar başlığının altında olması gerek. Tüm seçenekler gösterilmemiş olabilir. Aşağı doğru ok alması gerek, ona tıklayın. Kurallar ile ilgili bir başlık görmelisiniz, iyi çalışmalar.

Herşeyi söylediğiniz gibi yaptım ve outlook sesli ve görsel olarak uyarı verdi. Fakat açık olduğu halde excel çalışmadı.

 

[kadirdaylight]

Peki çok teşekkür ediyorum. İyi çalışmalar