Propriedade QueryTable.AdjustColumnWidth (Excel)
True se as larguras das colunas forem automaticamente ajustadas para que seu conteúdo se encaixe melhor a cada atualização da tabela de consulta especificada. False se as larguras das colunas não forem ajustadas automaticamente a cada atualização. O valor padrão é True. Boolean de leitura/gravação.
Sintaxe
expressão. AdjustColumnWidth
Expressão Uma variável que representa um objeto QueryTable .
Comentários
A largura máxima da coluna é dois terços da largura da tela.
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.
Use a propriedade QueryTable do ListObject para acessar a propriedade AdjustColumnWidth .
Exemplo
Este exemplo desativa o ajuste automático de largura de coluna para a tabela de consulta recém-adicionada na primeira planilha da primeira pasta de trabalho.
With Workbooks(1).Worksheets(1).QueryTables _
.Add(Connection:= varDBConnStr, _
Destination:=Range("B1"), _
Sql:="Select Price From CurrentStocks " & _
"Where Symbol = 'MSFT'")
.AdjustColumnWidth = False
.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.