Note: The other languages of the website are Google-translated. Back to English

Conas na ríomhphoist a rangú de réir míosa in Outlook?

Má tá go leor ríomhphoist i do Bhosca Isteach, le go mbeidh cuma néata agus dea-eagraithe ar an mbosca poist, is féidir leat iad a stóráil nó a chur i gcartlann i bhfillteáin éagsúla bunaithe ar mhí shonrach ama faighte na ríomhphoist mar a thaispeántar thíos. De ghnáth, is féidir leat na fillteáin a chruthú de láimh agus ansin iad a bhogadh ceann ar cheann. Ar ndóigh, beidh an cur chuige seo am-íditheach agus trioblóideach. San Airteagal seo, labhróidh mé faoi chód VBA chun an tasc seo a réiteach go tapa agus go héasca.


Rangaigh na ríomhphoist bunaithe ar mhí le cód VBA

Chun na ríomhphoist a aistriú chuig fillteáin éagsúla bunaithe ar mhí, cuir an cód VBA thíos i bhfeidhm le do thoil:

1. Cliceáil chun an R-phost Isteach fillteán ar mhaith leat na ríomhphoist a rangú.

2. Coinnigh síos an ALT + F11 eochracha a oscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

3. cliceáil Ionsáigh > Modúil, agus greamaigh an cód seo a leanas i bhFuinneog an Mhodúil.

Cód VBA: Rangaigh na ríomhphoist bunaithe ar mhí

Sub ClassifyEmailsbyMonth()
'Updateby ExtendOffice
Dim xCurFolder As Folder
Dim xMoveFolder As Folder
Dim xMail As MailItem
Dim I As Long
Dim xYear As String, xMonth As String
On Error Resume Next
Set xCurFolder = Application.ActiveExplorer.CurrentFolder
For I = xCurFolder.Items.Count To 1 Step -1
  DoEvents
  If xCurFolder.Items.Item(I).Class = olMail Then
    Set xMail = xCurFolder.Items.Item(I)
    xYear = Year(xMail.ReceivedTime)
    xMonth = Month(xMail.ReceivedTime)
    Set xMoveFolder = Nothing
    Set xMoveFolder = xCurFolder.Folders(xYear & "." & xMonth)
    If xMoveFolder Is Nothing Then
      Set xMoveFolder = xCurFolder.Folders.Add(xYear & "." & xMonth)
    End If
    xMail.Move xMoveFolder
  End If
Next
Set xMoveFolder = Nothing
Set xCurFolder = Nothing
End Sub

4. Ansin, brúigh F5 eochair chun an cód seo a rith, agus déantar na ríomhphoist go léir san fhillteán Bosca Isteach roghnaithe a rangú de réir míosa ar leith d'am faighte na ríomhphoist, féach an scáileán scáileáin:


Kutools for Outlook - Tugann sé 100 Gné Ard le Outlook, agus Déan an Obair i bhfad Níos Éasca!

  • Auto CC / BCC de réir rialacha agus ríomhphost á sheoladh; Auto Ar Aghaidh Ríomhphoist Il de réir saincheaptha; Freagra Auto gan freastalaí malairte, agus gnéithe níos uathoibríoch ...
  • Rabhadh BCC - taispeáin teachtaireacht nuair a dhéanann tú iarracht gach ceann a fhreagairt má tá do sheoladh ríomhphoist ar liosta BCC; Meabhraigh Nuair a bhíonn Ceangaltáin ar Iarraidh, agus gnéithe meabhrúcháin níos mó ...
  • Freagra (Gach) Leis na Ceangaltáin Uile sa chomhrá poist; Freagair go leor Ríomhphost i soicindí; Beannacht Auto Cuir leis nuair a thabharfar freagra; Cuir Dáta leis san ábhar ...
  • Uirlisí Ceangail: Bainistigh Gach Ceangaltán i ngach Ríomhphost, Auto Dícheangail, Comhbhrú Gach, Athainmnigh Uile, Sábháil Gach ... Tuarascáil Thapa, Líon Ríomhphoist Roghnaithe...
  • Ríomhphoist Cumhachtacha Junk de réir saincheaptha; Bain Ríomhphoist agus Teagmhálacha Dúblacha... Cuir ar do chumas déanamh níos cliste, níos gasta agus níos fearr in Outlook.
kutools lámhaigh dearcadh kutools tab 1180x121
kutools lámhaigh dearcadh kutools móide cluaisín 1180x121
 
Sórtáil tuairimí de réir
Comments (0)
Níl rátálacha ar bith fós. Bí ar an gcéad duine a rátáil!
Níl aon tráchtanna curtha suas anseo go fóill
Fág do chuid tuairimí
Ag postáil mar Aoi
×
Ráta an post seo:
0   Carachtair
Suímh Molta

Lean orainn

Cóipcheart © 2009 - www.extendoffice.com. | Gach ceart ar cosaint. Cumhachtaithe ag ExtendOffice. | léarscáil an tSuímh
Is trádmharcanna nó trádmharcanna cláraithe de chuid Microsoft Corporation sna Stáit Aontaithe agus / nó i dtíortha eile iad lógó Office agus Office.
Cosanta ag Sectigo SSL