Aholkua: beste hizkuntza Google-k itzulitako dira. Bisitatu dezakezu English estekaren bertsioa.
Saioa hasi
x
or
x
x
Eman izena
x

or

Nola bideratu eranskinak Outlook-en irizpide zehatzetan bakarrik oinarrituta?

Normalean, mezu elektronikoa birbidaltzen denean, jatorrizko mezuaren gorputza eta eranskinak ere sartzen dira. Baina, batzuetan, eranskinak bakarrik bidali behar dituzu jatorrizko mezurik gabe pertsona jakin bati irizpideetan oinarrituta. Nola konpondu liteke lan hori Outlook-en?

Birbidali automatikoki VBA kodea duen pertsona bati irizpide zehatzetan oinarritutako eranskinak soilik


Birbidali automatikoki VBA kodea duen pertsona bati irizpide zehatzetan oinarritutako eranskinak soilik

Adibidez, mezu bat jasotzen duzunean "kto-ren ezaugarri" testua duen mezu bat jasotzean, mezu elektroniko honen eranskin guztiak automatikoki bidaliko zaizkio pertsona zehatzari mezuaren gorputzarekin. Honako urrats hauek lagun zaitzake: egin honela:

1. Eutsi behera ALT + F11 teklak irekitzeko Microsoft Visual Basic aplikazioak leihoa.

2. In the Microsoft Visual Basic aplikazioak leihoa, klik bikoitza ThisOutlookSession tik Project1 (VbaProject.OTM) panela modua irekitzeko, eta gero kopiatu eta itsatsi hurrengo kodea modulu hutsan.

VBA kodea: Automatikoki birbidaltzeko mezu elektronikoa mezuaren gorputzarekin baina eranskinak bakarrik sartu:

Public WithEvents ReceivedItems As Outlook.Items
Private Sub Application_Startup()
    Set ReceivedItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub ReceivedItems_ItemAdd(ByVal Item As Object)
    Dim xForwardMail As Outlook.MailItem
    Dim xEmail As MailItem
    On Error Resume Next
    If Item.Class <> olMail Then Exit Sub
    Set xEmail = Item
    If InStrRev(UCase(xEmail.Subject), UCase("kto feature")) = 0 Then Exit Sub  'change subject text to your need
    If xEmail.Attachments.Count = 0 Then Exit Sub
    Set xForwardMail = xEmail.Forward
    With xForwardMail
        .HTMLBody = ""
        With .Recipients
            .Add "skyyang@addin88.com"    'change address to your own
            .ResolveAll
        End With
        .Send
    End With
End Sub

Ohar: Aurreko kodean, gaiaren testua eta hartzailearen helbidea alda ditzakezu.

doc auto forward attachments only 1

3. Gero gorde kodea eta berrabiarazi Outlook kodea kodea eragiteko.

4. Hemendik aurrera, posta elektronikoko mezu elektroniko berri bat zure postontzian jasotzen den bakoitzean jasotzen den bakoitzean Outlook-ek automatikoki bidaliko ditu bere eranskinak mezuaren gorputzera nahi den pertsonara.

Ohar: Kodea kontu lehenetsian bakarrik dago erabilgarri.



Kutools Outlook-era

Outlook 100, 2010, 2013, 2016 eta 2019 Outlook 365 funtzio aurreratuak baino gehiago

pantailako kutools pantailako xNUMX banner txikiari begira

Ezaugarri gehiago | Free Download | $ 39.00 bakarrik ehunka funtzioentzat

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.