Ja vēlaties ātri iegūt pielikumu skaitu katrā e-pasta sarakstā e-pasta sarakstā, šajā rakstā varat izmantot VBA kodu. Tas automātiski saskaitīs katra ienākošā e-pasta pielikumus un parādīs to skaitu jaunā kolonnā.
Dažiem lietotājiem bieži ir jāskaita e-pasta pielikumi. Kādēļ šajā scenārijā neizveidot un neiespējot ekskluzīvu kolonnu pielikumu skaita parādīšanai? Tālāk mēs iemācīsim, kā Outlook automātiski saskaitīt e-pasta pielikumus un parādīt to skaitu šādā jaunā kolonnā.
Parādīt pielikumu skaitu e-pasta sarakstā
- Lai sāktu, palaidiet savu Outlook lietojumprogrammu.
- Pēc tam Outlook galvenajā logā nospiediet taustiņu “Alt + F11” taustiņus.
- Nākamajā jaunajā Outlook VBA redaktora logā ir jāatver modulis, kas netiek izmantots.
- Pēc tam šajā modulī nokopējiet un ielīmējiet šādu VBA kodu.
Sub AutoCountAttachments(objMail As Outlook.MailItem)
Dim objAttachments As Outlook.Attachments
Dim objProperties As Outlook.UserProperties
Dim objProperty As Outlook.UserProperty
Dim strPropertyName As String
Set objAttachments = objMail.Attachments
strPropertyName = "Attachment Count"
Set objProperties = objMail.UserProperties
'Check if there is already a column in this name
Set objProperty = objProperties.Find(strPropertyName, True)
If objProperty Is Nothing Then
'If not, add this column
Set objProperty = objProperties.Add(strPropertyName, olText, True)
End If
'Set the column value equal to the count of attachments
objProperty.value = objAttachments.Count
objMail.Save
End Sub
- Pēc tam varat iziet no pašreizējā loga “Microsoft Visual Basic for Applications”.
- Vēlāk jums būs jāizveido jauns kārtulas šī skripta izpildei katrā ienākošajā e-pastā.
- Pirmkārt, dodieties uz izvēlni “Fails” un cilnē “Informācija” noklikšķiniet uz pogas “Pārvaldīt noteikumus un brīdinājumus”.
- Pēc tam jaunajā dialoglodziņā nospiediet pogu "Jauns noteikums".
- Nākamajā ekrānā “Rule Wizard” atlasiet “Lietot noteikumu par saņemtajiem ziņojumiem” un nospiediet “Tālāk”.
- Pēc tam ignorējiet “Atlasīt nosacījumus” un noklikšķiniet uz “Tālāk”.
- Pēc tam atlasiet darbību “palaist skriptu” un atlasiet iepriekš pievienoto makro, piemēram, nākamajā ekrānuzņēmumā.
- Pēc tam noklikšķiniet uz vairākiem “Tālāk”, līdz tiek sasniegts pēdējais ekrāns “Pabeigt kārtulas iestatīšanu”.
- Vēlāk jums ir jānorāda jauns šīs kārtulas nosaukums un jāiespējo opcija “Izpildīt šo kārtulu ziņojumiem, kas jau atrodas “Iesūtnē”” un “Ieslēgt šo kārtulu”.
- Visbeidzot, noklikšķiniet uz pogas "Pabeigt".
- Pēc tam jums jāpievieno kolonna “Pielikumu skaits”, kas izveidota ar VBA kodu. Vienkārši veiciet tālāk norādītās darbības.
- Vispirms e-pasta saraksta ekrānā dodieties uz cilni “Skatīt”.
- Pēc tam noklikšķiniet uz pogas "Skatīt iestatījumus".
- Jaunajā uznirstošajā dialoglodziņā nospiediet pogu "Slejas".
- Pēc tam logā “Rādīt kolonnas” atrodiet un atlasiet sleju “Pielikumu skaits” sadaļā “Lietotāja noteiktās kolonnas iesūtnē” un nospiediet pogu “Pievienot”.
- Visbeidzot, noklikšķiniet uz pogas “OK”, lai saglabātu izmaiņas.
- Galu galā e-pasta sarakstā varat redzēt sleju “Pielikumu skaits”, kurā tiek parādīts katra e-pasta pielikumu skaits, kā parādīts tālāk redzamajā attēlā.
Izvairieties no apgrūtinoša PST datu zuduma
Tiek uzskatīts, ka neviens nav gatavs samierināties ar PST datu zudumu. Tam pašam ir jāattiecas arī uz jums. Tāpēc jums ir jāveic daži piesardzības pasākumi, piemēram, PST faila datu dublējumkopijas un cienījama labošanas rīka, piemēram, DataNumen Outlook Repair. Tā var labot Outlook jautājumi, nesalaužot sviedrus.
Autora ievads:
Šērlija Džana ir datu atkopšanas eksperte DataNumen, Inc., kas ir pasaules līderis datu atkopšanas tehnoloģiju, tostarp sql labot un perspektīvas remonta programmatūras produktus. Lai iegūtu vairāk informācijas, apmeklējiet vietni www.datanumen. Ar