Personel Doğum Günü Programı

[AramaBotu1]

Üstadlar merhaba, iş yerinde bir programa ihtiyacım var. Yardımcı olursanız çok sevinirim. İşyerindeki idari personelimizin doğum gününü excelle kaydederek, doğum günü gelen personel için Excell'in 3 gün önceden uyarı vermesini istiyoruz. Bu konuda yardımcı olur musunuz?
Teşekkürler.

 

[1Al2Ver]

Merhaba,

C1'e yazarak dener misiniz?

=EĞER(VE(GÜN(B1)=GÜN(BUGÜN()+3);AY(B1)=AY(BUGÜN()+3));"Doğum Gününe 3 gün var";"")

 

[Ak_Turks]

Merhaba,

C1'e yazarak dener misiniz?

=EĞER(VE(GÜN(B1)=GÜN(BUGÜN()+3);AY(B1)=AY(BUGÜN()+3));"Doğum Gününe 3 gün var";"")

Çok teşekkür ederim, kişisel özel nedenlerden dolayı siteye uzun süre giremedim. Formülü vermişsiniz, sağolun. Doğum gününe 3 gün kalan personel için excell uyarı yapıyor.

Peki şöyle bir şey mümkün mü acaba?
Doğum gününe 3 gün kaldı, sonra 2 gün kaldı sonra 1 gün kaldı şeklinde saysa, ayrıca liste doğum gününe az kalandan çok kalana doğru sıralansa?

Böyle bir formül yazılabilir mi acaba?

Teşekkür ederim.

 

[Ak_Turks]

Çok teşekkür ederim, kişisel özel nedenlerden dolayı siteye uzun süre giremedim. Formülü vermişsiniz, sağolun. Doğum gününe 3 gün kalan personel için excell uyarı yapıyor.

Peki şöyle bir şey mümkün mü acaba?
Doğum gününe 3 gün kaldı, sonra 2 gün kaldı sonra 1 gün kaldı şeklinde saysa, ayrıca liste doğum gününe az kalandan çok kalana doğru sıralansa?

Böyle bir formül yazılabilir mi acaba?

Teşekkür ederim.

Yok mu yardım edecek olan? (

 

[spacebar]

arkadaşlar merhaba. işyerinde çalışan personellerin doğum gününde mesaj göndermek istiyorum. isimleri doğum günleri ve mail adresleri yazılı olan data sayfasında bir de bugün formülü var. formüldeki gün, doğum günü tarihiyle eşit olduğu zaman resim sayfasındaki (veya resim klasöründeki) resimi mail gövdesine yapıştırarak göndermek istiyorum. yardımlarınız için teşekkür ederim.

 

[spacebar]

bu konuda benzer bir çalışma yok. yardımcı olacak kimse yok mu

 

[spacebar]

güncelleme....

 

[Emir Hüseyin Çoban]

arkadaşlar merhaba. işyerinde çalışan personellerin doğum gününde mesaj göndermek istiyorum. isimleri doğum günleri ve mail adresleri yazılı olan data sayfasında bir de bugün formülü var. formüldeki gün, doğum günü tarihiyle eşit olduğu zaman resim sayfasındaki (veya resim klasöründeki) resimi mail gövdesine yapıştırarak göndermek istiyorum. yardımlarınız için teşekkür ederim.

. . .

Ekteki dosyayı inceleyiniz.
dogumgunu resmini C:\ sürüne taşıyın.
Microsoft Outlook açık olmalı.


. . .

 

[spacebar]

üstad mükemmel olmuş ellerinize sağlık. teşekkür ederim.

 

[swetlana]

. . .

Ekteki dosyayı inceleyiniz.
dogumgunu resmini C:\ sürüne taşıyın.
Microsoft Outlook açık olmalı.


. . .

Hüseyin bey, ellerinize sağlık. Resmi C sürücüsüne almama rağmen mailde resim gitmiyor ama yinede Müthiş bir çalışma olmuş.

 

[Emir Hüseyin Çoban]

Hüseyin bey, ellerinize sağlık. Resmi C sürücüsüne almama rağmen mailde resim gitmiyor ama yinede Müthiş bir çalışma olmuş.

. . .

Hemen bir deneme yaptım.
Tablo üzerinden gönderilen mailin. Gelen kutusundaki ekran görüntüsü.

. . .

 

[swetlana]

Resmi C surucusunde nereye kayıt ettiniz. Şirket pc olduğu için her dosyanın içine kayıt edemiyorum

 

[Emir Hüseyin Çoban]

. . .

Klasör içerisine değil.
C:\ nin içinde olacak. Yani dosya yolu şu şekilde.
"C:\dogumgunu.jpg" olmalı.

Siz bilgisayar ayarlarınıza göre, dosya yolunu değiştirebilirsiniz.
Örneğin, D sürücünde Kutlamalar klasörü içerisinden dogumgunu.jpg resmini aldırmak için. Kodlar şu şekilde olmalı.

strResim = "D:\Kutlamalar\dogumgunu.jpg"

. . .

 

[swetlana]

yok yapamadım ama olsun resimsinde çok işime yarayacak.
Tekrardan teşekkürler.

 

[McDregin]

Bwnim bir sorum olacak,
Çalışma güzel, zaten Excel de hortlayan konu olmaz bi daim hepsi kullanılır
Şirket ismini nasıl değiştireceğiz ve birde 3 gün kala 2 gün kala filan uyarı verir anlamını çıkardım ama testlerimde uyarı göremedim.
Atladığım bir şey var mıdır ?

 

[Emir Hüseyin Çoban]

Bwnim bir sorum olacak,
Çalışma güzel, zaten Excel de hortlayan konu olmaz bi daim hepsi kullanılır
Şirket ismini nasıl değiştireceğiz ve birde 3 gün kala 2 gün kala filan uyarı verir anlamını çıkardım ama testlerimde uyarı göremedim.
Atladığım bir şey var mıdır ?

. . .

# 8 nolu mesajdaki dosyada

VBA penceresini açıp Module1 içerisinde aşağıda kırmızı ile belirttiğim kısmı değiştirmelisiniz.

htmlmetin = "Sayın " & "<B>" & Cells(bir, "A") & "</B>" & ", " & "<br>" & _
" X LTD ŞİRKETİ DOĞUM GÜNÜNÜZÜ KUTLAR. " & _
" YANİ YAŞINIZDA BAŞARILAR DİLER... " & _
"<br><br>"

. . .

 

[McDregin]

Tamamdır.
Teşekkürler.

 

[McDregin]

Hüseyin bey merhaba,
Ben başka bir D.günü programı ile birleştiriyorum.
Fakat macro butonunun yerini değiştirince ve/veya araya kolon ekleyince çalışmıyor.
Modül için Macro buton yeri belirleyen bir şey de göremedim ama neden olabilir.
Teşekkürler.

 

[McDregin]

Tamamdır Çözdüm.

 

[McDregin]

Son durum;
http://www.excel.web.tr/f14/dooum-gunu-zel-programy-t139200.html#post754853