[Yardım]  Doğum Günü Geldiğinde İsme Özel Mail Atmak

Excel ile MS Outlook, Outlook Express, Gmail vb. programlar ile mail işlemleri hakkındaki bölüm.

Cevap: Doğum Günü Geldiğinde İsme Özel Mail Atmak

İleti#21)  otobus » 16 Arl 2014 10:16

Merhaba
Mesajınızda sizin de belirttiğiniz gibi.
O gün geldiğinde;
Excel ve outlook açıkken tarih ve saati geldiğinde otomatik mail atsın istiyorum.
Bu mümkün mü?

Outlook ta kod olmadan gelecek zamanda mail atmak mümkün.
Amacım outlook bu özelliğinden yararlanarak;excel e yazdığı kişilere mail merge yaparak ilgili saatte belirtilen mail adreslere mail atmak.

Benim anladığım kadarı ile ( anlamamış olabilirim) sizin yazdığınız kod sadece draft olarak kayıt ediyor. Yani otomatik mail atılacaklar arasına almıyor.

Ben excel e yeni kişi eklediğimde koda dokunmadan bu işlemin gerçekleşmesini hayal ediyorum. Bilmiyorum çok geniş hayal ediyorum!!?? :)
Kullanıcı avatarı
otobus
Siteye Alışmış
 
Kayıt: 19 Eyl 2014 15:21
Meslek: Human
Yaş: 48
İleti: 124
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: istanbul

Cevap: Doğum Günü Geldiğinde İsme Özel Mail Atmak

İleti#22)  Ali ÖZ » 16 Arl 2014 11:06

Bu şekilde dener misiniz,dosyayı inceleyin.

Kod: Tümünü seç
Option Explicit

Sub Auto_Open()
Başla:
    DoEvents
    If Time = Sheets("Sheet2").Range("g1") Then
       Call Invite
    Else
        GoTo Başla
    End If
End Sub
Sub Invite()
Dim Lastcell As Integer
Dim i As Long
Dim Kime As String
Dim rng As Range
Dim OutApp As Object
Dim OutMail As Object
Dim StrBody As String
On Error Resume Next
Lastcell = Sheets("Sheet2").Range("C" & Cells.Rows.Count).End(xlUp).Row
For i = 2 To Lastcell
If Sheets("Sheet2").Cells(i, 5) <> "" And Sheets("Sheet2").Cells(i, 5) = Date Then
Sheets("Sheet1").Range("L11") = "Sayin " & Sheets("Sheet2").Cells(i, 3)
Kime = Sheets("Sheet2").Cells(i, 4)
        Set rng = Nothing
        On Error Resume Next
        Set rng = Sheets("Sheet1").Range("E5:AX33").SpecialCells(xlCellTypeVisible)
        On Error GoTo 0
        If rng Is Nothing Then
            MsgBox "The selection is not a range or the sheet is protected. " & _
                   vbNewLine & "Please correct and try again.", vbOKOnly
            Exit Sub
        End If
        With Application
            .EnableEvents = False
            .ScreenUpdating = False
        End With
        Set OutApp = CreateObject("Outlook.Application")
        Set OutMail = OutApp.CreateItem(0)
        On Error Resume Next
        With OutMail
            .To = Kime
            .CC = ""
            .BCC = ""
            .Subject = "Dogum_Gunu_Kutlaması"
            .HTMLBody = RangetoHTML(rng)
            .Display   'or use .Send
        End With
        On Error GoTo 0
         With Application
            .EnableEvents = True
            .ScreenUpdating = True
        End With
        Set OutMail = Nothing
        Set OutApp = Nothing
        End If
Next i
End Sub


Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
Ali ÖZ
Forum Moderatörü
 
Adı Soyadı:Ali ÖZ
Kayıt: 17 Oca 2013 10:16
Konum: SAKARYA
Meslek: Yazılım
Yaş: 38
İleti: 9868
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Adapazarı/SAKARYA

Cevap: Doğum Günü Geldiğinde İsme Özel Mail Atmak

İleti#23)  tuğra » 13 Şub 2019 14:02

Merhaba arkadaşlar, makro konusunda hiç tecrübem yok, yaklaşık bir haftadır araştırıyorum ama tam olarak ihtiyacımı karşılayacak bir çalışma bulamadım, daha doğrusu bulduysamda kodları exele yapıştırıp çalıştıramadım. Konuyu uzatmamak namına ekte hazırladığım bir tablom var, doğum günü gelen personele saat 08:00 de ben excel kitabını hiç açmasamda kendi yan taraftaki karta isim yazıp bolgebirligi@outlook.com.tr edresinden ilgili şahsa mail atsın. Acaba böyle bişey mümkün mü? Değerli vaktinizi aldığım için şimdiden affınızı dilerim.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
tuğra
 
Kayıt: 07 Şub 2019 13:57
Meslek: işçi
Yaş: 35
İleti: 6
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: şanlıurfa/haliliye

Cevap: Doğum Günü Geldiğinde İsme Özel Mail Atmak

İleti#24)  Tarkan VURAL » 15 Şub 2019 22:30

Merhaba, Mesut beyin soy adını yanlış yazmış olabilir misiniz ? APLTEKİN yerine ALPTEKİN olma ihtimali var mı ? ;)
Excel dosyasını açmadan göndermek istiyorsanız, Windows görev zamanlayıcısına da ihtiyacınız olacak. Zaman / tarih ayarını buradan yaparak tetik sağlayabilirsiniz.
Bu arada motivasyon açısından çok nazik bir düşünce. Şahsım adına sizi tebrik ediyorum. şkşk
Ben de yaklaşık 8 yıl evvel Logo Bordro programına böyle bir çözüm yazmıştım. :) Bir program yazarak Windows görev zamanlayıcısı ve Excel' e gerek kalmadan bir paylaşımda bulunmaya çalışacağım. --)(
Resim
www.tarkanvural.com.tr

İnnâ lillâhi ve innâ ileyhi raciûn
Şüphesiz ki; biz Allah’a âidiz ve vakti geldiğinde O’na döndürüleceğiz.

HasbunAllâhu ve nimel vekîl
Bize Allah yeter. O ne güzel vekildir.


ExcelVBA.NET' e katkıda bulunmak ister misiniz ? O halde BAĞIŞ butonunu tıklayın...
Kullanıcı avatarı
Tarkan VURAL
Yönetim Kurulu
 
Adı Soyadı:Tarkan VURAL
Kayıt: 14 Haz 2008 18:27
Konum: @tarkanvural73
Meslek: LUU, Database Expert, Senior Software Specialist, Developer
Yaş: 46
İleti: 27050
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul - Beylikdüzü

REKLAM
Excel Logo XML Oluşturucu
Logo Object Designer ile Uyarlama

Cevap: Doğum Günü Geldiğinde İsme Özel Mail Atmak

İleti#25)  tuğra » 12 Mar 2019 09:40

Dikkatinizden dolayı bende sizleri tebrik ederim Üstadım. şkşk Çalışmanızı dört gözle bekliyorum. O vakte kadar Allah'a emanet olunuz.
Kullanıcı avatarı
tuğra
 
Kayıt: 07 Şub 2019 13:57
Meslek: işçi
Yaş: 35
İleti: 6
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: şanlıurfa/haliliye

Cevap: Doğum Günü Geldiğinde İsme Özel Mail Atmak

İleti#26)  Tarkan VURAL » 23 Mar 2019 08:56

Güncellemenizi gördüm, inşaAllah ucundan tutabilirsem; yapmak istediğim bir çalışma.
Resim
www.tarkanvural.com.tr

İnnâ lillâhi ve innâ ileyhi raciûn
Şüphesiz ki; biz Allah’a âidiz ve vakti geldiğinde O’na döndürüleceğiz.

HasbunAllâhu ve nimel vekîl
Bize Allah yeter. O ne güzel vekildir.


ExcelVBA.NET' e katkıda bulunmak ister misiniz ? O halde BAĞIŞ butonunu tıklayın...
Kullanıcı avatarı
Tarkan VURAL
Yönetim Kurulu
 
Adı Soyadı:Tarkan VURAL
Kayıt: 14 Haz 2008 18:27
Konum: @tarkanvural73
Meslek: LUU, Database Expert, Senior Software Specialist, Developer
Yaş: 46
İleti: 27050
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul - Beylikdüzü

REKLAM
ETA - Excel Konsolide Raporlama
ETA Excel Personel Entegre Raporu

Cevap: Doğum Günü Geldiğinde İsme Özel Mail Atmak

İleti#27)  ykslk » 23 Mar 2019 14:48

"Ben de yaklaşık 8 yıl evvel Logo Bordro programına böyle bir çözüm yazmıştım"
Tarkan bey bunu paylaşabilirmisiniz?
Kullanıcı avatarı
ykslk
Yeni Başlamış
 
Kayıt: 02 Oca 2017 20:29
Meslek: muhasebe
Yaş: 86
İleti: 27
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: istanbul / Yenibosna

Cevap: Cevap: Doğum Günü Geldiğinde İsme Özel Mail Atmak

İleti#28)  Tarkan VURAL » 27 Mar 2019 15:52

ykslk yazdı:"Ben de yaklaşık 8 yıl evvel Logo Bordro programına böyle bir çözüm yazmıştım"
Tarkan bey bunu paylaşabilirmisiniz?


Paylaşmam mümkün değil, yeniden yazmam lazım çünkü daha önce çalıştığım özel bir şirketteyken yazmıştım. Yazılımla ilgili hiç bir şeyi almadım, projeyi, kodları vs.. hepsini orada bıraktım. Bir çalışma bir iş yerine ait ise, her şeyi orada bırakma huyum var. Bazı ukala yazılımcılar gibi "kodları ben yazdım, proje benim" demem asla. Neticede yazdıysak, maaşımızı aldık da yazdık. ;)
Ama kafadakiler halen duruyor ... :)

Mutlaka bununla ilgili bir uygulama yapacağım ( evvela Allah'ın izniyle ). Konuyu özellikle takip ediyorum.
Resim
www.tarkanvural.com.tr

İnnâ lillâhi ve innâ ileyhi raciûn
Şüphesiz ki; biz Allah’a âidiz ve vakti geldiğinde O’na döndürüleceğiz.

HasbunAllâhu ve nimel vekîl
Bize Allah yeter. O ne güzel vekildir.


ExcelVBA.NET' e katkıda bulunmak ister misiniz ? O halde BAĞIŞ butonunu tıklayın...
Kullanıcı avatarı
Tarkan VURAL
Yönetim Kurulu
 
Adı Soyadı:Tarkan VURAL
Kayıt: 14 Haz 2008 18:27
Konum: @tarkanvural73
Meslek: LUU, Database Expert, Senior Software Specialist, Developer
Yaş: 46
İleti: 27050
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul - Beylikdüzü

Cevap: Doğum Günü Geldiğinde İsme Özel Mail Atmak

İleti#29)  ykslk » 27 Mar 2019 20:59

-Sizin kıdem sorgu raporunun geliştirilmesi, bordro ile entegre çalışması
-Sizin izin sorgunuzun bordro ile entegre çalışması
-Bordro zarflarını eklenti ile çalışana toplu gönderebilecek bir program
-Bordro ve özlük bilgilerini bordroya girmeden, excel sorgusu gibi de basit olmadan VS ile yazılmış bir arayüz ile takip edebilmek
-Bizde Tiger Hr var ama çok daha basiti olarak özlük bilgilerini HTML olarak webden takip için web sitesi yapmak, SQL to WEB
-Bordro ve özlük bilgileri için 2 veya 3 adet PowerBİ veya Qlik sense ile rapor hazırlamak
-Bordro ile entegre sadece özlük resmi, kişinin unvanı, telefonu, görevini, işe giriş tarihini gösteren telefon rehberi gibi a dan z ye çok basit bir HTML web sayfası
-Bordroplusaya girmeden izinleri düzenlemek, değiştirmek, takip ve izin formu çıktısı alabilmek için eklenti...

Böyle hayallerim var ama kavuşamıyorum, kendim yazdırayım diyorum ama piyasayı hiç bilmiyorum beni rakamlar yüksek çıkar korkuyorum. Keşke yazılımcı olsaymışım hepsinini inanın yapardım.
Kullanıcı avatarı
ykslk
Yeni Başlamış
 
Kayıt: 02 Oca 2017 20:29
Meslek: muhasebe
Yaş: 86
İleti: 27
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: istanbul / Yenibosna

Cevap: Doğum Günü Geldiğinde İsme Özel Mail Atmak

İleti#30)  Tarkan VURAL » 27 Mar 2019 21:38

Eminim yapardınız. ;) Aslolan azmetmek. Belirttiğiniz işlemler güzel projeler. Kullanıcı dostu işlemler.

İşin içinde olmadan ihtiyaçları analiz edebilmek kolay değil. Siz ne güzel eksikliğini hissettiğiniz işleri analiz edebiliyorsunuz. Biz yazılımcılar da aynıyız. Onca işlemi yazabilmemiz için ya çok iyi bir anlatıcı olması gerekiyor; yahut da işin içine girmemiz gerekiyor. Bir muhasebe programı yazabilmek için hesap planını bilmezsek, bilanço ve mizan nedir bilmezsek, vergilendirme mevzuatı, 100 kasa, 102 banka, 108 KK, 191, 391, gelirler, giderler,... bunları bilmezsek hangi mantıkla doğru bir muhasebe yazılımı yapabiliriz ki ? Kafamızda o kadar çok türlü iş akış ve içerikleri ile ilgili bilgiler var ki; belki de çoğu artık hiç kullanılmayacak. Ama inanın bir çok farklı alanda, özellikle üretim ve finans sektörlerine dayalı işlemlerde rol almış, ve de üstüne "ne isterlerse onu yazarım" mantığı dışında kendi yorumunu da katarak, mantıksız bir şey gördüğünde anlayana kadar kendini patlatan, "hmmmm... aslında o zaman böyle olması gerekmez mi" şeklinde fikir yürüten bir yazılımcı bulursanız var ya; alın yanınıza, sıkı tutun, bırakmayın, firmanızın üst düzey danışmanı, CEO' su yapmaktan hiç korkmayın derim. :)

Gel gelelim yazılım piyasası, sonuca ulaşıldığında elde elektronik bir çıktıdan başka bir şey yok gibi görünse de, buna harcanan zamana orantılı, evet gerçekten ortaya kimine göre pahalı bir takım işler çıkabiliyor. Paha görecelidir. Size yazılım için 80bin pahalıyken, SAP yazılım projelerine milyon euro harcayanlara pek de pahalı gelmiyor. :) Yapılan işlemlerin zaman içerisinde kazandırdığı adam/saat hesabını yapabilenler de yazılım sistemlerinin aslında paha biçilemez bir gereklilik olduğunu fark edebiliyor. İyi bir yazılımcı maaşı ortalama 5 ile 10 bin liralar arasında dolaşır. Daha az ya da daha çok da olabiliyor. Bir de bu adamı çalıştıran firmanın ticaret gereği para kazanması lazım. Maliyetler işçilikten başka bir şeyle orantılanamaz. Harcanan zaman maliyeti de maaş üzerinden yapılır. Proje için önce analiz, sonra harcanacak zaman hesabı, sonra maliyet + firma kazancı. Hesaplamalar böyle yapılır... Bu iş emek işi. Bu iş zaman tüketme işi. Bu iş kişisel bilgi ve becerileri ihtiyaçlarla birleştirip ortaya mükemmel bir yemek çıkarmak gibi. Bu iş belki de hiç yapılmamış bir yemeği özel soslarla donatıp farklı lezzetler üretmek gibi. Yazılımcı olarak bazen bildiğimizi yazarız, bazen yazarken öğreniriz. Bu değişmez bir durumdur. Yazılım işi hakikaten zor ve çok da fazla ödün isteyen bir meslek. Gün gelir uykusuz kalırsınız, gün gelir yemek öğününü kaçırırsınız, hatta özel hayatınızdan bile vazgeçmek zorunda kalabilirsiniz. Asosyal bir kişiliğe dahi ulaşabilirsiniz. :o Yazılımcı olmasaydım, dışarıdan bir gözle yapılan işin içine baktığımda, gerçekten bu iş için sabır, özveri ve pratik zeka gerektirdiğini görerek icra edenlere inanılmaz saygı duyardım. Şu anda duyduğum gibi. Kendimi konu dışı tutarak diyorum ki; gerçekten bilişim sektörü çalışanları, beyaz yaka değil, altın yaka ekibi olarak anılmayı hak ediyorlar. şkşk şkşk

Konuyu nasıl bu hale getirdim, nereden nereye geldim ben de bilmiyorum. Laf lafı açtı valla. :lol:
Resim
www.tarkanvural.com.tr

İnnâ lillâhi ve innâ ileyhi raciûn
Şüphesiz ki; biz Allah’a âidiz ve vakti geldiğinde O’na döndürüleceğiz.

HasbunAllâhu ve nimel vekîl
Bize Allah yeter. O ne güzel vekildir.


ExcelVBA.NET' e katkıda bulunmak ister misiniz ? O halde BAĞIŞ butonunu tıklayın...
Kullanıcı avatarı
Tarkan VURAL
Yönetim Kurulu
 
Adı Soyadı:Tarkan VURAL
Kayıt: 14 Haz 2008 18:27
Konum: @tarkanvural73
Meslek: LUU, Database Expert, Senior Software Specialist, Developer
Yaş: 46
İleti: 27050
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İstanbul - Beylikdüzü

Cevap: Cevap: Doğum Günü Geldiğinde İsme Özel Mail Atmak

İleti#31)  tuğra » 24 Nis 2019 08:53

Tarkan VURAL yazdı:Güncellemenizi gördüm, inşaAllah ucundan tutabilirsem; yapmak istediğim bir çalışma.

Allah kolaylıklar versin üstadım...
Kullanıcı avatarı
tuğra
 
Kayıt: 07 Şub 2019 13:57
Meslek: işçi
Yaş: 35
İleti: 6
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: şanlıurfa/haliliye

Cevap: Cevap: Doğum Günü Geldiğinde İsme Özel Mail Atmak

İleti#32)  tuğra » 10 Haz 2019 08:34

Tarkan VURAL yazdı:Güncellemenizi gördüm, inşaAllah ucundan tutabilirsem; yapmak istediğim bir çalışma.

Selamun aleykum üstadım. Konuyla ilgili bir şeyler yapabildiniz mi acaba? Yoğunsunuz galiba.. Selametle..


Son güncel tutan tuğra, 10 Haz 2019 08:34.
Kullanıcı avatarı
tuğra
 
Kayıt: 07 Şub 2019 13:57
Meslek: işçi
Yaş: 35
İleti: 6
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: şanlıurfa/haliliye

Önceki

Forum Excel ile Mail İşlemleri

Online Kullanıcılar

Bu forumu görüntüleyenler: Kayıtlı kullanıcı yok ve 1 misafir

Bumerang - Yazarkafe