Помогите сравнить два прайса по кодам

Программирование на Visual Basic for Applications
VePr
Начинающий
Начинающий
Аватара пользователя
 
Сообщения: 7
Зарегистрирован: 21.06.2005 (Вт) 12:08

Помогите сравнить два прайса по кодам

Сообщение VePr » 06.07.2005 (Ср) 18:12

Помогите средствами VBA сравнить два прайса по кодам и вывести в отдельный лист строки отсутствующие в первом прайсе
буду рад любым вариантам

SergT
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 237
Зарегистрирован: 22.06.2005 (Ср) 21:50
Откуда: Москва

Сообщение SergT » 20.07.2005 (Ср) 21:56

В общем-то алгоритм простой.
Dim i&,ii&
Dim check

for i=1 to Recordcount1 '(Recordcount1- всего записей в первом документе)

for ii=1 to Recordcount2 '(Recordcount2-всего записей во втором документе)
if Ячейка(i)=Ячейка(ii) then ' есть совпадение в первом и втором
' Если Excel, то if Ячейка("A" &i)=Ячейка("A" &ii) then ' есть совпадение
check=true
'End
end if
next ii
if check=false then ' не найдена
'записываем значения строки i (первый док.) куда нужно
end if

next i

У меня, на этом Компе, к сожалению, нет примеров под рукой - но идея такая. А вот куда применить- Это Excel или Word?
В Accesse еще проще, а на VB вообще можно прописать манюсенькую програмку, которая все это сделает, даже если файлы под паролем...
Вариантов куча...
Л. Толстой, «зачем обдумывать обдуманное, бери готовое и иди дальше, в этом сила человечества»
"Всё в наших руках, поэтому их нельзя опускать" (Коко Шанель)


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: Yandex-бот и гости: 96

    TopList  
cron