1: 2: 3: 4: 5: 6: 7:
Sub StripReminder (el artículo como Outlook.MailItem) Si Item.FlagStatus = entonces olFlagMarked Item.FlagStatus = olNoFlag Item.FlagRequest = "" Terminar si Item.Save Terminar el submarino