ник: час
Ещё вопрос мну терзает.
Есть столбец в EXCEL - код товара.
Пишут код вручную.
Как бы мне по быстрому проверить , что нет в этоб столбце повторяющихся значений.
конечно в Access_овской таблице это просто сделать,
типа
Private Function DOBLE_KOD_COMMODITY(KOD_COMM As String) As Boolean
'' проверка наличия кода товара в базе (избежать задвоенного)
Dim RST_COMMODITY_TBL As ADODB.Recordset
Set RST_COMMODITY_TBL = New ADODB.Recordset
STR_COMMODITY = ""
RST_COMMODITY_TBL.Open "SELECT COMMODITY_TBL.* " _
& " From COMMODITY_TBL " _
& " Where (((COMMODITY_TBL.KOD_COMMODITY) = '" & KOD_COMM & "'))", GLB_DATA_DB_CONNECTION, adOpenKeyset, adLockOptimistic
If RST_COMMODITY_TBL.RecordCount = 0 Then DOBLE_KOD_COMMODITY = False '' Записей нету!!"
'
If RST_COMMODITY_TBL.EOF And RST_COMMODITY_TBL.BOF Then
' Записей нету!!"
DOBLE_KOD_COMMODITY = False
Else
' записи есть такой номер уже имеется
STR_COMMODITY = RST_COMMODITY_TBL("COMMODITY_NAME")
DOBLE_KOD_COMMODITY = True
End If
'
RST_COMMODITY_TBL.Close
Set RST_COMMODITY_TBL = Nothing
End Function
но это не подходит, потому как на следующем листе коды опять такие же.