2017-05-27 12 views

答えて

2

は可能ですが、あなたはこのコードを実行後

  • (さんが "RPO" それを呼びましょう)ビューの作成
    1. Outlookを開き
    2. 最初に何かをする必要があり

    ビューを作成するスクリーンショット

    Public Sub CreateAndApplyView() 
        Dim ol As New Outlook.Application 
        Dim CurrentFolder As Outlook.MAPIFolder 
        Dim NewFolder As Outlook.Folder 
    
        Set CurrentFolder = ol.ActiveExplorer.CurrentFolder 
        Set NewFolder = CurrentFolder.Folders.Add("Audits-Actuals") 
    
        '~~> What you need is from here. You need to activate the folder 
        '~~> before you activate the view 
        Set CurrentFolder = NewFolder 
        ol.ActiveExplorer.SelectFolder CurrentFolder 
        ol.ActiveExplorer.CurrentView = "RPO" 
    End Sub 
    

    enter image description hereそして、これは私がコードを実行した後に得るものです。確かに仕事をして

    Screenshot

  • +0

    敗走は、ありがとうございました!しかし、そのアイデアは、コードを初めて実行するときに、どのユーザーに対しても自動的に起こるようにすることです。将来のフォルダが追加されると、これは間違いなく便利になるでしょう。彼らがそれを準備するための措置を講じるのであれば、私の目標は魔法のように起こるのです。他のアイデアがある場合はお知らせくださいが、これは素晴らしい回答です! –

    関連する問題