Compartilhar via


Propriedade QueryTable.WebConsecutiveDelimitersAsOne (Excel)

True se delimitadores consecutivos forem tratados como um único delimitador quando você importar dados de marcas HTML <PRE> em uma página da Web para uma tabela de consulta e se os dados forem analisados em colunas. False se você desejar tratar os delimitadores consecutivos como vários delimitadores. O valor padrão é True. Boolean de leitura/gravação.

Sintaxe

expressão. WebConsecutiveDelimitersAsOne

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

Comentários

Use essa propriedade somente quando a propriedade QueryType da tabela de consulta estiver definida como xlWebQuery, a consulta retornará um documento HTML e a propriedade WebPreFormattedTextToColumns é definida como True.

Se você importar dados usando a interface do usuário, os dados de uma consulta Web ou uma consulta de texto serão importados como um objeto QueryTable , enquanto todos os outros dados externos serão importados como um objeto ListObject .

Se você importar dados usando o modelo de objeto, os dados de uma consulta Web ou de uma consulta de texto devem ser importados como uma QueryTable, enquanto todos os outros dados externos podem ser importados como um ListObject ou um QueryTable.

A propriedade WebConsecutiveDelimitersAsOne só se aplica aos objetos QueryTable.

Exemplo

Este exemplo define o caractere de espaço como o delimitador na tabela de consulta na primeira planilha da primeira pasta de trabalho e atualiza a tabela de consulta. Os espaços consecutivos são tratados como um único espaço.

Set shFirstQtr = Workbooks(1).Worksheets(1) 
Set qtQtrResults = shFirstQtr.QueryTables _ 
 .Add(Connection := "URL;https://datasvr/98q1/19980331.htm", _ 
 Destination := shFirstQtr.Cells(1,1)) 
With qtQtrResults 
 .WebConsecutiveDelimitersAsOne = True 
 .Refresh 
End With

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.