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

Conas baisc gach fillteán folamh in Outlook a scriosadh?

Cuir i gcás go bhfuil an iliomad fillteán folamh faoi fhillteán ríomhphoist in Outlook, go ginearálta is féidir linn na fillteáin folmha a scriosadh ceann ar cheann trí roghchlár cliceáil ar dheis. I gcomparáid le cliceáil ar dheis arís agus arís eile, tabharfaidh an t-alt seo VBA isteach chun gach fofhillteán folamh de fhillteán Outlook amháin a scriosadh ar an mórchóir.

Baisc scrios gach fillteán folamh in Outlook le VBA

Cluaisín Oifige - Cumasaigh Eagarthóireacht agus Brabhsáil Tabbed san Oifig, agus Déan an Obair i bhfad Níos Éasca ...
Kutools for Outlook - Tugann sé 100 Gné Ardchumhachta Cumhachtacha chuig Microsoft Outlook
  • Auto CC / BCC de réir rialacha agus ríomhphost á sheoladh; Auto Ar Aghaidh Ríomhphoist Il de réir rialacha; Freagra Auto gan freastalaí malairte, agus gnéithe níos uathoibríoch ...
  • Rabhadh BCC - taispeáin teachtaireacht nuair a dhéanann tú iarracht gach rud 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 ag an am céanna; Beannacht Auto Cuir leis nuair a thabharfar freagra; Dáta agus Am Auto Cuir isteach san ábhar ...
  • Uirlisí Ceangail: Auto Detach, Compress All, Rename All, Auto Save All ... Tuarascáil Thapa, Líon Ríomhphoist Roghnaithe, Bain Ríomhphoist agus Teagmhálacha Dúblacha ...
  • Déanfaidh níos mó ná 100 gné chun cinn an chuid is mó de do chuid fadhbanna a réiteach in Outlook 2021 - 2010 nó Office 365. Gnéithe iomlána triail saor in aisce 60-lá.

mboilgeog cheart gorm saigheadBaisc scrios gach fillteán folamh in Outlook le VBA

Chun gach fofhillteán folamh de fhillteán Outlook áirithe a bhaint, déan mar a leanas:

1. Brúigh Eile + F11 eochracha chun an fhuinneog Microsoft Visual Basic for Applications a oscailt.

2. Cliceáil Ionsáigh > Modúil, agus greamaigh faoi bhun chód VBA isteach i bhfuinneog an mhodúil nua.

VBA: Scrios gach fofhillteán folamh de fhillteán Outlook áirithe ar an mórchóir

Public Sub DeletindEmtpyFolder()
Dim xFolders As Folders
Dim xCount As Long
Dim xFlag As Boolean
Set xFolders = Application.GetNamespace("MAPI").PickFolder.Folders
Do
FolderPurge xFolders, xFlag, xCount
Loop Until (Not xFlag)
If xCount > 0 Then
MsgBox "Deleted " & xCount & "(s) empty folders", vbExclamation + vbOKOnly, "Kutools for Outlook"
Else
MsgBox "No empty folders found", vbExclamation + vbOKOnly, "Kutools for Outlook"
End If
End Sub

Public Sub FolderPurge(xFolders, xFlag, xCount)
Dim I As Long
Dim xFldr As Folder 'Declare sub folder objects
xFlag = False
If xFolders.Count > 0 Then
For I = xFolders.Count To 1 Step -1
Set xFldr = xFolders.Item(I)
If xFldr.Items.Count < 1 Then 'If the folder is empty check for subfolders
If xFldr.Folders.Count < 1 Then 'If the folder contains not sub folders confirm deletion
xFldr.Delete 'Delete the folder
xFlag = True
xCount = xCount + 1
Else 'Folder contains sub folders so confirm deletion
FolderPurge xFldr.Folders, xFlag, xCount
End If
Else 'Folder contains items or (subfolders that may be empty).
FolderPurge xFldr.Folders, xFlag, xCount
End If
Next
End If
End Sub

3. Brúigh F5 Eochair nó Rith cnaipe chun an cód VBA seo a rith.

4. Sa bhosca dialóige Roghnaigh Fillteán, roghnaigh an fillteán ar leith a scriosfaidh tú a chuid fofhillteáin folamh ar an mórchóir, agus cliceáil ar an OK cnaipe. Féach an pictiúr:

5. Anois tagann bosca dialóige Kutools for Outlook amach agus taispeánann sé duit cé mhéad fofhillteán folamh a scriosadh. Cliceáil ar an OK cnaipe chun é a dhúnadh.

Go dtí seo, scriosadh gach fofhillteán den fhillteán Outlook sonraithe ar an mórchóir cheana féin.


mboilgeog cheart gorm saigheadAirteagail gaolmhara

Faigh fillteán (cosán fillteáin iomlán) de réir ainm an fhillteáin in Outlook


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 (10)
Níl rátálacha ar bith fós. Bí ar an gcéad duine a rátáil!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Sármhaith !!!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Tá an earráid seo a leanas á fáil agam nuair a rith an " Earráid am rite '-2147352567 (80020009)" thuas Ní féidir an fillteán seo a scriosadh. Cliceáil ar dheis ar an bhfillteán, agus ansin cliceáil airíonna chun do cheadanna don fhillteán a sheiceáil. Féach ar úinéir an fhillteáin nó do riarthóir chun do cheadanna a athrú"

Dealraíonn sé go mbogann an script mír 1 go dtí an fillteán scriosta agus ansin earráidí amach.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Aontaigh - faighim an earráid chéanna.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Déanann an script iarracht fillteán a scriosadh cheana féin a scriosadh.
Chuir mé as a chéile i ndiaidh xFlag = Bréagach leis an ábhar seo:
ar earráid atosú seo chugainn
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Go deimhin, cuir leis:

Ar Lean Earráid Aghaidh

TAR ÉIS:

Dim x Fldr Mar Fhillteán 'Dearbhaigh oibiachtaí fo-fhillteán
xFlag = Bréagach

Ba chóir go mbeadh sé mar seo:

Dim x Fldr Mar Fhillteán 'Dearbhaigh oibiachtaí fo-fhillteán
xFlag = Bréagach
Ar Lean Earráid Aghaidh
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Tá mé ag fáil an earráid chéanna cosúil le Bryan .... agus anois?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Déanann an script iarracht fillteán a scriosadh cheana féin a scriosadh.
Chuir mé as a chéile i ndiaidh xFlag = Bréagach leis an ábhar seo:
ar earráid atosú seo chugainn
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Super éasca agus thar a bheith cabhrach. Go raibh maith agat!!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Scriosadh 74 fillteán folamh ach ar an drochuair freisin 109 fillteán nach raibh. Fágadh fillteáin fholmha eile gan teagmháil.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
D'oibrigh sé seo go hiontach dom. Go raibh maith agat. Ní féidir roinnt fillteáin a scriosadh toisc go bhfuil siad dúchasach do Outlook, ach oibríonn na fo-fhillteáin go hiontach.
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