Método Project.MakeServerURLTrusted (Project)
Adiciona a URL especificada na propriedade ServerURL à zona sites confiáveis na guia segurança da caixa de diálogo Opções da Internet no Internet Explorer.
Sintaxe
expression. MakeServerURLTrusted
Expressão Uma variável que representa um objeto Project .
Comentários
Se nenhum URL do Project Server for especificado para o projeto, o Project Professional exibe a mensagem de erro: "URL do Project Server não foi especificado. Para especificar uma URL, no menu Ferramentas, clique em Opções e, em seguida, clique na guia colaboração."
Exemplo
O exemplo a seguir adiciona a URL especificada em Opções de Colaboração (menu Colaborar ) à lista de sites confiáveis no Internet Explorer. Após a confirmação, o Project alterna para uma exibição da Folha de Recursos e exibe a caixa de diálogo *Build Team for <Project Name>* quando conectado ao Project Server .
Sub MakeURLTrusted()
If Projects.Count = 0 Then
MsgBox "You must have at least one active project open."
Exit Sub
End If
If ActiveProject.ServerURL = "" Then
MsgBox "A Project Server URL has not been " _
& "specified." & Chr(13) & "Click OK, and then " _
& "specify a valid URL in the Project Server Accounts dialog box."
Else
ActiveProject.MakeServerURLTrusted
ViewApply Name:="Resource Sheet"
Application.AddResourcesFromProjectServer
End If
End Sub
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.