• Follow-up Flag: none? (Outlook 2003 SP1)

    Home » Forums » AskWoody support » Productivity software by function » MS Outlook and email programs » Follow-up Flag: none? (Outlook 2003 SP1)

    Author
    Topic
    #417274

    I was experimenting with views in my contacts folder today. I set it to view By Follow-up Flag, then to Sort By Follow-up Flag, so I could collapse the list without flags and print the view. I got the results shown below — two categories showing no follow-up flag.

    As I reviewed the contacts in the short list, I realized they all had been flagged for follow-up in the past, but no amount of flag clearing would move them from the short list of no-flag to the long list of no-flag. Some of these contacts had their flags added and removed in a prior version of Outlook.

    I’m really not sure this is worth pursuing, but it does make me wonder if this kind of thing might affect other sorted views. And it’s just not tidy. smile

    Anyone have any thoughts on: a) how to scrub a follow-up flag or whether this might be a bigger issue?

    Thanks,
    Kim

    Viewing 1 reply thread
    Author
    Replies
    • #935773

      Hi

      I have a litte more to add and another screen shot.

      If I view by Flag Status I only get two groups — Followup Flag and Unflagged (see below). This is clearly the best way to group to print.

      But my original questions still stand.

      Thanks all,
      Kim

    • #935776

      You can scrub them manually of course, but since I also dislike them, and I dislike outdated Voting Buttons even more, I have code a bit like this. I expanded it to cover both a single opened item or a selection of items in a folder, and tested it very briefly. Let me know if it errors out. And if you want to leaving Voting Options intact, delete the two corresponding lines in the code.

      Sub KillVotingRequestAndClearFlag()
      Dim itmSel As Object
      Dim lngC As Long

      If TypeName(Application.ActiveWindow) = “Explorer” Then
      Set itmSel = ActiveExplorer.Selection
      Else
      Set itmSel = ActiveInspector.CurrentItem
      End If

      If TypeName(itmSel) = “Selection” Then
      For lngC = 1 To itmSel.Count
      With itmSel(lngC)
      .VotingOptions = “”
      .FlagStatus = olNoFlag
      .Save
      End With
      Next lngC
      Else
      With itmSel
      .VotingOptions = “”
      .FlagStatus = olNoFlag
      .Save
      End With
      End If
      Set itmSel = Nothing
      End Sub

      • #936043

        John,

        Thank you for responding — I didn’t get back to this until this morning. I do get an error message at the

        With itmSel(lngC)
        .FlagStatus = olNoFlag
        End With

        It’s Run-time error 438 Object doesn’t support this property or method. Help for FlagStatus says this is a property of the MailItem Object or MeetingItem Object.

        I couldn’t find any flag or reminder property for a ContactItem. This might explain the behavior in the first place.

        Kim

        • #936053

          Looks like Outlooks Object Model exposure has tripped me up. As you noted, FlagStatus is a MessageItem property, and since users can Flag a Contact, I assumed that the same property would exist for Contacts. I was wrong. sorry I don’t have any further advice for you.

    Viewing 1 reply thread
    Reply To: Follow-up Flag: none? (Outlook 2003 SP1)

    You can use BBCodes to format your content.
    Your account can't use all available BBCodes, they will be stripped before saving.

    Your information: