Сравнение столбцов в Excel

[doober]

Создаются два запроса на выборку данных.
1.Объединение ВСЕХ записей из Таблицы ТО-в ней хранятся все слова с листов.Ключевое поле Слово
и только те записи с текущего листа,в которых связыные поля совпадают =Это лист1
2 Объединение только тех записей ,в которых связыные поля совпадают =Это лист2

для каждого листа
Проверил.Все работает правильно.
Боритесь с повторами это бич
Чтобы не уничтожался файл mdb закомментируйте строку в макросе

Dbase.Close
CO_PY 1
CO_P 2

'Kill (MY_Path + "TT.mdb")
End Sub

Изучайте язык SQL и эксперементируйте.Алгоритм очень прост.

[Laa911]

А можете добавить третий листочеГ что бы слова одинаковые из пересечений были в одной строке ?

The The x x The
Am X X Am

X - это пустая ячейка ;-)

Я гуманитарий.. и для меня SQL это что то очень страшное :-(

А почему в листе 2 есть слова которые входят только одну книгу.. даже если это дубли.... они должны быть как минимум в 2х книгах :-(

[Laa911]

Кстати на листе1 есть 1500 строк, вообще с пустыми значениями ;-( Т.е. как будто слов нет ни в одной книге... .:-((((
А вы простой механизм :-(
Так что повторы здесь ни причем ...
если есть повтор то фиг с ним.. значит он есть в двух книгах..
А вот если его нет... это видимо какой то баг.. но я в VB дуб дубом :-(
Без вас не разберусь :-(

[doober]

А вот и не у меня барабашка :-)))

У вас
А что сейчас скажете.Я убрал за вас повторы-работает как часы.

[Laa911]

Сообщение от doober

У вас
А что сейчас скажете.Я убрал за вас повторы-работает как часы.

Да, уже лучше на Листе1 осталось пустых ячеек 112 (слова есть только в последней книге HoneyMoon)
Так что видимо дело не в пробелах :-(

[Laa911]

отВПРил последнюю книгу в первую (лист 2)
теже 112 слов - удаление ни как не повлияло на данное кол-во ;-(((((
(ни как не могу понять даже если есть дубликаты в столцах, то где же их отражение в других книгах.. где то засада в алгоритме.... :-(
Где то скриптик сбоит :-(


NORA
OLIVIA
JEFFREY
SINCLAIR
WALSH
WESTCHESTER
KEPPLER
PATSY
STEVEN
BRIARCLIFF
CENTENNIAL
BENZ
MITCH
JORDAN
LIZZIE
JR
DECORATOR
BARROWS
EVAN
PINGRY
RIVERSIDE
DINER
MARCUSE
CAYMANS
CRAVENS
PATTERSON
BERETTA
VISELTEAR
TILLINGHAM
HAZELNUT
PLEASANTVILLE
MANTRAS
METS
PATROLMAN
PAYOUT
DIGICAM
VOINTMAN
CHAPPAQUA
YANKEES
VONG
VPN
CHATEAUNEUF
GUARDIA
HITCHCOCK
HOLLIS
BARREIRO
BEEMER
BENEFICIARY
CARDIOLOGIST
ROUGHAN
RYAN
SAMANNA
SHAW
STACKER
MAUCH
MIDTOWN
NYPD
OPTIMIST
PAPE
CUERNAVACA
HALLSTAND
CONVULSING
HARGROVE
COUNTERTERRORISM
DOPP
DOCKERS
GRAETER
EXHUMED
DUMBHEAD
FABULOUSLY
GRAVESTONE
GRIGIO
SEALY
SEBRING
SCARBOROUGH
ROCKEFELLER
VIKING
YIPPEE
WIZARDS
STACKERS
SPUTTERING
SUZANNE
TRAULSEN
MANTRA
MCGRATH
PUP
MERCER
MOOCHERS
JONGE
LAFAYETTEVILLE
JOHNNIE
JARDIN
LU
LOOPHOLES
NADA
PLEEEEEASE
PINOT
PLOP
PENNE
OY
PALMPILOT
ONCOLOGIST
AMALFI
AMSTEL
ASHFORD
BABBO
ALERTS
CANAAN
CHEESEBURGER
BALLISTER
BELGIUM
ABHORRING

[Laa911]

сВПРил первуюе книгу (на листе 2) со всеми
нашлось 4660 слов которых нет ни в одной кроме первой ;-(
Дубликаты получается не причем ;-( хотя кол-во сократилось...

Можно попросить еще сваять Лист3 где все слова одинаковые будут на одной строчке?

Очень хочется что бы скрипт заработал правильно :-(

[doober]

Не знаю как у вас,у меня этих проблем нет.На всякий случай загрузил результаты работы макроса.Для Лист3 замените процедуру
Public Sub CO_P(uu) на процедуру в текстовом файле.

[Laa911]

Сообщение от doober

Не знаю как у вас,у меня этих проблем нет.На всякий случай загрузил результаты работы макроса.Для Лист3 замените процедуру
Public Sub CO_P(uu) на процедуру в текстовом файле.

Я не понимаю почему вы не можете сказать в чем проблема в вашем макросе...

Я уже раз 10 проверил, и в вашем файле тоже самое

Берем слово NORA оно есть только в последней книге (лист 2 и 3)

И обратите внимание.. оно повторилось на листе 3 два раза ;-) - явный глюк

Это явный глюк скрипта... ну посмотрит его уже плиз....
почему он выводит это слово если оно есть только в одной книге.. видимо гдето джоин не работает или что вы там говорили про SQL

Скрипт работает с АшиПкой ;-(((
Я не заню VB ;-((( поэтому вся надежда на ваш интеллект ;-)

[Laa911]

Пришлите скриптик в файлике плиз.. для особо бестолковых ;-(
Или как прошлый раз модулечком
Заменил.. но в листах 2 и 3 вывились только кол-во и заголовок столбцов ;-(