Nota
O acesso a esta página requer autorização. Podes tentar iniciar sessão ou mudar de diretório.
O acesso a esta página requer autorização. Podes tentar mudar de diretório.
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 do 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 seguinte adiciona o URL especificado em Opções de Colaboração (menu Colaborar) à lista de sites fidedignos na Internet Explorer. Após a confirmação, o Project muda para uma vista folha de recursos e apresenta a caixa de diálogo *Criar Equipa para <Nome> do Projeto* quando ligado 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.