Outlook ta kural oluşturmak

Katılım
28 Mart 2007
Mesajlar
147
Excel Vers. ve Dili
EXCEL 2003 INGILIZCE
Altın Üyelik Bitiş Tarihi
20-09-2024
selamlar,
outlook ta gelen maillerin içindeki ekleri otomatik olarak gelen kişinin adının
verildiği bir klasöre atmak mümkünmüdür.(ali den geleni ali klasörüne veliden geleni veli klasörüne at ve maili sil)böyle bir makro yapılabilirmi veya başka yolu varmıdır.

teşekkür ederim
iyi çalışmalar
 
Katılım
16 Ekim 2008
Mesajlar
6
Excel Vers. ve Dili
excel 2003 türkçe
outlook içinde menulerden araçlar/kurallar ve uyarılar kısmını incele oradan çözebilirsin.
 
Katılım
28 Mart 2007
Mesajlar
147
Excel Vers. ve Dili
EXCEL 2003 INGILIZCE
Altın Üyelik Bitiş Tarihi
20-09-2024
SELAMLAR,
evet varda çözemedim yapılabiliyorsa anlatmanız mümkünmüdür.

teşekkürler
 
Katılım
16 Ekim 2008
Mesajlar
6
Excel Vers. ve Dili
excel 2003 türkçe
outlook ingilizce sanırım, kurallardan yeni kural dediğin zaman açılan pencerelerdeki yönergeleri izlemen yeter eğer türkçe ise daha kolay tabii, öncelikle kimden gelen mailleri kısmına maili gönderen adresi ayazacaksın bu yazacağın kısım kurallar penceresinin altkısmında olacak oraya dikkat et. şu an evdeki bilgisayarda outlook yok o yüzden fazla yardımcı olamıyorum kusura bakma, pazartesi yada salı gece işyerinden detayları yazarım. ekleri kaydedip maili silermi tam bilmiyorum ama denerim.

bir çok şeyi yapabiliyor bunu yapar herhalde,
 
Katılım
28 Mart 2007
Mesajlar
147
Excel Vers. ve Dili
EXCEL 2003 INGILIZCE
Altın Üyelik Bitiş Tarihi
20-09-2024
teşekkür ederim
cevap yazabilirseniz sevinirim
iyi günler
 
Katılım
16 Ekim 2008
Mesajlar
6
Excel Vers. ve Dili
excel 2003 türkçe
cevap biraz geç oldu ama iletideki eki klasöre taşınmasını kurallarda bulamadım, fakat bunun için bir makro bulabilirsem yazarım. kurallarda sadece outlook içinde kalsöre taşınacağını biliyorum. kusura bakma o yüzden.
 
Katılım
28 Mart 2007
Mesajlar
147
Excel Vers. ve Dili
EXCEL 2003 INGILIZCE
Altın Üyelik Bitiş Tarihi
20-09-2024
cevap biraz geç oldu ama iletideki eki klasöre taşınmasını kurallarda bulamadım, fakat bunun için bir makro bulabilirsem yazarım. kurallarda sadece outlook içinde kalsöre taşınacağını biliyorum. kusura bakma o yüzden.

İkinci yazdığınızı gönderseniz en azından oradan bi sonuç çıkartabilirim belki..
teşekkürler
 
Katılım
28 Mart 2007
Mesajlar
147
Excel Vers. ve Dili
EXCEL 2003 INGILIZCE
Altın Üyelik Bitiş Tarihi
20-09-2024
selamlar.
verdiğiniz bilgiler için teşekkür ederim.faydalı olacak .
gelen maildeki ekleri kendi bilgisayarımdaki bir klasöre(faklı kişilerden gelenleri farklı klasörlere) kopyalamak istiyorum.
yardımcı oalbilirseniz sevinirim
teşekkür ederim
 

hamitcan

Uzman
Uzman
Katılım
1 Temmuz 2004
Mesajlar
7,704
Excel Vers. ve Dili
Excel 2019 Türkçe
Not:Aşağıdaki kod maillerdeki ataçları belirtilen klasöre kayıt eder.Belirteyim; kodlar bana ait değil.
Kod:
Option Explicit

Sub SaveAtts()
    Dim ns As Namespace
    Dim fld2SaveAtt As MAPIFolder
    Dim MailItem As Object
    Dim Att As Attachment
    Dim FileName As String
    Dim intFiles As Integer
    Dim yol As String
    
    On Error GoTo HandleError
    yol = "C:\atac\"

    Set ns = GetNamespace("MAPI")
    Set fld2SaveAtt = ns.GetDefaultFolder(olFolderInbox)
    intFiles = 0
    If fld2SaveAtt.Items.Count = 0 Then
        MsgBox "There were no messages found in your Inbox."
        Exit Sub 'there are no messages, so Exit the Sub
    End If
    'Loop through Mail Items
    For Each MailItem In fld2SaveAtt.Items
        'Loop through any attachments
        For Each Att In MailItem.Attachments
            FileName = yol & Trim(Att.FileName)
            Att.SaveAsFile FileName
            intFiles = intFiles + 1
         Next
    Next
' Show summary message
    If intFiles > 0 Then
        MsgBox intFiles & " attachments were saved to " ^ _
        yol
    Else
        MsgBox "No attachments were found"
    End If
    
    Set Att = Nothing
    Set MailItem = Nothing
    Set ns = Nothing
    Exit Sub
HandleError:
    MsgBox "Error: " & Err.Number & vbCrLf & _
            "Description: " & Err.Description & vbCrLf & _
            "The file's name is " & FileName
            intFiles = intFiles - 1
    Resume Next 'Continue saving attachments
End Sub
 
Katılım
16 Ekim 2008
Mesajlar
6
Excel Vers. ve Dili
excel 2003 türkçe
bu kodlar güzel oldu, yazana da paylaşana da teşekkür ederim.
birde benim kullandığım kurallar var bunradaki mail adreslerini ve klasörleri değiştitip kullanabilirisiniz. yanlızca outlook içinde araçlar > kurallar ve uyarılar > secenekler > kural al demeniz yeterlidir.
 

Ekli dosyalar

Katılım
29 Eylül 2006
Mesajlar
109
Excel Vers. ve Dili
2007 türkçe
isteğiginiz işlemi yapabilmeniz için önce yeni klasörler oluşturmalısınız sonra
araçlar / ileti ruralları / posta sekmesinden yeni ileti buradan ilk menüde size uygun olanı seçin sonra alt bölünden ise iletinin kayıt edileceği klasörü seçin böylece gelen mailler istediğiniz klasöre gider
 

zetkatamet

Altın Üye
Katılım
13 Mart 2008
Mesajlar
1,348
Excel Vers. ve Dili
Office 365 Türkçe
Altın Üyelik Bitiş Tarihi
27-12-2028
Merhaba,
Oncelikle klasörun posta kutusunda olduguna emin olun. Daha sonra gelen kutusunda ornegin ahmet@exel.web.tr gelen maili ahmet klasörüne atacağız. Sag klic yapiyoruz, kural oluştur, kimden seçili olacak (ahmet), öğeyi bu klasöre taşı işaretli olacak ve buradan ahmet klasörünü seçtiğinizde ve onayladığınızda ahmet ten gelen tüm e-mailler tanımlanan klaöre gidecektir. Yazdıklarım office 2007 içindir. Bilgilerinize..
 
Üst