Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.02.04;
Скачать: CL | DM;

Вниз

Сравнение 2х файлов Excel   Найти похожие ветки 

 
Numark   (2007-01-15 10:00) [0]

Здравствуйте мастера!
Возникла необходимость сравнить 2 файла Excel по содержанию.
Они оба имеют похожий контекст вида столбец A-УРЛ, B-Тип, C-Содержание.
Различия лишь в том, что во 2ом файле 982 записей, а в 1ом 514.

Мне необходимо из 2го файла удалить все записи, которые дублируются в 1ом.

Предположительно, я думаю сравнивать столбец A 1го и 2го файла.
Если текст столбца А, в 1ом файле, совподает с текстом столбца А во 2ом файле, тогда удаляем А,В,С этой строки.

Вот только как именно это реализовать, я недогадываюсь. Подскажите пожалуйста. Спасибо.


 
Megabyte ©   (2007-01-15 13:12) [1]

Если через Дельфи, то используй COM/OLE, сравнивай поячеечно.


 
Numark   (2007-01-16 00:31) [2]


> Megabyte ©   (15.01.07 13:12) [1]

Я написал, полцяилось так:

excel1  := CreateOleObject("excel.application"); //514
excel2 := CreateOleObject("excel.application"); //996
excel1.workbooks.open("X:\excel\Îò÷¸ò.xls");
excel2.workbooks.open("X:\excel\Îò÷¸ò_2.xls");
for i:=2 to 916 do
for j:=2 to 514 do
if excel2.sheets[1].cells[i,1].value = excel1.sheets[1].cells[j,1].value then
Memo1.Lines.Add(IntToStr(i));

Form1.Caption :="Ãîòîâî.";

excel1.quit;
excel2.quit;


Подскажите, как можно удалить эту строчку? Т.Е. её обнулить, а на её место, поставить следующюю?
Спасибо.



Страницы: 1 вся ветка

Текущий архив: 2007.02.04;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.06 c
15-1168589311
WondeRu
2007-01-12 11:08
2007.02.04
Парсинг


6-1157020830
РВА
2006-08-31 14:40
2007.02.04
Добавить клиента


2-1169333844
spogi
2007-01-21 01:57
2007.02.04
2 в одном!


2-1168940153
PKM
2007-01-16 12:35
2007.02.04
Работа с TStringGrid.


2-1168967984
SerjVasiljev
2007-01-16 20:19
2007.02.04
Получение имён файлов