Поделиться через


Свойство TableView.LockUserChanges (Outlook)

Возвращает или задает логическое значение, указывающее, может ли пользователь изменять параметры представления. Для чтения и записи.

Синтаксис

выражение. LockUserChanges

Выражение Переменная, представляющая объект TableView .

Замечания

Если задано значение True, пользователь может изменить параметры указанного представления. Однако изменения, внесенные в интерфейс, не будут сохранены. Если значение false (значение по умолчанию), все изменения будут сохранены.

Пример

В следующем примере Visual Basic для приложений (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

См. также

Объект TableView

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.