ADODB recordset.open — это дублирование записей

ADODB recordset.open — это дублирование записей

Команда Excel VBA recordset.open возвращает удвоенное количество записей

Этот код работал годами, а теперь мы обновились до Windows 10 и Excel 2016, и он делает то же самое.

решение1

Так как по ошибке были введены дубликаты записей ( as you have written in Comments above), то вместо удаления записей вы можете прочитать УНИКАЛЬНЫЕ записи.

Ниже приведены несколько возможных строк кода VBA, которые помогут получить уникальные записи.

rs.Open "SELECT Distinct ColumnName AS C FROM TableName 

Или

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

Связанный контент