Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.049 c