Բաց թողնել հիմնական բովանդակությունը

Ինչպե՞ս խմբավորել և տեսակավորել էլ-նամակները ըստ ամսվա Outlook- ում:

Էլ.փոստերը դասվում են ըստ ստացված ամսաթվի Outlook- ի Մուտքի արկղում լռելյայն: Այնուամենայնիվ, ըստ ստացված ամսվա բոլոր նամակները դասավորելու կամ խմբավորելու հրաման չկա: Այստեղ ես կներկայացնեմ Outlook- ում բոլոր էլ.փոստերը ըստ ամսվա խմբավորելու և տեսակավորելու եղանակը:

Outlook- ում էլ-նամակները խմբավորեք կամ տեսակավորեք ՝ օգտագործելով VBA կոդ

Outlook- ում էլ-նամակները խմբավորեք կամ տեսակավորեք ՝ օգտագործելով VBA կոդ

Այս մեթոդը կօգնի ձեզ ստեղծել նոր սյունակ, որը կոչվում է Ամիս, այնուհետև կիրառեք VBA մակրո ՝ ստացված ամիսը նոր սյունակում հանելու համար, և ապա կարող եք տեսակավորել կամ խմբավորել բոլոր էլփոստերը ըստ Ամսվա սյունակի Outlook- ում:

1.  Բացեք փոստի թղթապանակը, որտեղ տեսակավորելու կամ խմբավորելու եք էլ-նամակները ըստ ամիսների, և կտտացրեք այն Դիտեք Պարամետրերը կոճակը Դիտել ներդիրը Outlook 2010-ում և ավելի ուշ տարբերակում:

doc դասավորել էլ. փոստերը ըստ ամսվա 1-ի

Նշում: Outlook 2007-ում կարող եք սեղմել Դիտել > Ընթացիկ դիտում > Անհատականացրեք ընթացիկ տեսքը.

2, Առաջիկայում Ընդլայնված դիտման կարգավորումներ / Անհատականացրեք դիտումը երկխոսության տուփ, կտտացրեք Սյունակ կոճակը (կամ Տերեւներ կոճակ)

doc դասավորել էլ. փոստերը ըստ ամսվա 2-ի

3, Մեջ Showուցադրել սյունակը / դաշտերը երկխոսության տուփ, կտտացրեք Նոր սյունակ կոճակը (կամ Նոր դաշտ կոճակը) Նոր սյունակ / դաշտ երկխոսության դաշտը բացելու համար մուտքագրեք Ամիս է Անուն տուփ, պահիր Տեքստ երկուսում էլ ընտրված Տիպ տուփը և Ֆորմատ տուփը, ապա կտտացրեք OK կոճակ Տե՛ս ստորև նշված էկրանի նկարը.

doc դասավորել էլ. փոստերը ըստ ամսվա 3-ի

4.  Այժմ դուք վերադառնում եք դեպի Showուցադրել սյունակները / դաշտերը երկխոսության տուփ, կտտացրեք ընտրելու համար Ամիս կետը Ուցադրել այս սյունակները (Կամ Տերեւներ) այս կարգով տուփը և տեղափոխել այն ներքևից Ընդունել սեղմելով Տեղափոխել կոճակը, և վերջապես կտտացրեք այն OK կոճակը:

doc դասավորել էլ. փոստերը ըստ ամսվա 4-ի

5, Սեղմիր OK կոճակը փակելու համար Ընդլայնված դիտման կարգավորումներ / Անհատականացրեք դիտումը երկխոսության վանդակում:

6, Ընտրեք բոլոր նամակները բացման պանակում `ընտրելով ցանկացած էլ-նամակ և այնուհետև սեղմելով այն Ctrl + A ստեղները միաժամանակ:

Նշում: Եթե Ընթերցանության պատուհանը միանում է, խնդրում ենք փակել այն կտտացնելով Դիտել > Ընթերցանության պատուհանը > Off.

7, Բացեք Microsoft Visual Basic հավելվածների համար պատուհանը սեղմելով ալտ + F11 միևնույն ժամանակ ստեղները, ապա կտտացրու Տեղադրել > Մոդուլներ.

8, Տեղադրեք հետևյալ VBA մակրոը մոդուլի մեջ.

VBA. Տեսակավորել կամ խմբավորել նամակները ըստ ամսվա

Sub ListSelectionMonth()
	Dim aObj As Object
	Dim oProp As Outlook.UserProperty
	Dim sMonth
	
	On Error Resume Next
	
	For Each aObj In Application.ActiveExplorer.Selection
		Set oMail = aObj
		
		sMonth = Month(oMail.ReceivedTime)
		Set oProp = oMail.UserProperties.Add("Month", olText, True)
		oProp.Value = sMonth
		oMail.Save
		
		Err.Clear
	Next
	
End Sub

9, Սեղմեք F5 VBA- ի այս մակրո գործարկման բանալին:

10, Այժմ յուրաքանչյուր էլփոստի ստացված ամիսը արդյունահանվում է հետևյալի մեջ Ամիս սյուն Այս բաց թղթապանակում բոլոր էլ.փոստերը ըստ ամիսների տեսակավորելու համար պարզապես կտտացրեք սյունակի վերնագրի վրա Ամիս, Տեսեք,

doc դասավորել էլ. փոստերը ըստ ամսվա 5-ի

ՆշումԱյս բացվող թղթապանակում բոլոր էլ.փոստերը ըստ ամսվա խմբավորելու համար աջով կտտացրեք սյունակի վերնագրի վրա Ամիս, ապա ընտրեք Խմբավորել ըստ այս ոլորտի աջ կտտացնելու ցանկից: Տեսեք,

doc դասավորել էլ. փոստերը ըստ ամսվա 6-ի

Գրասենյակի արտադրողականության լավագույն գործիքները

Outlook- ի համար նախատեսված գործիքներ - Ավելի քան 100 հզոր գործառույթ՝ ձեր Outlook-ը լիցքավորելու համար

🤖 AI Փոստի օգնական: Ակնթարթային պրոֆեսիոնալ նամակներ AI մոգությամբ. մեկ սեղմումով հանճարեղ պատասխաններ, կատարյալ հնչերանգներ, բազմալեզու վարպետություն: Փոխակերպեք էլ. փոստը առանց ջանքերի: ...

📧 Email ավտոմատացում: Գրասենյակից դուրս (հասանելի է POP-ի և IMAP-ի համար)  /  Ժամանակացույց ուղարկել նամակներ  /  Ավտոմատ CC/BCC էլփոստ ուղարկելիս կանոններով  /  Ավտոմատ փոխանցում (Ընդլայնված կանոններ)   /  Ավտոմատ ավելացնել ողջույնները   /  Ավտոմատ կերպով բաժանել բազմասերիստացող նամակները առանձին հաղորդագրությունների ...

📨 էլեկտրոնային կառավարման: Հեշտությամբ հիշեք նամակները  /  Արգելափակել խարդախության նամակները ըստ առարկաների և այլոց  /  Deleteնջել կրկնօրինակ նամակները  /  Ընդլայնված որոնում  /  Համախմբել Թղթապանակները ...

📁 Հավելվածներ Pro: Խմբաքանակի պահպանում  /  Խմբաքանակի անջատում  /  Խմբաքանակային կոմպրես  /  Auto Save- ը   /  Ավտոմատ անջատում  /  Ավտոմատ սեղմում ...

🌟 Ինտերֆեյս Magic: 😊Ավելի գեղեցիկ և զով էմոջիներ   /  Բարձրացրեք ձեր Outlook-ի արտադրողականությունը ներդիրներով դիտումների միջոցով  /  Նվազագույնի հասցնել Outlook-ը փակելու փոխարեն ...

???? Մեկ սեղմումով Հրաշքներ: Պատասխանել բոլորին մուտքային հավելվածներով  /   Հակաֆիշինգի էլ. նամակներ  /  🕘Ցուցադրել ուղարկողի ժամային գոտին ...

👩🏼‍🤝‍👩🏻 Կոնտակտներ և օրացույց: Խմբաքանակի ավելացրեք կոնտակտներ ընտրված էլ  /  Կոնտակտային խումբը բաժանեք առանձին խմբերի  /  Հեռացնել ծննդյան հիշեցումները ...

Over 100 Նկարագրություն Սպասեք ձեր հետազոտությանը: Սեղմեք այստեղ՝ ավելին բացահայտելու համար:

 

 

Comments (14)
No ratings yet. Be the first to rate!
moon
moon
This comment was minimized by the moderator on the site
I have Outlook 2007 and have try that VBA. First I did have the problem that only 1 E-Mail of all get the month show.
I needed to mark all E-Mails first and then push in VBA F5 to show in all E-Mails the month.

a bad part of that code is that all month (1, 2, 3, 4, 5, 6, 7, 8, 9) get grouped on the wrong position in front of 10, 11, 12
is there any additional VBA sequence what add to the first 9 Month a 0? ergo 01, 02, 03 etc?

as I have several years in some folders it make sense to group those E-Mails first by year and after that by Month.
Reply
Report
0
0
Armin
Armin
This comment was minimized by the moderator on the site
Strange.
Made a restart. Now it works.Sorry for bothering.
Thx again :) <3
Reply
0
0
Armin
Armin
This comment was minimized by the moderator on the site
Sorry. Didn't saw that the page is origin in english. #emabarrased
Google translate is getting better. :D
Hello from Hamburg,
great stuff. Thanks for this. :)
Only a small problem.
I had first adapted the code so that it puts the year and month together for me.

Sub ListSelectionYearMonth()
Dim aObj As Object
Dim oProp As Outlook.UserProperty
Dim oMail As Object
Dim sMonth
Dim sYear
Dim sYearMonth

On Error Resume Next

For Each aObj In Application.ActiveExplorer.Selection
Set oMail = aObj

sMonth = Month(oMail.ReceivedTime)
sYear = Year(oMail.ReceivedTime)

If sMonth < 10 Then
sMonth = 0 & sMonth
Else
sMonth = sMonth
End If

sYearMonth = sYear & "/" & sMonth
Set oProp = oMail.UserProperties.Add("YearMonth", olText, True)
oProp.Value = sYearMonth
oMail.Save

Err.Clear
Next

End Sub

This worked wonderfully.
Now I noticed in a folder that a grouping first by year and then by month increases the clarity.
I used the original code.
However, the column there remains empty.

Sub ListSelectionMonth()
Dim aObj As Object
Dim oProp As Outlook.UserProperty
Dim oMail As Object
Dim sMonth

On Error Resume Next

For Each aObj In Application.ActiveExplorer.Selection
Set oMail = aObj

sMonth = Month(oMail.ReceivedTime)

If sMonth < 10 Then
sMonth = 0 & sMonth
Else
sMonth = sMonth
End If

Set oProp = oMail.UserProperties.Add("Month", olText, True)
oProp.Value = sMonth
oMail.Save

Err.Clear
Next

End Sub

I'm a bit perplexed at the moment.

Glad about any advice

VG
Armin


Translated with http://www.DeepL.com/Translator (free version)
Reply
0
0
Armin
Armin
This comment was minimized by the moderator on the site
Hallo aus Hamburg,super Sache. Danke dafür. :)Kleines Problem nur.Ich hatte zuerst den Code so angepasst das er mir Jahr und Monat zusammensetzt.
Sub ListSelectionYearMonth()
Dim aObj As Object
Dim oProp As Outlook.UserProperty
Dim oMail As Object
Dim sMonth
Dim sYear
Dim sYearMonth

On Error Resume Next

For Each aObj In Application.ActiveExplorer.Selection
Set oMail = aObj

sMonth = Month(oMail.ReceivedTime)
sYear = Year(oMail.ReceivedTime)

If sMonth < 10 Then
sMonth = 0 & sMonth
Else
sMonth = sMonth
End If

sYearMonth = sYear & "/" & sMonth
Set oProp = oMail.UserProperties.Add("JahrMonat", olText, True)
oProp.Value = sYearMonth
oMail.Save

Err.Clear
Next

End Sub

Hat wunderbar geklappt.Nun ist mir in einem Ordner aufgefallen das eine Gruppierung zuersnach Jahr und dann nach Monat die Übersichtlichkeit noch erhöht.Habe als den ursprünglichen Code genommen.Dort bleibt dann allerdings die Spalte leer.
Sub ListSelectionMonth()
Dim aObj As Object
Dim oProp As Outlook.UserProperty
Dim oMail As Object
Dim sMonth

On Error Resume Next

For Each aObj In Application.ActiveExplorer.Selection
Set oMail = aObj

sMonth = Month(oMail.ReceivedTime)

If sMonth < 10 Then
sMonth = 0 & sMonth
Else
sMonth = sMonth
End If

Set oProp = oMail.UserProperties.Add("Monat", olText, True)
oProp.Value = sMonth
oMail.Save

Err.Clear
Next

End Sub

Macht mich grad etwas ratlos.
Freue mich über jeden Rat
VGArmin
Reply
0
0
invisalign@gmail.com
This comment was minimized by the moderator on the site
This will also help.
Reply
Report
0
0
Nikolay
Nikolay
This comment was minimized by the moderator on the site
The code works as in the article. But it does not apply to new letters. Every time you need to go to the created module in the Visual Basik and press F5.
Reply
0
0
hanzo
hanzo
This comment was minimized by the moderator on the site
I used the above vba and let me begin by saying this does help in micro management which is not available by default. this is beneficial for archival and storage and not something supposed to work automatically for incoming email. I was able to modify this a bit and also add a year column. So for all emails I was able to get a month and year so that I can group and then regroup (by year and then by month). What I did find however is there is some kind of limitation to the number of items it goes through and then exists (not sure why). For example if I were to select a folder with 18k-19k emails, it will loop only through some and then at the end of the run it will not update all the emails with the required. However if you run in smaller batches then it runs perfectly fine. The painful part here is to keep on selecting in batches. This is a pain for people like me who wish to manage or rather arrange years or emails that runs in a 6 figures in numbers. Anyone here been able to figure this out out or willing to go on a troubleshooting spree to fix this or how this can be addressed ?
Reply
0
0
Bhushit Joshipura
Bhushit Joshipura
This comment was minimized by the moderator on the site
That is, I want to group mails by subject and put the group with maximum mails on the top. How can I do that?
Reply
0
0
Bhushit Joshipura
Bhushit Joshipura
This comment was minimized by the moderator on the site
I want to :

1. Group mails by subject

2. Sort them by number of e-mails inside the group

How can I do achieve this?
Reply
0
0
Carine
Carine     Bhushit Joshipura
This comment was minimized by the moderator on the site
I want this too
Reply
0
0
Oliver Stoltze
Oliver Stoltze
This comment was minimized by the moderator on the site
Is it possible to create VBA macro to group and sort emails by week?
Reply
0
0
There are no comments posted here yet
Load More
Please leave your comments in English
Guest
Posting as Guest
×
Rate this post:
Reset
0   Characters
Suggested Locations