Método Application.HyperlinkPart (Access)

O método HyperlinkPart retorna informações sobre dados armazenados como um tipo de dados de hiperlink.

Sintaxe

expressão. HiperligaçãoPart (Hiperligação, Parte)

expressão Uma variável que representa um Aplicativo objeto.

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Hyperlink	Obrigatório	Variant	Os dados armazenados num campo Hiperligação .
Parte	Opcional	AcHyperlinkPart	Uma constante AcHyperlinkPart que representa as informações que pretende que sejam devolvidas pelo método HyperlinkPart .

Valor de retorno

Cadeia de caracteres

Comentários

Utilize o método HyperlinkPart para devolver um de três valores de um campo hiperligação ou do valor apresentado. The value returned depends on the setting of the part argument.

The part argument is optional. If it's not used, the function returns the value Microsoft Access displays for the hyperlink (which corresponds to the acDisplayedValue setting for the part argument). Os valores devolvidos podem ser uma das quatro partes do campo Hiperligação (texto a apresentar, endereço, sub-endereço ou descrição), o endereço completo, osub-endereço de endereço# ou o valor que o Microsoft Access apresenta para a hiperligação.

Observação

Se utilizar o método HyperlinkPart numa consulta, o argumento de peça é obrigatório e não pode utilizar as constantes listadas acima, mas tem de utilizar o valor real.

Quando um valor é fornecido na parte de texto a apresentar de um campo Hiperligação , o valor apresentado pelo Microsoft Access será o mesmo que a definição de texto a apresentar . Quando não existir nenhum valor na parte de texto a apresentar de um campo Hiperligação , o valor apresentado será a parte do endereço ou sub-endereço do campo Hiperligação , consoante o valor que estiver presente pela primeira vez no campo.

A tabela seguinte mostra os valores devolvidos pelo método HyperlinkPart para dados armazenados num campo Hiperligação .

Dados do campo de hiperlink	Valores retornados pelo método HyperlinkPart
#https://www.microsoft.com#	acDisplayedValue: https://www.microsoft.com acDisplayText: acAddress: https://www.microsoft.com acSubAddress: acScreenTip: acFullAddress: https://www.microsoft.com
Microsoft#https://www.microsoft.com#	acDisplayedValue: Microsoft acDisplayText: Microsoft acAddress: https://www.microsoft.com acSubAddress: acScreenTip: acFullAddress: https://www.microsoft.com
Customers#https://www.microsoft.com#Form Customers	acDisplayedValue: Customers acDisplayText: Customers acAddress: https://www.microsoft.com acSubAddress: Form Customers acScreenTip: acFullAddress: https://www.microsoft.com#Form Customer
##Formulário Clientes#Entrar Informação	acDisplayedValue: Form Customers acDisplayText: acAddress: acSubAddress: Form Customers acScreenTip: Enter Information acFullAddress: #FormCustomer

Quando adiciona uma peça de endereço a um campo hiperligação através da caixa de diálogo Inserir Hiperligação (disponível ao selecionar Hiperligação no menu Inserir ) ou ao escrever uma peça de endereço diretamente num campo Hiperligação , o Access adiciona os dois símbolos # que delimitam partes dos dados de hiperligação.

Pode adicionar ou editar a parte de texto a apresentar de um campo de hiperligação ao clicar com o botão direito do rato numa hiperligação numa tabela, formulário ou relatório, apontando para Hiperligação no menu de atalho e, em seguida, escrevendo o texto a apresentar na caixa Texto a apresentar .

Quando adiciona dados diretamente a um campo hiperligação , tem de incluir os dois símbolos # para delimitar as partes dos dados de hiperligação.

Exemplo

O exemplo seguinte utiliza as quatro constantes de argumento de peça para apresentar as informações devolvidas pelo método HyperlinkPart para cada registo numa tabela que contém um campo Hiperligação . Para testar este exemplo, cole o procedimento ExibirHyperlinkParts na seção declarações de um módulo. Você pode chamar o procedimento ExibirHyperlinkParts da janela Depurar, passando-lhe o nome de uma tabela que contenham hiperlinks e o nome do campo que contém dados hiperlink. Por exemplo:

DisplayHyperlinkParts "MyHyperlinkTableName", "MyHyperlinkFieldName" 
 
Public Sub DisplayHyperlinkParts(ByVal strTable As String, _ 
 ByVal strField As String) 
 
 Dim rst As New ADODB.Recordset 
 Dim strMsg As String 
 
 
 rst.Open strTable, CurrentProject.Connection, _ 
 adOpenForwardOnly, adLockReadOnly 
 
 ' For each record in table. 
 Do Until rst.EOF 
 strMsg = "DisplayValue = " _ 
 & HyperlinkPart(rst(strField), acDisplayedValue) _ 
 & vbCrLf & "DisplayText = " _ 
 & HyperlinkPart(rst(strField), acDisplayText) _ 
 & vbCrLf & "Address = " _ 
 & HyperlinkPart(rst(strField), acAddress) _ 
 & vbCrLf & "SubAddress = " _ 
 & HyperlinkPart(rst(strField), acSubAddress) _ 
 & vbCrLf & "ScreenTip = " _ 
 & HyperlinkPart(rst(strField), acScreenTip) _ 
 & vbCrLf & "Full Address = " _ 
 & HyperlinkPart(rst(strField), acFullAddress) 
 
 ' Show parts returned by HyperlinkPart function. 
 MsgBox strMsg 
 rst.MoveNext 
 Loop 
 
End Sub

Quando você usa o método HyperlinkPart em uma consulta, o argumento part é necessário. Por exemplo, a seguinte instrução SQL utiliza o método HyperlinkPart para devolver informações sobre os dados armazenados como um tipo de dados Hiperligação no campo URL da tabela Ligações:

SELECT Links.URL, HyperlinkPart([URL],0) 
 AS Display, HyperlinkPart([URL],1) 
 AS Name, HyperlinkPart([URL],2) 
 AS Addr, HyperlinkPart([URL],3) 
 AS SubAddr, HyperlinkPart([URL],4) 
 AS ScreenTip 
 FROM Links

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.