Propriedade Application.HelpPaths (Visio)
Obtém ou define o caminho no qual o Microsoft Visio procura por arquivos de Ajuda. Leitura/gravação.
Sintaxe
expressão. HelpPaths
expressão Uma variável que representa um Aplicativo objeto.
Valor de retorno
Cadeia de caracteres
Comentários
Por padrão, a propriedade HelpPaths é definida em uma sequência de caracteres vazia ("").
A cadeia de caracteres passada para e recebida da propriedade HelpPaths é a mesma cadeia de caracteres mostrada na caixa de diálogo Caminhos do Arquivo (Guia >de arquivoOpções Locais>avançados> dearquivogeral>). Essa cadeia de caracteres está armazenada na subchave HKEY_CURRENT_USER\Software\Microsoft\Office\14.0\Visio\Application\HelpPath.
Quando o aplicativo procura por arquivos de Ajuda, ele procura em todos os caminhos nomeados na propriedade HelpPaths e todas as subpastas desses caminhos. Se você passar a propriedade HelpPaths para o método EnumDirectories, ela retorna uma lista completa de caminhos totalmente qualificados nas pastas passadas.
Definir a propriedade HelpPaths substitui os valores existentes para HelpPaths na caixa de diálogo Caminhos do Arquivo . Para manter os valores existentes, obtenha a cadeia de caracteres existente e, em seguida, anexe o novo caminho de arquivo a essa cadeia de caracteres, conforme mostrado no código a seguir.
Application.HelpPaths = Application.HelpPaths & ";" & "newpath".
Aviso
Modificar o registro do Windows de qualquer maneira, seja por meio do Editor do Registro ou programaticamente, sempre carrega algum grau de risco. Uma modificação incorreta pode causar problemas sérios que talvez exijam a reinstalação do sistema operacional. É recomendável que você sempre faça um backup do registro do computador antes de modificá-lo.
Exemplo
Esta macro do Microsoft Visual Basic for Applications (VBA) mostra como obter e definir a propriedade HelpPaths do objeto Application. Antes de executar essa macro, substitua fullpath(s)
pelo caminho ou caminhos para o local ou locais em que você deseja que o Visio procure arquivos de ajuda.
Public Sub GetHelpPaths_Example()
Dim strCurrentPath As String
'Retrieve the current path to Visio Help files.
strCurrentPath = Application.HelpPaths
MsgBox ("The current path for Microsoft Visio Help files is" + strCurrentPath)
End Sub
Public Sub SetHelpPaths_Example()
Dim strNewPath As String
'Store the new path.
strNewPath = "fullpath(s)"
'Set the new path in the Application object.
Application.HelpPaths = strNewPath
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.