Propriedade Folder.IsSharePointFolder (Outlook)

Retorna um Boolean que determina se a pasta é uma pasta do Microsoft SharePoint Foundation. Somente leitura.

Sintaxe

expression. IsSharePointFolder

Expressão Uma variável que representa um objeto Folder .

Comentários

Uma pasta do SharePoint Foundation é uma pasta personalizada do Outlook que contém uma cópia ativa da lista de contatos ou da lista de eventos hospedada em um site do SharePoint Foundation. A lista de contatos mapeia para uma pasta Contatos do Outlook e a lista de eventos mapeia para uma pasta do Calendário.

As pastas do SharePoint Foundation são criadas automaticamente no nó Pastas do SharePoint no painel de navegação quando uma lista de contatos ou uma lista de eventos é exportada do site do SharePoint Foundation.

Embora as pastas do SharePoint Foundation funcionem da mesma maneira que as outras pastas, há algumas exceções. As pastas do SharePoint Foundation são somente leitura e qualquer tentativa de editar suas propriedades, bem como de adicionar, editar ou remover seus itens, falhará.

Uma pasta no servidor Microsoft Exchange do usuário nunca será uma pasta do SharePoint Foundation, assim como uma pasta do arquivo padrão de pastas particulares (.pst) jamais será. Normalmente, as pastas do SharePoint Foundation estarão no nó Pastas do SharePoint no painel de navegação.

Exemplo

O exemplo a seguir do Microsoft Visual Basic for Applications (VBA) altera a linha Assunto do item de compromisso exibido no inspetor ativo e salva o item. Se o item estiver em uma pasta do SharePoint Foundation, ele exibirá uma mensagem para o usuário informando que o item não pode ser modificado. Para executar este exemplo, verifique se um item de compromisso é exibido na janela do inspetor ativo. Este exemplo modificará o assunto do item de compromisso.

Sub ChangeItem() 
 
'Checks if the item is contained in a SharePoint folder. If it is not, it changes the Subject line, and then saves the item. 
 
 Dim myItem As Outlook.AppointmentItem 
 
 Dim fldFolder As Outlook.Folder 
 
 
 
 Set myItem = Application.ActiveInspector.CurrentItem 
 
 Set fldFolder = myItem.Parent 
 
 If fldFolder.IsSharePointFolder = True Then 
 
 MsgBox _ 
 
 "The item is contained in a SharePoint Foundation folder and cannot be modified." 
 
 Else 
 
 myItem.Subject = myItem.Subject + " Changed by VBA" 
 
 myItem.Save 
 
 MsgBox "The item has been changed." 
 
 End If 
 
End Sub

Confira também

Objeto Folder

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.