☰

ADODB recordset.open são registros de duplicação

tag-icon • tag-icon microsoft-excel vba
ADODB recordset.open são registros de duplicação

O comando recordset.open do Excel VBA está retornando o dobro do número de registros

Este código estava funcionando há anos e agora atualizamos para o Windows 10 e Excel 2016 e está fazendo isso.

Responder1

Como por engano registros duplicados foram inseridos ( as you have written in Comments above), em vez de excluir registros você pode ler registros UNIQUE.

Abaixo estão algumas linhas de código VBA possíveis que ajudam a obter registros exclusivos.

rs.Open "SELECT Distinct ColumnName AS C FROM TableName

Ou

strSQL = "SELECT Distinct(COLNAME) from [SheetName$] "

informação relacionada