Sut i gael gwared ar yr holl atodiadau o e-bost yn Outlook?
Fel rheol pan fyddwch yn rhagolwg e-bost, gallwch ddileu atodiad gyda chlicio ar y dde a dewis y Dileu Ymlyniad eitem. Weithiau gall fod llawer o atodiadau mewn neges e-bost, a bydd yn ddiflas eu tynnu fesul un. Yma rydym yn eich trefnu gyda dau dric hawdd i gael gwared ar yr holl atodiadau mewn un e-bost, a thynnu pob atodiad o sawl e-bost hefyd yn Outlook.
Tynnwch yr holl atodiadau â llaw mewn un neges e-bost yn Outlook
Tynnwch yr holl atodiadau o negeseuon e-bost lluosog yn Outlook gyda chod VBA
Tynnwch yr holl atodiadau o un neu nifer o negeseuon e-bost yn hawdd gyda Kutools ar gyfer Outlook
Tynnwch yr holl atodiadau â llaw mewn un neges e-bost yn Outlook
Mae'n hawdd cael gwared ar yr holl atodiadau mewn negeseuon e-bost dethol gyda'r Dileu Atodiadau nodwedd yn Outlook.
Cam 1: Dewiswch y neges e-bost y byddwch chi'n tynnu ei atodiadau yn nes ymlaen.
Cam 2: Cliciwch un o atodiadau yn y Pane Darllen i actifadu'r Offer Atodiadau.
Cam 3: Cliciwch y Dewis Popeth botwm yn y Dewis grŵp ar y Ymlyniadau tab.
Bydd y cam hwn yn eich galluogi i ddewis yr holl atodiadau yn y negeseuon e-bost dethol hyn ar unwaith.
Cam 4: Cliciwch y Dileu Ymlyniad botwm yn y Camau Gweithredu grŵp ar y Ymlyniadau tab.
Cam 5: Yn y blwch deialog rhybuddio, cliciwch y Dileu Atodiadau botwm.
Yna caiff yr holl atodiadau yn y negeseuon e-bost dethol hyn eu dileu cyn gynted â phosibl.
Nodyn: Mae'r nodwedd Dileu Atodiadau yn gweithio'n iawn yn Outlook 2010 a'r fersiwn ddiweddarach, ond nid yn Outlook 2007.
Tynnwch yr holl atodiadau yn hawdd o sawl e-bost a ddewiswyd yn Outlook:
Efo'r Datgysylltwch Pob atodiad cyfleustodau Kutools ar gyfer Excel, gallwch chi gael gwared ar yr holl atodiadau yn hawdd o sawl e-bost a ddewiswyd fel y demo isod a ddangosir. (Bydd yr atodiadau yn cael eu cadw mewn ffolder benodol) Dadlwythwch a cheisiwch nawr! (llwybr am ddim 30 diwrnod)
Tynnwch yr holl atodiadau o negeseuon e-bost lluosog yn Outlook gyda chod VBA
Os ydych chi am dynnu pob atodiad o nifer o negeseuon e-bost yn Microsoft Outlook, bydd y dull canlynol yn eich helpu i'w wneud yn hawdd. Rydym yn eich argymell galluogi pob macros yn eich Microsoft Outlook yn gyntaf.
Cam 1: Ewch i ffolder Fy Nogfen, creu ffolder newydd, a'i enwi fel OL Ymlyniadau
Cam 2: Dewiswch nifer o negeseuon e-bost y byddwch chi'n tynnu eu hatodiadau yn nes ymlaen.
Nodyn: Gallwch ddewis negeseuon e-bost anghynhenid gyda dal y Ctrl allwedd a chlicio.
Gallwch ddewis negeseuon e-bost yn olynol gyda dal y Symud allwedd a chlicio.
Cam 3: Agorwch y Golygydd VBA gyda phwyso'r Alt allwedd a F11 allwedd ar yr un pryd.
Cam 4: Ehangu'r Project1 > Gwrthrychau Microsoft Outlook yn y bar chwith, ac yna cliciwch ddwywaith ar y SesiwnOutlook i'w agor yn y Golygydd. Gweler y llun sgrin canlynol:
Cam 5: Copïwch a gludwch y cod VBA canlynol yn y cwarel golygu.
Public Sub ReplaceAttachmentsToLink()
Dim objApp As Outlook.Application
Dim aMail As Outlook.MailItem 'Object
Dim oAttachments As Outlook.Attachments
Dim oSelection As Outlook.Selection
Dim i As Long
Dim iCount As Long
Dim sFile As String
Dim sFolderPath As String
Dim sDeletedFiles As String
' Get the path to your My Documents folder
sFolderPath = CreateObject("WScript.Shell").SpecialFolders(16)
On Error Resume Next
' Instantiate an Outlook Application object.
Set objApp = CreateObject("Outlook.Application")
' Get the collection of selected objects.
Set oSelection = objApp.ActiveExplorer.Selection
' Set the Attachment folder.
sFolderPath = sFolderPath & "\OLAttachments"
' Check each selected item for attachments. If attachments exist,
' save them to the Temp folder and strip them from the item.
For Each aMail In oSelection
' This code only strips attachments from mail items.
' If aMail.class=olMail Then
' Get the Attachments collection of the item.
Set oAttachments = aMail.Attachments
iCount = oAttachments.Count
If iCount > 0 Then
' We need to use a count down loop for removing items
' from a collection. Otherwise, the loop counter gets
' confused and only every other item is removed.
For i = iCount To 1 Step -1
' Save attachment before deleting from item.
' Get the file name.
sFile = oAttachments.Item(i).FileName
' Combine with the path to the Temp folder.
sFile = sFolderPath & "\" & sFile
' Save the attachment as a file.
oAttachments.Item(i).SaveAsFile sFile
' Delete the attachment.
oAttachments.Item(i).Delete
'write the save as path to a string to add to the message
'check for html and use html tags in link
If aMail.BodyFormat <> olFormatHTML Then
sDeletedFiles = sDeletedFiles & vbCrLf & "<file://" & sFile & ">"
Else
sDeletedFiles = sDeletedFiles & "<br>" & "<a href='file://" & _
sFile & "'>" & sFile & "</a>"
End If
Next i
'End If
' Adds the filename string to the message body and save it
' Check for HTML body
If aMail.BodyFormat <> olFormatHTML Then
aMail.Body = aMail.Body & vbCrLf & _
"The file(s) were saved to " & sDeletedFiles
Else
aMail.HTMLBody = aMail.HTMLBody & "<p>" & _
"The file(s) were saved to " & sDeletedFiles & "</p>"
End If
aMail.Save
'sets the attachment path to nothing before it moves on to the next message.
sDeletedFiles = ""
End If
Next 'end aMail
ExitSub:
Set oAttachments = Nothing
Set aMail = Nothing
Set oSelection = Nothing
Set objApp = Nothing
End Sub
Cam 6: Pwyswch allwedd F5 i redeg y cod VBA hwn.
Nawr mae'r holl atodiadau o negeseuon e-bost dethol yn cael eu tynnu, gyda hypergysylltiadau gadael i bob atodiad wedi'i ddileu ar waelod yr holl negeseuon e-bost a ddewiswyd.
Tynnwch yr holl atodiadau o un neu nifer o negeseuon e-bost yn hawdd gyda Kutools ar gyfer Outlook
Mae adroddiadau Datgysylltwch Bawb atodiadau cyfleustodau o Kutools ar gyfer Rhagolwg yn gallu tynnu pob atodiad yn gyflym o un neu sawl e-bost dethol yn Outlook. Gwnewch fel a ganlyn.
Kutools ar gyfer Rhagolwg : gyda mwy na 100 o ychwanegion Outlook defnyddiol, am ddim i geisio heb unrhyw gyfyngiad mewn 60 diwrnod.
1. Dewiswch un neu fwy o negeseuon e-bost gyda'r atodiadau rydych chi am eu tynnu, yna cliciwch Kutools > Offer Ymlyniad > Datgysylltwch Bawb. Gweler y screenshot:
2. Yn y Gosodiadau Datgysylltu blwch deialog, ffurfweddwch fel a ganlyn.
- 2.1 Cliciwch y Pori botwm i ddewis ffolder i arbed yr holl atodiadau sydd wedi'u dileu.
- 2.2 Yn ddiofyn, mae'r Datgysylltwch atodiad (au) yn yr arddull islaw blwch yn cael ei wirio, dewiswch opsiwn i gadw'r atodiadau i wahanol ffolderau yn seiliedig ar e-byst yn ôl yr angen.
- 2.3 Cliciwch y OK botwm. Gweler y screenshot:
3. Cliciwch ar y Ydy botwm yn y Datgysylltwch Bawb blwch deialog.
4. Yna a Kutools ar gyfer Rhagolwg bydd blwch deialog yn ymddangos i ddweud wrthych faint o atodiadau sy'n cael eu dileu. Cliciwch y OK botwm.
Nawr mae'r holl atodiadau'n cael eu tynnu ar unwaith gyda dim ond y hypergysylltiadau yn gadael mewn e-byst dethol. Gallwch glicio ar yr hyperddolen i agor yr atodiad cyfatebol yn ôl yr angen.
Os ydych chi am gael treial am ddim (60 diwrnod) o'r cyfleustodau hwn, cliciwch i'w lawrlwytho, ac yna ewch i gymhwyso'r llawdriniaeth yn ôl y camau uchod.
Offer Cynhyrchiant Swyddfa Gorau
Kutools ar gyfer Rhagolwg - Dros 100 o Nodweddion Pwerus i Werthu Eich Outlook
🤖 Cynorthwy-ydd Post AI: E-byst pro ar unwaith gyda hud AI - un clic i atebion athrylith, tôn berffaith, meistrolaeth amlieithog. Trawsnewid e-bostio yn ddiymdrech! ...
📧 E-bostio Automation: Allan o'r Swyddfa (Ar gael ar gyfer POP ac IMAP) / Amserlen Anfon E-byst / Auto CC/BCC gan Reolau Wrth Anfon E-bost / Awto Ymlaen (Rheolau Uwch) / Auto Ychwanegu Cyfarchiad / Rhannwch E-byst Aml-Dderbynnydd yn Negeseuon Unigol yn Awtomatig ...
📨 Rheoli E-bost: Dwyn i gof E-byst yn Hawdd / Rhwystro E-byst Sgam gan Bynciau ac Eraill / Dileu E-byst Dyblyg / Chwilio Manwl / Cydgrynhoi Ffolderi ...
📁 Ymlyniadau Pro: Arbed Swp / Swp Datgysylltu / Cywasgu Swp / Auto Achub / Datgysylltiad Auto / Cywasgiad Auto ...
🌟 Rhyngwyneb Hud: 😊Mwy o Emojis Pretty a Cŵl / Rhowch hwb i'ch Cynhyrchiant Outlook gyda Golygfeydd Tabbed / Lleihau Outlook Yn lle Cau ...
???? Rhyfeddodau un clic: Ateb Pawb ag Ymlyniadau Dod i Mewn / E-byst Gwrth-Gwe-rwydo / 🕘Dangos Parth Amser yr Anfonwr ...
👩🏼🤝👩🏻 Cysylltiadau a Chalendr: Swp Ychwanegu Cysylltiadau O E-byst Dethol / Rhannwch Grŵp Cyswllt i Grwpiau Unigol / Dileu Atgoffa Pen-blwydd ...
Dros Nodweddion 100 Aros Eich Archwiliad! Cliciwch Yma i Ddarganfod Mwy.