Excel Forum
ALTIN ÜYELİK Hakkında Bilgi


Geri Git   Excel Forum > EXCEL-Soruları > Makro-VBA
Atatürk
Şifremi Unuttum

DUYURU SİSTEMİ / REKLAM PANOSU

Makro-VBA Makro veya VBA ile ilgili sorularınızı buraya gönderebilirsiniz.
Dosya ekleyebilirsiniz

Özel Arama


Yanıtla
 
Paylaş Konu Araçları Görünüm Modları
Eski 08-11-2017, 16:12   #1
nkeles
 
Giriş: 13/07/2011
Şehir: İstanbul
Mesaj: 29
Excel Vers. ve Dili:
visual basic
Varsayılan Outlook Gelen E-Posta ve Eklerinin Excele raporlaması

Merhaba,
E fatura mükellefi bir firmada çalışıyorum. E faturalar entegratör firma tarafından ek olarak mail yoluyla iletiliyor. Bu faturalar hakkında yazışmalar yapıyoruz. Şirket içinde fatura maillerine, Onaylanmıştır, Red Edilmiştir, gibi dönüşler yapılıyor.
İsteğimiz örneğin İdari İşler den hangi e fatura için (efatura ek dosyasında efaturanın numarası yazılı) ne yazılmış excel e aktarılmasını istiyoruz.

Gönderen Fatura No Mail İçeriği Şeklinde Excel e rapor yapabilir miyiz.
nkeles Çevrimdışı   Alıntı Yaparak Cevapla
Eski 08-11-2017, 21:00   #2
asri
Altın Üye
 
Giriş: 24/04/2005
Şehir: Istanbul
Mesaj: 2,369
Excel Vers. ve Dili:
Office 2016 TR 64 Bit
Varsayılan

Yardımcı olacak arkadaşların yardım edebilmesi için örnek mailler ihtiyaç var.
Belki mail görüntüleri de işe yarayabilir.
__________________
www.asriakdeniz.com
asri Çevrimdışı   Alıntı Yaparak Cevapla
Eski 09-11-2017, 10:11   #3
nkeles
 
Giriş: 13/07/2011
Şehir: İstanbul
Mesaj: 29
Excel Vers. ve Dili:
visual basic
Varsayılan

Merhaba,
Örnek yazışma maili ektedir. Ek kısmında e fatura yı görebilirsiniz. BM ile başlayan faturanın numarasıdır.

nkeles Çevrimdışı   Alıntı Yaparak Cevapla
Eski 09-11-2017, 13:55   #4
BedriA
Altın Üye
 
BedriA kullanıcısının avatarı
 
Giriş: 03/06/2017
Şehir: Antalya
Mesaj: 795
Excel Vers. ve Dili:
2007, 32
Varsayılan

Alıntı:
asri tarafından gönderildi Mesajı Görüntüle
Yardımcı olacak arkadaşların yardım edebilmesi için örnek mailler ihtiyaç var.
Belki mail görüntüleri de işe yarayabilir.
Asri Hocam,

Bana da Outlook Gelen Kutusu'nu temizleyecek bir kod lazım.
Arşivinizde var mıdır acaba?
__________________
Demiri demirle dövdüler, biri sıcak biri soğuktu.
İnsanı insana kırdırdılar, biri aç biri toktu.

Pir Sultan Abdal
BedriA Çevrimdışı   Alıntı Yaparak Cevapla
Eski 09-11-2017, 13:57   #5
asri
Altın Üye
 
Giriş: 24/04/2005
Şehir: Istanbul
Mesaj: 2,369
Excel Vers. ve Dili:
Office 2016 TR 64 Bit
Varsayılan

Alıntı:
BedriA tarafından gönderildi Mesajı Görüntüle
Asri Hocam,

Bana da Outlook Gelen Kutusu'nu temizleyecek bir kod lazım.
Arşivinizde var mıdır acaba?
Temizlemek derken? Biraz daha detay verebilir misiniz?
Gelen kutusundakileri silmek için ctrl+a ve del yeterli olur.

Farklı bir durum ise nedir?
__________________
www.asriakdeniz.com
asri Çevrimdışı   Alıntı Yaparak Cevapla
Eski 09-11-2017, 15:16   #6
nkeles
 
Giriş: 13/07/2011
Şehir: İstanbul
Mesaj: 29
Excel Vers. ve Dili:
visual basic
Varsayılan

Alıntı:
nkeles tarafından gönderildi Mesajı Görüntüle
Merhaba,
E fatura mükellefi bir firmada çalışıyorum. E faturalar entegratör firma tarafından ek olarak mail yoluyla iletiliyor. Bu faturalar hakkında yazışmalar yapıyoruz. Şirket içinde fatura maillerine, Onaylanmıştır, Red Edilmiştir, gibi dönüşler yapılıyor.
İsteğimiz örneğin İdari İşler den hangi e fatura için (efatura ek dosyasında efaturanın numarası yazılı) ne yazılmış excel e aktarılmasını istiyoruz.

Gönderen Fatura No Mail İçeriği Şeklinde Excel e rapor yapabilir miyiz.
Yok mudur çözüm..
nkeles Çevrimdışı   Alıntı Yaparak Cevapla
Eski 09-11-2017, 19:44   #7
BedriA
Altın Üye
 
BedriA kullanıcısının avatarı
 
Giriş: 03/06/2017
Şehir: Antalya
Mesaj: 795
Excel Vers. ve Dili:
2007, 32
Varsayılan

Alıntı:
asri tarafından gönderildi Mesajı Görüntüle
Temizlemek derken? Biraz daha detay verebilir misiniz?
Gelen kutusundakileri silmek için ctrl+a ve del yeterli olur.

Farklı bir durum ise nedir?

Makro ile; gelen mesajları silmek istiyorum, outlook ile değil, ara yüz olarak kullandığım excel dosyasından.
__________________
Demiri demirle dövdüler, biri sıcak biri soğuktu.
İnsanı insana kırdırdılar, biri aç biri toktu.

Pir Sultan Abdal
BedriA Çevrimdışı   Alıntı Yaparak Cevapla
Eski 09-11-2017, 21:56   #8
PLİNT
 
Giriş: 31/12/2014
Şehir: Gürün
Mesaj: 1,246
Excel Vers. ve Dili:
Excel 2010
Varsayılan

Alıntı:
BedriA tarafından gönderildi Mesajı Görüntüle
Makro ile; gelen mesajları silmek istiyorum, outlook ile değil, ara yüz olarak kullandığım excel dosyasından.
Merhaba
Aşağıdaki gibi deneyebilirsiniz;
Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
Private Sub CommandButton1_Click()

Dim a As Object, b As Object, c As Object
Dim msg
Set a = CreateObject("Outlook.Application")
Set b = a.GetNamespace("MAPI")
 Set c = a.GetNamespace("MAPI").Folders("bedrihoca@gmail.com").Folders(2)
  For i = c.items.Count To 1 Step -1
sor = MsgBox(c.items(i).SenderEmailAddress & " Adresinden gelen mail silinsinmi?", vbYesNo)
If sor = vbYes Then c.items(i).Delete
Next
    
End Sub 
PLİNT Çevrimdışı   Alıntı Yaparak Cevapla
Eski 09-11-2017, 22:01   #9
PLİNT
 
Giriş: 31/12/2014
Şehir: Gürün
Mesaj: 1,246
Excel Vers. ve Dili:
Excel 2010
Varsayılan

Alıntı:
nkeles tarafından gönderildi Mesajı Görüntüle
Yok mudur çözüm..
Merhaba
Fatura no her zaman mesaj ekindeki dosya adı içeriğinde oluyormu?
PLİNT Çevrimdışı   Alıntı Yaparak Cevapla
Eski 10-11-2017, 07:43   #10
nkeles
 
Giriş: 13/07/2011
Şehir: İstanbul
Mesaj: 29
Excel Vers. ve Dili:
visual basic
Varsayılan

Alıntı:
PLİNT tarafından gönderildi Mesajı Görüntüle
Merhaba
Fatura no her zaman mesaj ekindeki dosya adı içeriğinde oluyormu?
Tüm faturalar aynı formatta gelir ve tüm faturalarda paylaştığım şekilde Fatura no yer almaktadır.
nkeles Çevrimdışı   Alıntı Yaparak Cevapla
Yanıtla


Konu Araçları
Görünüm Modları

Gönderme Kuralları
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is Açık
SimgelerAçık
[IMG] kodu Açık
HTML kodu Kapalı


Saat 19:30


Bu forum Elit NET - www.elitnet.com.tr tarafından sunulmaktadır.

Excel Eğitimi - Mobil Uygulama - Çorlu - Çorlu Web Tasarım - Tarot Falı - invest in turkey - Lingerie - Dyeing Machine - Karton Bardak- Çorlu Özel Eğitim- Site Yönetimi- Led Aydınlatma- Pronet Tekirdağ- Çorlu Kamera- Pronet Edirne- Pronet Kırklareli- Pronet Çerkezköy- Pronet Çorlu- Pronet Lüleburgaz- Pronet Keşan- Çorlu Araç Takip- Çorlu Su Arıtma- Boru Profil- Gebze Emlak- Beylikdüzü Temizlik- İstanbul Burun Estetiği- Bakır Sülfat- Rampa- Rotary- Çorlu İnternet Sitesi- youngblood- Çorlu Palet- Çerkezköy Palet- Çorlu Prefabrik- Çorlu Sürücü Kursu- Çorlu Sandviç Panel- Şişli Avukat- Korona Test Kalemi- Çorlu Vinç- Çorlu Pimapen Tamiri-
Powered by vBulletin Version 3.7.2
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
Advertisement System V2.6 By   Branden