Recent content by nachosan

  1. N

    Move red and unflagged emails to subfolder

    Hi, i am trying to move all read emails that are unflagged to a subfolder. Currently using this code: ----------- Sub move2folder() On Error Resume Next Set objOutlook = CreateObject("Outlook.Application") Set objNamespace = objOutlook.GetNamespace("MAPI") Set objFolderSrc =...
Back
Top