Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Retorna ou define um valor Boolean que indica se um usuário pode modificar as configurações do modo de exibição atual. Leitura/gravação.
Sintaxe
expression. LockUserChanges
expressão Uma variável que representa um objeto IconView .
Comentários
Se True, o usuário pode modificar as configurações do modo de exibição atual. No entanto, as alterações feitas na interface não serão salvas. Se Falso (o padrão), as alterações serão salvas.
Exemplo
O seguinte exemplo Visual Basic for Applications (VBA) bloqueia a interface do usuário para todas as exibições que estão disponíveis para todos os usuários. A subrreplicação LockView aceita o objeto Ver e um valor Booleano que indica se a interface de utilizador Ver será bloqueada. Neste exemplo, o procedimento sempre é chamado com o valor booliano definido como 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
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.