HI All,

 Can this do able? or is there any way to sync data between two accounts?

AS

Hi

As per the information and details provided by you, to move the email items to another Outlook account using Outlook Macros, please follow these steps: -

Step 1: - Create your target folders

To create folders, right click where you want to the folders to be created and select New Folder from the pop-up menu.

Step 2: - Create your Outlook Macros

In Outlook (2007), click on the Tools | Macro menu item and select Visual Basic Editor. Copy/Paste the following VB Macro into the script editor. Make sure to change the name of the folders to match your email setting.

'Outlook VB Macro to move selected mail item(s) to a target folder

Sub MoveToFiled()

On Error Resume Next

Dim ns As Outlook.NameSpace

Dim moveToFolder As Outlook.MAPIFolder

Dim objItem As Outlook.MailItem

Set ns = Application.GetNamespace("MAPI")

'Define path to the target folder

Set moveToFolder = ns.Folders("Mailbox - Jim Merrell").Folders("@Filed")

If Application.ActiveExplorer.Selection.Count = 0 Then

   MsgBox ("No item selected")

 Exit Sub

End If

If moveToFolder Is Nothing Then

   MsgBox "Target folder not found!", vbOKOnly + vbExclamation, "Move Macro Error"

End If

For Each objItem In Application.ActiveExplorer.Selection

   If moveToFolder.DefaultItemType = olMailItem Then

      If objItem.Class = olMail Then

         objItem.move moveToFolder

      End If

  End If

Next

Set objItem = Nothing

Set moveToFolder = Nothing

Set ns = Nothing

End Sub

Step 3: - Test Macros

To test the macros, click Run on the menu, the green play button or press F5 in the VB Editor window. If no errors are displayed, verify that the selected email(s) has moved to the desired target folder.

I hope this information will be helpful for you.

Thanks and regards

Shweta@G 

Hi,

In this forum we don't provide support about macros, if you need a macro method, I suggest you post the question in the Outlook for Developers forum:

https://social.msdn.microsoft.com/Forums/office/en-US/home?forum=outlookdev

Besides a macro method, we can also use a rule to accomplish this request. I'll take Outlook 2013 for example:

Under HOME tab, click Rules button -> Manage Rules & Alerts -> Select the account you want the rule to apply to -> New Rule -> Apply rule on messages I receive -> Next -> Select the conditions you need, if you want this rule to apply to all incoming emails, don't select anything here -> Next -> Select "move a copy to the specified folder", click "specified" under "Step 2", select the folder of the account you want the emails moved to -> OK -> Next -> Make sure "Turn on this rule" -> Finish.

Please note this rule will only run when you check your emails in Outlook. If Outlook isn't running, this rule won't work for emails you check online or from another device.

I hope the information is helpful to you.

Melon Chen

Forum Support