Propriedade QueryTable.TextFileConsecutiveDelimiter (Excel)

True se os delimitadores consecutivos forem tratados como um único delimitador quando você importar um arquivo de texto para uma tabela de consulta. O valor padrão é False. Boolean de leitura/gravação.

Sintaxe

expressão. TextFileConsecutiveDelimiter

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

Comentários

Utilize esta propriedade apenas quando a tabela de consulta for baseada em dados de um ficheiro de texto (com a propriedade QueryType definida como xlTextImport) e apenas se o valor da propriedade TextFileParseType for xlDelimited.

Se importar dados através da interface de utilizador, os dados de uma consulta Web ou de uma consulta de texto são importados como um objeto QueryTable , enquanto todos os outros dados externos são importados como um objeto ListObject .

Se importar dados com o modelo de objeto, os dados de uma consulta Web ou de uma consulta de texto têm de ser importados como uma Tabela de Consulta, enquanto todos os outros dados externos podem ser importados como um ListObject ou uma QueryTable.

A propriedade TextFileConsecutiveDelimiter 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 delimitador.

Set shFirstQtr = Workbooks(1).Worksheets(1) 
Set qtQtrResults = shFirstQtr.QueryTables _ 
 .Add(Connection := "TEXT;C:\My Documents\19980331.txt", _ 
 Destination := shFirstQtr.Cells(1, 1)) 
With qtQtrResults 
 .TextFileParseType = xlDelimited 
 .TextFileSpaceDelimiter = True 
 .TextFileConsecutiveDelimiter = 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.