--- description: Some users always move all the recipients except the original sender to “CC” field when using “Reply All” in Outlook. This article will introduce a method to automate the movement with Outlook VBA. title: How to Auto Move All Recipients except Original Sender to “CC” Field When Using “Reply All” in Outlook image: https://www.datanumen.com/blogs/wp-content/uploads/2017/05/auto-move-all-recipients-except-original-sender-to-cc-field-when-using-reply-all-in-outlook.jpg --- - - - [Home](https://www.datanumen.com/blogs/) > [Solutions](https://www.datanumen.com/blogs/category/solutions/) > [Office Solutions](https://www.datanumen.com/blogs/category/solutions/office-solutions/) > [Outlook Solutions](https://www.datanumen.com/blogs/category/solutions/office-solutions/outlook-solutions/) > How to Auto Move All Recipients except Original Sender to “CC” Field When Using “Reply All” in Outlook # How to Auto Move All Recipients except Original Sender to “CC” Field When Using “Reply All” in Outlook [Outlook Solutions](https://www.datanumen.com/blogs/category/solutions/office-solutions/outlook-solutions/) September 29, 2025 Share Now: - - - - - - - - *Some users always move all the recipients except the original sender to “CC” field when using “Reply All” in Outlook. This article will introduce a method to automate the movement with Outlook VBA.* ![Auto Move All Recipients except Original Sender to “CC” Field When Using “Reply All” in Outlook](https://www.datanumen.com/blogs/wp-content/uploads/2017/05/auto-move-all-recipients-except-original-sender-to-cc-field-when-using-reply-all-in-outlook-276x300.jpg "Auto Move All Recipients except Original Sender to “CC” Field When Using “Reply All” in Outlook")By default, when you select “Reply All” to reply an email, all the recipients who was originally in “To” field will be still placed in the “To” field in the replying mail. However, many users would like to move all the recipients to the “CC” field with only the original sender in “To” field. In response to this requirement, here we’ll expose a piece of VBA code, which can realize it automatically. ## Auto Move All Recipients except Original Sender to “CC” Field in “Reply All” 1. In the first place, launch your Outlook program. 2. Then in the main Outlook window, press “Alt + F11” key buttons. 3. Next you will enter the Outlook VBA editor. 4. Subsequently, you ought to find and open the “ThisOutlookSession” project. 5. Later you need to copy and paste the following VBA codes into this project window. ``` Public WithEvents objExplorer As Outlook.Explorer Public WithEvents objInspectors As Outlook.Inspectors Public WithEvents objMail As Outlook.MailItem Private Sub Application_Startup() Set objExplorer = Outlook.Application.ActiveExplorer Set objInspectors = Outlook.Application.Inspectors End Sub Private Sub objExplorer_Activate() On Error Resume Next If objExplorer.Selection.Item(1).Class = olMail Then Set objMail = objExplorer.Selection.Item(1) End If End Sub Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector) If Inspector.CurrentItem.Class = olMail Then Set objMail = Inspector.CurrentItem End If End Sub Private Sub objMail_ReplyAll(ByVal Response As Object, Cancel As Boolean) Dim objReplyAll As Outlook.MailItem Dim objRecipient As Outlook.recipient Dim objCCRecipient As Outlook.recipient Dim strSender As String Set objReplyAll = objMail.ReplyAll strSender = objMail.SenderEmailAddress For Each objRecipient In objMail.Recipients 'Exclude yourself If objRecipient.Address <> "youremail@datanumen.com" Then 'Add the recipients as CC recipients Set objCCRecipient = objReply.Recipients.Add(objRecipient.Address) objCCRecipient.Type = olCC End If Next 'Keep original sender in To field objReplyAll.To = strSender objReplyAll.Display Cancel = True End Sub ``` ![VBA Code - Auto Move All Recipients except Original Sender to “CC” Field When Using “Reply All”]( "VBA Code - Auto Move All Recipients except Original Sender to “CC” Field When Using “Reply All”") 6. After that, you should sign this macro and then change your Outlook macro settings to permit digitally signed macros. 7. Eventually you can restart your Outlook to activate the new VBA project. 8. From now on, every time you reply emails using “Reply All”, you will see that all the recipients have been moved to “CC” field with only the original sender in “To” field. ## Don’t Panic in Case of PST Corruption If your PST file contains a lot of your valuable data, such as client information and so on, once your PST file gets corrupt, you must become worried. However, if you have backed up your file recently, you will never panic. The backups will enable you to get back your [damaged Outlook](https://www.datanumen.com/outlook-repair/) data with effortless ease. But if there is no such backup, you still can use a potent recovery tool, such as DataNumen Outlook Repair. ## Author Introduction: Shirley Zhang is a data recovery expert in DataNumen, Inc., which is the world leader in data recovery technologies, including [repair sql](https://www.datanumen.com/sql-recovery/) and outlook repair software products. For more information visit [www.datanumen.com](https://www.datanumen.com/) Share Now: - - - - - - - - [← Previous post](https://www.datanumen.com/blogs/5-quick-methods-batch-delete-multiple-rows-columns-word-table/) [Next post →](https://www.datanumen.com/blogs/auto-merge-appointments-meetings-calendars-outlook-vba/) Comments are closed. ![Data Recovery Blog]() Follow or like us on Facebook, LinkedIn and Twitter to get all promotions, latest news and updates on our products and company. - - - ### Featured Products - [DataNumen Outlook Repair](https://www.datanumen.com/outlook-repair/) - [DataNumen SQL Recovery](https://www.datanumen.com/sql-recovery/) - [DataNumen Exchange Recovery](https://www.datanumen.com/exchange-recovery/) - [DataNumen Access Repair](https://www.datanumen.com/access-repair/) - [DataNumen Excel Repair](https://www.datanumen.com/excel-repair/) - [DataNumen PDF Repair](https://www.datanumen.com/pdf-repair/) - [DataNumen Word Repair](https://www.datanumen.com/word-repair/) - [DataNumen Zip Repair](https://www.datanumen.com/zip-repair/) ### Popular posts ```json {"@context":"https:\/\/schema.org","@graph":[{"@type":"Article","@id":"https:\/\/www.datanumen.com\/blogs\/auto-move-recipients-except-original-sender-cc-field-using-reply-outlook\/#article","isPartOf":{"@id":"https:\/\/www.datanumen.com\/blogs\/auto-move-recipients-except-original-sender-cc-field-using-reply-outlook\/"},"author":{"name":"AuthorCCW","@id":"https:\/\/www.datanumen.com\/blogs\/#\/schema\/person\/33ded6c47c77587f9158d99f05e23957"},"headline":"How to Auto Move All Recipients except Original Sender to “CC” Field When Using “Reply All” in Outlook","datePublished":"2017-05-31T01:01:03+00:00","dateModified":"2025-09-29T10:50:18+00:00","mainEntityOfPage":{"@id":"https:\/\/www.datanumen.com\/blogs\/auto-move-recipients-except-original-sender-cc-field-using-reply-outlook\/"},"wordCount":372,"commentCount":4,"publisher":{"@id":"https:\/\/www.datanumen.com\/blogs\/#organization"},"image":{"@id":"https:\/\/www.datanumen.com\/blogs\/auto-move-recipients-except-original-sender-cc-field-using-reply-outlook\/#primaryimage"},"thumbnailUrl":"https:\/\/www.datanumen.com\/blogs\/wp-content\/uploads\/2017\/05\/auto-move-all-recipients-except-original-sender-to-cc-field-when-using-reply-all-in-outlook.jpg","articleSection":["Outlook Solutions"],"inLanguage":"en-US","potentialAction":[{"@type":"CommentAction","name":"Comment","target":["https:\/\/www.datanumen.com\/blogs\/auto-move-recipients-except-original-sender-cc-field-using-reply-outlook\/#respond"]}]},{"@type":"WebPage","@id":"https:\/\/www.datanumen.com\/blogs\/auto-move-recipients-except-original-sender-cc-field-using-reply-outlook\/","url":"https:\/\/www.datanumen.com\/blogs\/auto-move-recipients-except-original-sender-cc-field-using-reply-outlook\/","name":"How to Auto Move All Recipients except Original Sender to “CC” Field When Using “Reply All” in Outlook","isPartOf":{"@id":"https:\/\/www.datanumen.com\/blogs\/#website"},"primaryImageOfPage":{"@id":"https:\/\/www.datanumen.com\/blogs\/auto-move-recipients-except-original-sender-cc-field-using-reply-outlook\/#primaryimage"},"image":{"@id":"https:\/\/www.datanumen.com\/blogs\/auto-move-recipients-except-original-sender-cc-field-using-reply-outlook\/#primaryimage"},"thumbnailUrl":"https:\/\/www.datanumen.com\/blogs\/wp-content\/uploads\/2017\/05\/auto-move-all-recipients-except-original-sender-to-cc-field-when-using-reply-all-in-outlook.jpg","datePublished":"2017-05-31T01:01:03+00:00","dateModified":"2025-09-29T10:50:18+00:00","description":"Some users always move all the recipients except the original sender to “CC” field when using “Reply All” in Outlook. This article will introduce a method to automate the movement with Outlook VBA.","inLanguage":"en-US","potentialAction":[{"@type":"ReadAction","target":["https:\/\/www.datanumen.com\/blogs\/auto-move-recipients-except-original-sender-cc-field-using-reply-outlook\/"]}]},{"@type":"ImageObject","inLanguage":"en-US","@id":"https:\/\/www.datanumen.com\/blogs\/auto-move-recipients-except-original-sender-cc-field-using-reply-outlook\/#primaryimage","url":"https:\/\/www.datanumen.com\/blogs\/wp-content\/uploads\/2017\/05\/auto-move-all-recipients-except-original-sender-to-cc-field-when-using-reply-all-in-outlook.jpg","contentUrl":"https:\/\/www.datanumen.com\/blogs\/wp-content\/uploads\/2017\/05\/auto-move-all-recipients-except-original-sender-to-cc-field-when-using-reply-all-in-outlook.jpg","width":681,"height":741,"caption":"Auto Move All Recipients except Original Sender to “CC” Field When Using “Reply All” in Outlook"},{"@type":"WebSite","@id":"https:\/\/www.datanumen.com\/blogs\/#website","url":"https:\/\/www.datanumen.com\/blogs\/","name":"Data Recovery Blog","description":"Discuss every aspect of data recovery","publisher":{"@id":"https:\/\/www.datanumen.com\/blogs\/#organization"},"potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/www.datanumen.com\/blogs\/?s={search_term_string}"},"query-input":{"@type":"PropertyValueSpecification","valueRequired":true,"valueName":"search_term_string"}}],"inLanguage":"en-US"},{"@type":"Organization","@id":"https:\/\/www.datanumen.com\/blogs\/#organization","name":"Data Recovery Blog","url":"https:\/\/www.datanumen.com\/blogs\/","logo":{"@type":"ImageObject","inLanguage":"en-US","@id":"https:\/\/www.datanumen.com\/blogs\/#\/schema\/logo\/image\/","url":"https:\/\/www.datanumen.com\/blogs\/wp-content\/uploads\/2019\/02\/logowithouttext.jpg","contentUrl":"https:\/\/www.datanumen.com\/blogs\/wp-content\/uploads\/2019\/02\/logowithouttext.jpg","width":296,"height":397,"caption":"Data Recovery Blog"},"image":{"@id":"https:\/\/www.datanumen.com\/blogs\/#\/schema\/logo\/image\/"},"sameAs":["https:\/\/www.facebook.com\/DataNumen","https:\/\/x.com\/DataNumen","http:\/\/www.linkedin.com\/company\/datanumen","https:\/\/myspace.com\/datanumen\/","http:\/\/www.pinterest.com\/datanumen\/","https:\/\/www.youtube.com\/channel\/UCVIIuuKfUBHSJauUaVP13tw"]},{"@type":"Person","@id":"https:\/\/www.datanumen.com\/blogs\/#\/schema\/person\/33ded6c47c77587f9158d99f05e23957","name":"AuthorCCW","image":{"@type":"ImageObject","inLanguage":"en-US","@id":"https:\/\/secure.gravatar.com\/avatar\/3516ed90fc242780d3947a989f895bc46e70c3e83485d30f2b457a007906aa58?s=96&d=mm&r=g","url":"https:\/\/secure.gravatar.com\/avatar\/3516ed90fc242780d3947a989f895bc46e70c3e83485d30f2b457a007906aa58?s=96&d=mm&r=g","contentUrl":"https:\/\/secure.gravatar.com\/avatar\/3516ed90fc242780d3947a989f895bc46e70c3e83485d30f2b457a007906aa58?s=96&d=mm&r=g","caption":"AuthorCCW"},"sameAs":["https:\/\/www.datanumen.com\/"]}]} ```