次の方法で共有


TimelineView.SaveOption プロパティ (Outlook)

示します指定されたビューを使用できるフォルダーを指定して 、ビューに関連付けられている読み取りアクセス許可を返します。 値の取得のみ可能です。

構文

SaveOption

TimelineView オブジェクトを表す変数。

注釈

SaveOption プロパティの値は、 Views コレクションの Add メソッドを使用して、 TimelineView オブジェクトの作成時に設定されています。

次の Visual Basic for Applications (VBA) の例では、すべてのユーザーに利用可能なすべてのビューのユーザー インターフェイスをロックします。 サブルーチンLockView、View オブジェクトと、View ユーザー インターフェイスがロックされるかどうかを示すブール値を受け取ります。 この例では、 True に設定する ブール 値を持つプロシージャが必ず呼び出されます。

Sub LockPublicViews() 
 
 
 
 Dim objName As NameSpace 
 
 Dim objViews As Views 
 
 Dim objView As View 
 
 
 
 ' Get the Views collection for the Contacts default folder. 
 
 Set objName = Application.GetNamespace("MAPI") 
 
 Set objViews = objName.GetDefaultFolder(olFolderContacts).Views 
 
 
 
 ' Enumerate the Views collection and lock the user 
 
 ' interface for any view that can be accessed by 
 
 ' all users who have access to the Notes default folder. 
 
 For Each objView In objViews 
 
 If objView.SaveOption = _ 
 
 olViewSaveOptionThisFolderEveryone Then 
 
 
 
 Call LockView(objView, True) 
 
 End If 
 
 Next objView 
 
 
 
End Sub 
 
 
 
Sub LockView(ByRef objView As View, ByVal blnAns As Boolean) 
 
 
 
 ' Examine the view object. 
 
 With objView 
 
 If blnAns = True Then 
 
 ' Lock the user interface and 
 
 ' save the view 
 
 .LockUserChanges = True 
 
 .Save 
 
 Else 
 
 ' Unlock the user interface of the view. 
 
 .LockUserChanges = False 
 
 End If 
 
 End With 
 
 
 
End Sub

関連項目

TimelineView オブジェクト

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。