How do I make the below loop until all emails are moved?
On Error Resume Next
Dim ns As Outlook.NameSpace
Dim moveToFolder As Outlook.MAPIFolder
Dim objItem As Outlook.MailItem
Set ns = Application.GetNamespace("MAPI")
Set moveToFolder = ns.Folders("Archive -...
I am new to VBA coding in Outlook and am struggling to follow some of the logic. I'm needing to move around 35,000 emails from an Archive folder "Deleted Items" one at a time to a Archive folder "Deleted." Our system prevents moving a batch of emails, based on size, and I don't want to break...