ADODB recordset.open son registros de duplicación

ADODB recordset.open son registros de duplicación

El comando recordset.open de Excel VBA devuelve el doble de registros

Este código funcionó durante años y ahora actualizamos a Windows 10 y Excel 2016 y está haciendo esto.

Respuesta1

Dado que por error se han ingresado registros duplicados ( as you have written in Comments above), en lugar de eliminar registros puede leer registros ÚNICOS.

A continuación se muestran algunas posibles líneas de código VBA que ayudan a obtener registros únicos.

rs.Open "SELECT Distinct ColumnName AS C FROM TableName 

O

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

información relacionada