Note: The other languages of the website are Google-translated. Back to English
Mewngofnodi  \/ 
x
or
x
Cofrestru  \/ 
x

or

Sut i gadw atodiadau wrth ateb yn Outlook?

Pan anfonwn neges e-bost yn Microsoft Outlook, mae atodiadau gwreiddiol yn y neges e-bost hon yn aros yn y neges a anfonwyd ymlaen. Fodd bynnag, pan fyddwn yn ateb neges e-bost, ni fydd yr atodiadau gwreiddiol ynghlwm yn y neges ateb newydd. Yma, rydyn ni'n mynd i gyflwyno cwpl o driciau am gadw atodiadau gwreiddiol wrth ateb yn Microsoft Outlook.

Ymateb gydag atodiadau trwy gopïo a gludo â llaw
Ymateb gydag atodiadau yn awtomatig gan VBA
Un clic i ateb gydag atodiadau gyda Kutools ar gyfer Outlook


Ymateb gydag atodiadau trwy gopïo a gludo â llaw

Gallwn gopïo atodiadau gwreiddiol â llaw mewn negeseuon e-bost, a'u pastio yn y ffenestr Ateb Neges pan fyddwn yn ateb y neges e-bost yn ddiweddarach.

Cam 1: Cliciwch y neges e-bost i'w rhagolwg yn y Pane Darllen.

Cam 2: Cliciwch ar y dde ar un atodiad yn y neges e-bost rhagolwg, a dewiswch y Dewis Popeth o'r ddewislen clicio ar y dde.

Cam 3: Cliciwch ar y dde ar yr atodiadau a ddewiswyd, a dewiswch y copi o'r ddewislen clicio ar y dde.

Cam 4: Atebwch y neges e-bost trwy glicio ar y ateb botwm ar y Hafan tab (neu ar y Bar Offer yn Outlook 2007).

Cam 5: Yn y ffenestr neges Ateb, cliciwch y Gludo botwm ar y Neges tab i gludo'r atodiadau hyn.

Os ydych chi'n defnyddio Outlook 2013 neu'r fersiwn ddiweddarach, cliciwch y Pop Allan yng nghornel chwith uchaf Reading Pane i ryddhau ffenestr y neges Ateb. Cliciwch i wybod mwy ...

Cam 6: Cyfansoddwch y neges ateb, a Cliciwch y anfon botwm.


Ateb e-bost yn hawdd gydag atodiadau gwreiddiol yn Outlook:

Kutools ar gyfer Rhagolwg's Ymateb gydag Atodiad gall cyfleustodau eich helpu i ateb e-bost a dderbynnir yn hawdd gyda'i atodiadau gwreiddiol yn Outlook. Gweler y demo isod: 
Dadlwythwch a rhoi cynnig arni nawr! (Llwybr am ddim 60 diwrnod)


Ymateb gydag atodiadau yn awtomatig gan VBA 

Mae macro VBA a all eich helpu i ymateb gydag atodiadau gwreiddiol yn awtomatig.

Nodyn: Cyn i chi redeg unrhyw macros VBA, mae angen i chi wneud hynny galluogi macros yn Microsoft Outlook.

Cam 1: Dewiswch y neges e-bost y byddwch chi'n ei hateb gyda'i atodiadau.

Cam 2: Pwyswch y Alt + F11 allweddi i agor ffenestr Microsoft Visual Basic for Applications.

Cam 3: Ehangu'r Gwrthrychau Project1 a Microsoft Outlook yn y bar chwith, a chlicio ddwywaith ar y ThisOutlookSession i'w agor.

Cam 4: Gludwch y cod canlynol i mewn i ffenestr ThisOutlookSession.

Sub RunReplyWithAttachments()
'Update by Extendoffice 20180830
    Dim xReplyItem As Outlook.MailItem
    Dim xItem As Object
    On Error Resume Next
    Set xItem = GetCurrentItem()
    If xItem Is Nothing Then Exit Sub
    Set xReplyItem = xItem.Reply
    CopyAttachments xItem, xReplyItem
    xReplyItem.Display
    Set xReplyItem = Nothing
    Set xItem = Nothing
End Sub
Sub RunReplyAllWithAttachments()
    Dim xReplyAllItem As Outlook.MailItem
    Dim xItem As Object
    Set xItem = GetCurrentItem()
    If xItem Is Nothing Then Exit Sub
    Set xReplyAllItem = xItem.ReplyAll
    CopyAttachments xItem, xReplyAllItem
    xReplyAllItem.Display
    Set xReplyAllItem = Nothing
    Set xItem = Nothing
End Sub
    
Function GetCurrentItem() As Object
    On Error Resume Next
    Select Case TypeName(Application.ActiveWindow)
        Case "Explorer"
            Set GetCurrentItem = Application.ActiveExplorer.Selection.Item(1)
        Case "Inspector"
            Set GetCurrentItem = Application.ActiveInspector.currentItem
    End Select
End Function
    
Sub CopyAttachments(SourceItem As MailItem, TargetItem As MailItem)
    Dim xFilePath As String
    Dim xAttachment As Attachment
    Dim xFSO As Scripting.FileSystemObject
    Dim xTmpFolder As Scripting.Folder
    Dim xFldPath As String
    Set xFSO = New Scripting.FileSystemObject
    Set xTmpFolder = xFSO.GetSpecialFolder(2)
    xFldPath = xTmpFolder.Path & "\"
    For Each xAttachment In SourceItem.Attachments
        If IsEmbeddedAttachment(xAttachment) = False Then
            xFilePath = xFldPath & xAttachment.Filename
            xAttachment.SaveAsFile xFilePath
            TargetItem.Attachments.Add xFilePath, , , xAttachment.DisplayName
            xFSO.DeleteFile xFilePath
        End If
    Next
    Set xFSO = Nothing
    Set xTmpFolder = Nothing
End Sub

Function IsEmbeddedAttachment(Attach As Attachment)
    Dim xAttParent As Object
    Dim xCID As String, xID As String
    Dim xHTML As String
    On Error Resume Next
    Set xAttParent = Attach.Parent
    xCID = ""
    xCID = Attach.PropertyAccessor.GetProperty("http://schemas.microsoft.com/mapi/proptag/0x3712001F")
    If xCID <> "" Then
        xHTML = xAttParent.HTMLBody
        xID = "cid:" & xCID
        If InStr(xHTML, xID) > 0 Then
            IsEmbeddedAttachment = True
        Else
            IsEmbeddedAttachment = False
        End If
    End If
End Function

Cam 5: Pwyswch y F5 allwedd i redeg y macro hwn. Yn yr agoriad Macros blwch deialog, cliciwch Atodiadau RunReplyAllWithAttachments os ydych chi am ymateb i bawb gydag atodiadau. Fel arall, dewiswch Atodiadau RunReplyWithAttachments, yna cliciwch ar Run botwm.

Yna mae'n agor y ffenestr neges Ateb gan atodi'r holl atodiadau gwreiddiol.

Cam 6: Cyfansoddwch y neges ateb, a chliciwch anfon botwm.


Ymateb gydag atodiadau yn awtomatig gyda Kutools ar gyfer Outlook

Mae'r Ymateb gydag Attach cyfleustodau Kutools ar gyfer Rhagolwg gall eich helpu i ateb e-byst gydag atodiadau gwreiddiol gyda dim ond un clic.

Kutools ar gyfer Rhagolwg : gyda mwy na 100+ o ychwanegion Outlook defnyddiol, am ddim i geisio heb unrhyw gyfyngiad mewn 60 diwrnod.

1. Dewiswch yr e-bost yn cynnwys yr atodiadau y mae angen i chi ymateb gyda nhw.

2. Yna cliciwch Kutools > Ymateb gydag Atodiad > Ymateb gydag Atodiad. Gweler y screenshot:

Yna rhestrir pob atodiad o e-bost dethol yn y Ynghlwm maes y neges ateb. Cyfansoddwch eich e-bost a'i anfon.

Os ydych chi am gael treial am ddim o'r cyfleustodau hwn, ewch i dadlwythwch y meddalwedd am ddim yn gyntaf, ac yna ewch i gymhwyso'r llawdriniaeth yn ôl y camau uchod.


Un clic i ateb gydag atodiadau gyda Kutools ar gyfer Outlook

  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.


Erthyglau cysylltiedig:


Kutools for Outlook - Yn Dod â 100 o Nodweddion Uwch i'w Rhagweld, a Gwneud Gwaith yn Haws Osgach!

  • Auto CC / BCC yn ôl rheolau wrth anfon e-bost; Auto Ymlaen E-byst Lluosog yn ôl arfer; Ymateb Auto heb weinydd cyfnewid, a nodweddion mwy awtomatig ...
  • Rhybudd BCC - dangoswch neges pan geisiwch ateb popeth os yw'ch cyfeiriad post yn rhestr BCC; Atgoffwch Wrth Ymlyniadau ar Goll, a mwy o nodweddion atgoffa ...
  • Ymateb (Pawb) Gyda'r Holl Atodiadau yn y sgwrs bost; Ateb Llawer o E-byst mewn eiliadau; Auto Ychwanegu Cyfarchiad wrth ateb; Ychwanegu Dyddiad i'r pwnc ...
  • Offer Ymlyniad: Rheoli Pob Atodiad ym mhob Post, Datgysylltiad Auto, Cywasgu Pawb, Ail-enwi Pawb, Arbed Pawb ... Adroddiad Cyflym, Cyfrif Postiau Dethol...
  • E-byst Sothach Pwerus yn ôl arfer; Tynnwch y Post a Chysylltiadau Dyblyg... Yn eich galluogi i wneud yn ddoethach, yn gyflymach ac yn well yn Outlook.
tab kutools rhagweld kutools tab 1180x121
kutools rhagweld rhagolygon kutools ynghyd â thab 1180x121
 
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Steve · 1 months ago
    Hi, 
    I am using your code for reply which is great, thank you form making it available.
    I have my mail options set to preface comments with my initials which works when I use the standard reply. When I create a reply using this code my intials are not inserted 
    Can you assist please?
    Thanks
    Steve

  • To post as a guest, your comment is unpublished.
    shahroozbral@gmail.com · 2 years ago
    Hi
    I am going to use the code to reply all with attachments in search results from All Mailboxes but it shows me an error and does not work.
    please let me know how to change the code to be usable for All Mailboxes.

    Best regards
    Shahrooz
    • To post as a guest, your comment is unpublished.
      crystal · 2 years ago
      Hi,
      The error does not cause by the search.
      To avoid the error, please click Tools > References to open the References dialog, and then enable the Microsoft Scripting Runtime option. See the attached image for the steps.
  • To post as a guest, your comment is unpublished.
    Alexey · 2 years ago
    Hi!

    Thanks a lot for such a great tool!

    Can the command be ran so that the reply window won't pop-up but stay in reading pane view?
    • To post as a guest, your comment is unpublished.
      crystal · 2 years ago
      Hi Alexey,
      We have released a new version with the tool updated. Thank you for your support.
      • To post as a guest, your comment is unpublished.
        Alexey · 2 years ago
        Hi Crystal!

        thanks for update!
        had the macro code changed or it would work only with tool installed?
        • To post as a guest, your comment is unpublished.
          crystal · 1 years ago
          Hi Alexey,
          The code is used alone without the tool installed.
  • To post as a guest, your comment is unpublished.
    Honza · 3 years ago
    Very nice, thanks, but I have compiler error: User-defined type not defined. There is highlighted Dim xFSO As Scripting.FileSystemObject in part Sub CopyAttachments
    • To post as a guest, your comment is unpublished.
      crystal · 3 years ago
      Hi Honza,
      The code works well in my case. Which Office version do you use?
      • To post as a guest, your comment is unpublished.
        Hien · 3 years ago
        me too. I have the problem with the same people above. I use Office 2016.
        • To post as a guest, your comment is unpublished.
          Rob · 3 years ago
          I am using office 365 with the same error
          • To post as a guest, your comment is unpublished.
            crystal · 3 years ago
            Hi Bob,
            Please try:
            1. Press the Alt + F11 keys to open the Microsoft Visual Basic for Applications window again;
            2. Click Tools > References, and check the Microsoft Scripting Runtime box.
            Now the code can work.
            • To post as a guest, your comment is unpublished.
              httan · 1 years ago
              That solve it for me!

              Thanks.
  • To post as a guest, your comment is unpublished.
    nhandcm@gmail.com · 3 years ago
    I used VBA code but it attaches with all image (.gif, jpg,...) in email content. Pls show me how to solve this problem?
    • To post as a guest, your comment is unpublished.
      crystal · 3 years ago
      Good Day,
      The code is updated in the post. The problen now is solved. Please have a try and thanks for your comment.
  • To post as a guest, your comment is unpublished.
    NMGMarques · 3 years ago
    In the last part of the script, many of the variables are not defined.
  • To post as a guest, your comment is unpublished.
    Jim · 3 years ago
    I have downloaded the Kutools tab. Can I add the 'Reply with Attachment' to my home tab or to Quick Steps??
    • To post as a guest, your comment is unpublished.
      crystal · 3 years ago
      Dear Jim,
      You can right click the Reply with Attachment button, and select the "Add to Quick Access Toolbar" to add this function to the Quick Access Toolbar on the Ribbon. See screenshot:
  • To post as a guest, your comment is unpublished.
    Susan Landes · 4 years ago
    I am trying to use the Reply with Attachments but it isn't adding the attachment, just keeping the link. I use the automatic detach when email is received. Is there a configuration setting that I need to update?

    Thank you for your help!
    • To post as a guest, your comment is unpublished.
      crystal · 4 years ago
      Dear Susan,

      The attachments won't locate in the email any more as they are detached automatically from the email. Please turn off the auto detach feature for the sake of using this Reply with Attachment feature.

      Best Regards, Crystal.
      • To post as a guest, your comment is unpublished.
        Dakota · 4 years ago
        how do you turn off the auto detach feature
        • To post as a guest, your comment is unpublished.
          crystal · 4 years ago
          Dear Dakota,

          If you are using the Auto detach all receiving attachments feature of Kutools for Outlook, please do as below screenshot shown to turn off this feature by unchecking it in your Outlook. Thank you!
  • To post as a guest, your comment is unpublished.
    Rituraj Sharma · 6 years ago
    Hi Team,

    He there a way to run this macro using some shortcut keys in outlook.
    • To post as a guest, your comment is unpublished.
      mr · 6 years ago
      Yes. Under the main options you can add a developer tab where you can find the macros. And, even better, if you right click the strip at the top with all the buttons, they call this a "ribbon", you can add a custom new group and display your macros as buttons right there in the home tab.