OutlookUservoice_icon_outlook Outlook Feedback by UserVoice

Anonymous

My feedback

  1. 828 votes

    We're glad you're here

    Please sign in to leave feedback

    Signed in as (Sign out)

    We’ll send you updates on this idea

    Anonymous supported this idea  · 
    An error occurred while saving the comment
    Anonymous commented  · 

    While I don't like that this function is not in the Outlook desktop app (PLEASE add it in a future update), I can confirm that this feature is available in the web (OWA) version of Outlook's calendar. I clicked on the day then on the event in the side panel, selected Edit and choose "This and all following events". This just saved my bacon!

    Chz, Brett

  2. 99 votes

    We're glad you're here

    Please sign in to leave feedback

    Signed in as (Sign out)

    We’ll send you updates on this idea

    An error occurred while saving the comment
    Anonymous commented  · 

    Yes, any previous user of Lotus Notes (as I also was) is likely to miss the Send and File option. For years now I have managed to get something similar working in Outlook by following the below instructions:

    How to install it:

    1) Press (alt F11) to make the VB window appear OR
    2) Choose File  Options  Customize Ribbon  Tick Developer (at right)  Close window
    3) Select the Developer tab in the ribbon the Visual
    4) Expand “Project1 (VbaProject.OTM)”  “Microsoft Outlook Objects”  “ThisOutlookSession” as shown in this screenshot:
    5) Copy the below code and paste it into the window to the right (should be empty)
    6) It will become immediately activated. No restart is required.

    THE CODE:

    Private Sub Application_ItemSend(ByVal Item As Object, _
    Cancel As Boolean)
    Dim objNS As NameSpace
    Dim objFolder As MAPIFolder
    Set objNS = Application.GetNamespace("MAPI")
    Set objFolder = objNS.PickFolder
    If TypeName(objFolder) <> "Nothing" Then
    Set Item.SaveSentMessageFolder = objFolder
    End If
    Set objFolder = Nothing
    Set objNS = Nothing
    End Sub

    Public Function IsInDefaultStore(objOL As Object) As Boolean
    Dim objApp As Outlook.Application
    Dim objNS As Outlook.NameSpace
    Dim objInbox As Outlook.MAPIFolder
    On Error Resume Next
    Set objApp = CreateObject("Outlook.Application")
    Set objNS = objApp.GetNamespace("MAPI")
    Set objInbox = objNS.GetDefaultFolder(olFolderInbox)
    Select Case objOL.Class
    Case olFolder
    If objOL.StoreID = objInbox.StoreID Then
    IsInDefaultStore = True
    End If
    Case olAppointment, olContact, olDistributionList, _
    olJournal, olMail, olNote, olPost, olTask
    If objOL.Parent.StoreID = objInbox.StoreID Then
    IsInDefaultStore = True
    End If
    Case Else
    MsgBox "This function isn't designed to work " & _
    "with " & TypeName(objOL) & _
    " items and will return False.", _
    , "IsInDefaultStore"
    End Select
    Set objApp = Nothing
    Set objNS = Nothing
    Set objInbox = Nothing
    End Function

    It works for all emails but produces a harmless error when responding to calendar requests (which end up in the Sent folder)

    Anonymous supported this idea  · 

Feedback and Knowledge Base