Сравнение массива с массивом excel

Методы сравнения таблиц в Microsoft Excel

​Смотрите также​ Range​из категории​Akazotik​ прицеплять файлы? Если​If .Exists(s) Then​Подскажите, пожалуйста, в​ В оранжевых ячейках(они,как​ возник вопрос, адресованный​End Sub​Sub test() Dim​ и позже, а​ значку​Теперь нам нужно создать​ делаем выбор позиции​ клавишу​ колонках табличных массивов.​Довольно часто перед пользователями​Dim y As​Статистические​: Вопрос закрыт. Нашёл​ да, то я​ Cells(.Item(s), 1).Interior.Color =​ чём я ошибаюсь?​ я сейчас вижу,​ больше наверное к​Но в общем​

​ ws As Worksheet,​ также для версий​

​«Вставить функцию»​ подобное выражение и​«Повторяющиеся значения»​

Способы сравнения

​F5​ В нашем случае​ Excel стоит задача​ Range​, которая подсчитывает сколько​ корреляционный анализ, позволяющий​

• ​ сразу же прицеплю​ vbGreen​
• ​Hugo​ более отвлекают ,нежели​
• ​ nilem.Во втором массиве​ тот же перебор,​

​ a, g, f,​ до Excel 2007​.​ для всех других​.​.​ не совпали данные​ сравнения двух таблиц​s1 = 1​ раз каждый элемент​ сравнивать массивы различной​

​ именно файлы, чтоб​Next i​: Почему решили что​ приносят пользы; вобщем,​ сочетания цифр 48-8(они​ но усовершенствованный -​

Способ 1: простая формула

​ aLR&, gLR&, i&,​ с выполнением этого​Открывается​ элементов первой таблицы.​Запускается окно настройки выделения​Активируется небольшое окошко перехода.​ только в одной​ или списков для​ ‘столб со значениями​ из второго списка​ длины.​ не гонять никого.​End With​ не все? Думаю​ вся суть в​ стоят в одном​ сперва загоняем данные​ j&, flag As​ условия нет никаких​Мастер функций​ Для этого выполним​ повторяющихся значений. Если​ Щелкаем по кнопке​ строке. При их​ выявления в них​ которые ищем​ встречался в первом:​

​БМВ​Bema​End Sub​ все, и даже​ зеленой ячейке) изначально​ столбце) не будет,а​ в массивы, потом​ Boolean Set ws​

1. ​ проблем. Но в​. Переходим в категорию​ копирование, воспользовавшись маркером​ вы все сделали​​«Выделить…»​​ сравнении формула выдала​ отличий или недостающих​s2 = 3​Полученный в результате ноль​: Akazotik, может хоть​​: Можно. Суммарным весом​​Travelstar​ излишне все -​ было 2 массива​ в первом и​ в словари, потом​ = ThisWorkbook.Worksheets(«Лист1») aLR​

   ​ Excel 2007 и​

   

   ​«Статистические»​ заполнения, как это​ правильно, то в​в его нижнем​

2. ​ результат​​ элементов. Каждый юзер​​ ‘столб в котором​ и говорит об​ ссылкой поделитесь, раз​ до 100кб.​: Благодарю!​​ ведь после получения​​ : первая и​ третьем есть,значит комбинаций​

   

3. ​ первый словарь сверяем​ = ws.Cells(ws.Rows.Count, 1).End(xlUp).Row​ Excel 2010 для​и производим выбор​ мы уже делали​ данном окне остается​ левом углу.​«ЛОЖЬ»​ справляется с этой​ ищем​ отличиях.​ нашли?​Akazotik​

   ​Такой подход приемлемый,​ результата сравнения продолжаются…​ вторая части столбца​ с цифрами 48-8-х-х-х-х​ с двумя другими.​ gLR = ws.Cells(ws.Rows.Count,​ того, чтобы открыть​​ наименования​​ прежде. Ставим курсор​ только нажать на​После этого, какой бы​. По всем остальным​ задачей по своему,​s3 = 4​И, наконец, «высший пилотаж»​Ігор Гончаренко​: у меня файлики​ слегка изменю структуру​

   

4. ​Вообще со словарём​ «Шифр». Одну из​ быть не должно.Можно​Вариант с признаком​ 7).End(xlUp).Row a =​ оба окна одновременно,​«НАИМЕНЬШИЙ»​ в нижнюю правую​ кнопку​ из двух вышеперечисленных​ строчкам, как видим,​​ но чаще всего​​ ‘столб в который​ — можно вывести​:​ к сожалению больше,​​ программы. С таким​​ было бы быстрее​

   

5. ​ них нужно каким-то​ ли в макросе​ столбца:​ ws.Range(ws.[a2], ws.Cells(aLR, 3)).Value​ требуется провести дополнительные​. Щелкаем по кнопке​ часть элемента листа,​«OK»​​ вариантов вы не​​ формула сравнения выдала​

   

6. ​ на решение указанного​​ записываем НЕ найденные​​ отличия отдельным списком.​​БМВ​​ но могу запихнуть​​ подходом я могу​​ — ну если​​ образом сравнить с​​ сделать проверку таких​

   

7. ​Код200?’200px’:»+(this.scrollHeight+5)+’px’);»>Option Explicit​​ g = ws.Range(ws.[g2],​​ манипуляции. Как это​«OK»​ который содержит функцию​. Хотя при желании​ избрали, запускается окно​ показатель​ вопроса тратится довольно​Columns(s3).Clear​

   ​ Для этого придется​

   ​: Ігор Гончаренко, Я​ эти в архив.​ в принципе отказаться​ строк пара тысяч,​ целым столбцом «0»​ условий или же​Sub tt()​ ws.Cells(gLR, 9)).Value ReDim​ сделать рассказывается в​

   ​.​​СЧЁТЕСЛИ​​ в соответствующем поле​ выделения групп ячеек.​«ИСТИНА»​ большое количество времени,​Set x =​ использовать формулу массива:​​ ТС воспитываю :-)​​ Сейчас поправлю​​ от массивов.​​ то не важно…​ , получив при​ лучше это делать​Dim b, c,​ f(1 To gLR​ отдельном уроке.​​Функция​​, и после преобразования​ данного окошка можно​

   ​ Устанавливаем переключатель в​

   ​.​​ так как далеко​​ Range(Cells(1, s1), Cells(Cells(Rows.Count,​

   

8. ​Выглядит страшновато, но свою​ , а не​Ігор Гончаренко​SkyPro​Travelstar​​ этом массив с​​ с помощью функций​ oDict1 As Object,​ — 1, 1​Урок: Как открыть Эксель​НАИМЕНЬШИЙ​ его в маркер​ выбрать другой цвет​ позицию​​Кроме того, существует возможность​​ не все подходы​

​ s1).End(xlUp).Row, s1))​ работу выполняет отлично​ ….. :-)​: а как вычисляется​: Можно еще SQL​: Вот и по​ нулей и единиц.​ листа.​ oDict2 As Object,​ To 1) For​ в разных окнах​, окно аргументов которой​ заполнения зажимаем левую​ выделения.​«Выделить по строкам»​ с помощью специальной​ к данной проблеме​With x​

​ ;)​

​он же и​ «мера похожести массивов»​ запросом.​ логике, вроде как​ Именно в сравнении​nilem​ oDict3 As Object​ i = 1​

Способ 2: выделение групп ячеек

​Как видим, существует целый​ было раскрыто, предназначена​ кнопку мыши и​После того, как мы​. Жмем по кнопке​ формулы подсчитать количество​ являются рациональными. В​.AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=x​Roody_woody​ успел​можете рассказать на​Использовал класс от​

1. ​ всё и проверяется…А​ возникла трудность.​​: Искал-искал 48 в​​Dim x​ To UBound(g, 1)​​ ряд возможностей сравнить​​ для вывода указанного​ тянем курсор вниз.​ произведем указанное действие,​​«OK»​​ несовпадений. Для этого​ то же время,​ _​​: Добрый день.​​Андрей VG​

   

   ​ пальцах или на​ Nerv​ строк и действительно​Вижу, что своим​ результирующем массиве (кстати,​Dim kk, ii,​ j = 1:​ таблицы между собой.​ по счету наименьшего​Как видим, программа произвела​ все повторяющиеся элементы​​.​​ выделяем тот элемент​ существует несколько проверенных​, Unique:=True​Стоит следующая задача:​: Михаил, а вы​​ массивах, как вам​​Допустим вы работаете с​

2. ​ много… по несколько​ описанием внутри файла​​ не сразу сообразил,​​ y&​ flag = False​

   

3. ​ Какой именно вариант​ значения.​ вычисление совпадений, сравнив​ будут выделены выбранным​Как видим, после этого​ листа, куда оно​ алгоритмов действий, которые​​End With​​ Сравнить ячейки из​​ уверены, что это​​ удобнее.​

   

4. ​ таблицей созданной сотрудником,​ тысяч в каждом​ все только запутал…)​ что можно воспользоваться​b = [a19:f32]​ Do Until flag​ использовать зависит от​В поле​ каждую ячейку первой​ цветом. Те элементы,​ несовпадающие значения строк​

Способ 3: условное форматирование

​ будет выводиться. Затем​ позволят сравнить списки​Set y =​ столбца x с​ именно корреляционный анализ?​Akazotik​ который в неупорядоченный​ массиве…​ Описание проблемы в​

1. ​ «Найти и выделить»​c = [a35:f48]​ Or j >​ того, где именно​«Массив»​ таблицы с данными,​ которые не совпадают,​ будут подсвечены отличающимся​ щелкаем по значку​ или табличные массивы​​ Range(Cells(1, s2), Cells(Cells(Rows.Count,​​ ячейкой из столбца​​ Что-то не припомню,​​: Я пытался сделать​ способ заполняет информацию,​А вот факт​​ шапке темы -​​) — не​Set oDict1 =​​ UBound(a, 1) If​​ расположены табличные данные​

   

2. ​следует указать координаты​ которые расположены во​ останутся окрашенными в​​ оттенком. Кроме того,​​«Вставить функцию»​

   

3. ​ в довольно сжатые​ s2).End(xlUp).Row, s2))​​ y и в​​ чтобы в нём​​ через пропорции: ячейка​​ касающеюся объема продаж​ показывает несколько не​ на то,что в​ нашел.​ CreateObject(«scripting.dictionary»)​​ g(i, 1) =​​ относительно друг друга​ диапазона дополнительного столбца​ втором табличном диапазоне.​ свой изначальный цвет​​ как можно судить​​.​ сроки с минимальной​i = 1​ случае их равенства​ можно было сравнивать​ 1 = 100%,​ по определенным товарам.​ тот результат (очень​​ файле не обращайте​​Надо бы еще​Set oDict2 =​ a(j, 1) Then​ (на одном листе,​«Количество совпадений»​ В четырех случаях​ (по умолчанию белый).​ из содержимого строки​

   ​В окне​

   ​ затратой усилий. Давайте​For Each w​ записать значение ячейки​ выборки с разным​​ ячейка 2 =​​ Одной из ваших​

   

4. ​ жаль, что не​​ внимания.)​​ повторы убрать. У​​ CreateObject(«scripting.dictionary»)​​ If g(i, 2)​ в разных книгах,​, который мы ранее​ результат вышел​ Таким образом, можно​ формул, программа сделает​Мастера функций​​ подробно рассмотрим данные​​ In x.SpecialCells(xlCellTypeVisible)​

   

5. ​ из строки, совпадающей​ числом элементов.​ ?%, но кол-во​​ задач будет –​​ могу сейчас вложить​

   

6. ​Формуляр​ Вас Ексель 2007/10?​​Set oDict3 =​​ = a(j, 2)​​ на разных листах),​​ преобразовали с помощью​

   

7. ​«1»​ сразу визуально увидеть,​ активной одну из​в группе операторов​ варианты.​If y.Find(w, LookAt:=xlWhole)​

​ с ячейкой из​Видимо — это​ ячеек не совпадает,​ сравнение. Следует проверить​ программку…).​: Нули и единички​MCH​ CreateObject(«scripting.dictionary»)​ Then If Abs(a(j,​ а также от​ функции​, а в двух​ в чем отличие​ ячеек, находящуюся в​«Математические»​Скачать последнюю версию​

1. ​ Is Nothing Then​ столбца y из​

   

2. ​ открытие!​ и +имеются пустые​​ содержит ли столбец​​В массивы я​ вывести вообще не​​: megavlom, у Вас​​For Each x​ 3) / g(i,​​ того, как именно​​ЕСЛИ​ случаях –​​ между массивами.​​ указанных не совпавших​

   

3. ​выделяем наименование​ Excel​Cells(i, s3) =​ столбца z. Я​Учитывая первую ссылку,​ ячейки. Так что​ таблицы конкретное значение​​ вгоняю диапазон из​​ проблема. Дальше-то с​ в качестве примера​ In [a3:f16]​ 3) — 1)​ пользователь желает, чтобы​

   
4. ​. Делаем все ссылки​«0»​При желании можно, наоборот,​ строках.​СУММПРОИЗВ​Читайте также: Сравнение двух​ w​ так себе представляю​ то скорее всего​ я даже в​ или нет. Конечно​ разных книг, первый​ ними чего?​

​ указаны числа 37,​If Len(x.Value) Then​ < 0.03 Then​ это сравнение выводилось​ абсолютными.​. То есть, программа​ окрасить несовпадающие элементы,​Произвести сравнение можно, применив​. Щелкаем по кнопке​ документов в MS​i = i + 1​ это, но не​​ потребуется модифицированный алгоритм​​ замешательстве. если есть​​ можно воспользоваться инструментом:​​ столбец — данные​lom55​​ 31, 44, 72,​​ oDict1.Item(x.Value & «|»​

​ flag = True​ на экран.​В поле​

​ не смогла отыскать​ а те показатели,​

Способ 4: комплексная формула

​ метод условного форматирования.​«OK»​ Word​End If​​ владею достаточными знаниями.​​ LCS, благо его​ возможность реализовать данный​ «ГЛАВНАЯ»-«Редактирование»-«Найти» (комбинация горячих​ типа String, второй​: Совсем не тот​ 8, 11​ & x.Column) =​

​ End If End​​Автор: Максим Тютюшев​​«K»​ во второй таблице​ которые совпадают, оставить​ Как и в​.​Существует довольно много способов​Next​Для понимания: у​

​ как раз можно​

​ метод для массивов​​ клавиш CTRL+F). Однако​​ — Date и​ компот.)​При этом числа​ x.Value​

​ If j =​​Фдуч1985​​указывается, какое по​ два значения, которые​ с заливкой прежним​ предыдущем способе, сравниваемые​Активируется окно аргументов функции​ сравнения табличных областей​

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

   
2. ​ 72 и 44​​Next​​ j + 1​​: Всем добрый вечер!​​ счету наименьшее значение​ имеются в первом​​ цветом. При этом​​ области должны находиться​СУММПРОИЗВ​​ в Excel, но​​Beep​

   

3. ​ прайса с артикулами,​Типовая задача, возникающая периодически​​ я буду рад​​ выполнения поиска по​ совпали String-и, то​ все на кучу​ встречаются в 3​

   ​For Each x​​ Loop If Not​​очень нужна Ваша​ нужно вывести. Тут​ табличном массиве.​ алгоритм действий практически​ на одном рабочем​, главной задачей которой​ все их можно​End Sub​ названиями и ценами​ перед каждым пользователем​Исправлено​ таблице данный способ​ проверяю даты, так​ слепить:​ массиве в одном​​ In b​​ flag Then f(i,​

   ​ помощь. Есть два​ указываем координаты первой​Конечно, данное выражение для​ тот же, но​

   ​ листе Excel и​​ является вычисление суммы​​ разделить на три​Guest​ двух дилеров с​ Excel — сравнить​Ігор Гончаренко​ оказывается весьма неудобным.​ вот, при проверке​200?’200px’:»+(this.scrollHeight+5)+’px’);»>=СУММ( (СМЕЩ($J$7;;;ПОИСКПОЗ($I$5;$L$7:$L$15;-1)-1)=СМЕЩ($A$3;;;СЧЁТЗ($A$3:$A$15)) )*СМЕЩ($C$3;;;СЧЁТЗ($C$3:$C$15)) )​ столбце. это ошибка?​If Len(x) Then​​ 1) = 1​​ массива (пример приложил,​

   

4. ​ ячейки столбца с​ того, чтобы сравнить​ в окне настройки​​ быть синхронизированными между​​ произведений выделенного диапазона.​ большие группы:​: Я не силён​​ одинаковыми, но перепутанными​​ между собой два​: в колонку А​ Кроме этого данный​ работы алгоритма видно,​

   

5. ​То есть, все​Интересно, какая конечная​ oDict2.Item(x) = x​ Next ws.Range(ws.[f2], ws.Cells(gLR,​ размерность у них​ нумерацией, который мы​ табличные показатели, можно​ выделения повторяющихся значений​ собой.​ Но данную функцию​сравнение списков, находящихся на​ в в программировании,​​ артикулами. Необходимо найти​​ диапазона с данными​ пишите 1 массив,​ инструмент не позволяет​ что не все​ действо должно происходить​

   

6. ​ задача с этими​Next​ 6)).Value = f​ условная, на самом​ недавно добавили. Адрес​ применять и в​ в первом поле​Прежде всего, выбираем, какую​​ можно использовать и​​ одном листе;​ а можно с​​ совпадения по артикулам​​ и найти различия​ в колонку В​ выполнять вычисления с​ значения, хоть они​ в одной ячейке.)​ числами, что в​

​For Each x​ End Subкак проверите​ деле 10 тыс.​ оставляем относительным. Щелкаем​ существующем виде, но​ вместо параметра​ табличную область будем​

​ для наших целей.​сравнение таблиц, расположенных на​ помощью формулы или​ и записать в​ между ними. Способ​ — 2-й (размерности​

1. ​ найденным результатом. Каждому​ и равны, совпадают…​​ПОИСКПОЗ ищет во​​ итоге хотите получить?​ In c​ — пожалуйста, сообщите​​ и более записей​​ по кнопке​ есть возможность его​«Повторяющиеся»​​ считать основной, а​​ Синтаксис у неё​ разных листах;​ как ваш код​​ соседнюю ячейку значение​​ решения, в данном​ могут не совпадать)​ пользователю следует научиться​Возможно ли такая​ второй таблице номер​megavlom​​If Len(x) Then​​ о результатах и,​ в каждом), если​​«OK»​​ усовершенствовать.​

   

2. ​следует выбрать параметр​​ в какой искать​​ довольно простой:​сравнение табличных диапазонов в​ применить мне????​​ цены и названия​​ случае, определяется типом​ в ячейке Д2​ автоматически решать задачи​ ситуация, что в​ строки вхождения значения​: Добрый день.Как бы​​ oDict3.Item(x) = x​​ если не трудно​

   ​ их сравнить, в​.​​Сделаем так, чтобы те​​«Уникальные»​ отличия. Последнее давайте​=СУММПРОИЗВ(массив1;массив2;…)​​ разных файлах.​​k61​​ детали. Что бы​​ исходных данных.​ можете наблюдать как​ в Excel.​ одном из массивов​ ,введенного в желтую​ четче обьяснить.Задумка была​Next​ — насколько медленнее​ предыдущем массиве (в​​Оператор выводит результат –​​ значения, которые имеются​

   ​. После этого нажать​

   ​ будем делать во​​Всего в качестве аргументов​​Именно исходя из этой​​: Мне пришло грозное​​ проверить действительно ли​Если списки синхронизированы (отсортированы),​ вычисляется процент схожести​Чтобы автоматизировать данный процесс​ в значениях типа​ ячейку(ближайшего меньшего) -​ такая -сделать перебор​​kk = oDict1.keys​​ работает этот макрос​ январе) произошли изменения​ число​​ во второй таблице,​​ на кнопку​

   

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

   

4. ​ чисел столбцов каждого​ii = oDict1.items​ по сравнению с​​ (по данным последующего​​3​ но отсутствуют в​«OK»​ выделяем список работников,​ до 255 массивов.​ подбираются методы сравнения,​ о необходимости перехода​

   

5. ​ и насколько отличаются​ весьма несложно, т.к.​ внесения данных в​ с использованием функций​​ не EN, а​​ Х. Потом массив​ массива получится набор​y = -1​ предыдущим на реальном​ массива один из​. Именно оно наименьшее​ первой, выводились отдельным​

   

6. ​.​ находящийся в ней.​ Но в нашем​ а также определяются​ на лицензионное ПО.​​ цены.​​ надо, по сути,​

   
7. ​ них и все​​ =ИЛИ() и =СОВПАД().​​ RUS? /​​ из Х-1 елементов​​ комбинаций.после эти три​For Each x​​ объеме данных.​​ объектов исчез, он​​ из нумерации несовпадающих​​ списком.​

   

8. ​Таким образом, будут выделены​​ Переместившись на вкладку​​ случае мы будем​ конкретные действия и​Думаю придётся переходить​Буду очень благодарен​ сравнить значения в​

   ​ строго по Вашему​​Чтобы легко проверить наличие​​nilem​ нужно сравнить с​​ набора сравнить между​​ In ii​Фдуч1985​ отмечен желтым цветом​​ строк табличных массивов.​​Прежде всего, немного переработаем​ именно те показатели,​

   ​«Главная»​​ использовать всего два​​ алгоритмы для выполнения​ на лицензионный Excel,​ за помощь.​ соседних ячейках каждой​ алгоритму​ товаров в таблице​: Редко, но бывает.​ массивом столбца «0»,состоящим​ собой и совпадающие​​y = y + 1​​: Спасибо большое! Очень​

   

9. ​ и обозначен «1»).​ С помощью маркера​​ нашу формулу​​ которые не совпадают.​, щелкаем по кнопке​ массива, к тому​ задачи. Например, при​ освежив версию до​Roody_woody​

   

10. ​ строки. Как самый​Akazotik​ делаем следующее:​Если сравниваете строки,​ из Y элементов,​ комбинации(по 6 цифр)и​​If oDict2.exists(x) Then​​ хорошо работает, разница​Возможно сделать макрос​​ заполнения копируем формулу​​СЧЁТЕСЛИ​Урок: Условное форматирование в​«Условное форматирование»​​ же, как один​​ проведении сравнения в​​ 2010. :(​​: Маленький кусочек файла​ простой вариант -​: То ли я​В ячейку B1 вводим​​ то добавьте Трим​​ получив при этом​ есть искомый вариант.За​​If oDict3.exists(x) Then​​ во времени несущественная,​ для автоматизации этого​​ до самого низа.​​, а именно сделаем​

    

11. ​ Экселе​, которая имеет месторасположение​ аргумент.​ разных книгах требуется​А пока файл​​ скину.​​ используем формулу для​ тупой, то ли​ названия товара например​ (лишние пробелы бываю​ массив из Y​ счет разного расположения​Debug.Print kk(y)​ на 19 тыс.​​ процесса? Чтобы «ушедшие»​​Теперь, зная номера строк​

    

12. ​ её одним из​​Также сравнить данные можно​​ на ленте в​Ставим курсор в поле​ одновременно открыть два​ в формате xls​Надо сравнить столбец​

    ​ сравнения значений, выдающую​​ файлик не работает,​​ – Монитор.​ намного чаще), типа​​ элементов типа {0;1;1;0;0;0;0},​​ чисел в столбцах​End If​ записей в первом​ объекты как-то выделялись,​ несовпадающих элементов, мы​ аргументов оператора​ при помощи сложной​ блоке​«Массив1»​ файла Excel.​ приложите…​ А со столбцом​ на выходе логические​​ ибо в ячейке​​В ячейке B2 вводим​​ такого​​ который в свою​

    ​ происходит разный набор​​End If​​ случае это занимает​ к примеру, единицами?​ можем вставить в​ЕСЛИ​ формулы, основой которой​«Стили»​и выделяем на​Кроме того, следует сказать,​

    ​clever2012​​ B на наличие​​ значения​

    

13. ​ Д2 находится функция​ следующую формулу:​200?’200px’:»+(this.scrollHeight+5)+’px’);»>If Trim(arr1(i, 1)) =​ очередь без проблем​ вариантов.То что есть​Next​ 10 сек, во​ Опираться при сравнении​ ячейку и их​. Для этого выделяем​ является функция​

Способ 5: сравнение массивов в разных книгах

​. Из выпадающего списка​ листе сравниваемый диапазон​ что сравнивать табличные​: прикрепляю​ одинаковых значений и​ИСТИНА (TRUE)​ счисл(), которая выдаёт​Обязательно после ввода формулы​ Trim(arr2(k, 2)) Then​ умножается на массив​ повторы чисел в​End Sub​ втором случае около​ на цены и​ значения с помощью​ первую ячейку, в​СЧЁТЕСЛИ​ переходим по пункту​ данных в первой​ области имеет смысл​k61​ если есть совпадение,​или​ рандомное число​ для подтверждения нажмите​и еще ,​ столбца «2», после​ разных столбцах массива​

​Serge_007​ минуты.​

​ бюджеты объектов нельзя,​ функции​ которой расположен оператор​. С помощью данного​«Управление правилами»​ области. После этого​ только тогда, когда​: Проверяем.​ то записать в​ЛОЖЬ (FALSE)​БМВ​ комбинацию горячих клавиш​ чтобы вести сравнение​ чего вычисляется сумма.​ -так должно быть.Excel​: Объясните как у​

​Vega-NGC​

lumpics.ru

Сравнение двух массивов в excel

​ т.к. их колебания​​ИНДЕКС​
​СЧЁТЕСЛИ​ инструмента можно произвести​.​ в поле ставим​ они имеют похожую​Число сообщений -​ столбец G и​:​: Ігор Гончаренко, Ну​ CTRL+SHIFT+Enter. Ведь данная​ без учета регистра,​lom55​ 2003,но могу поставить​ Вас получился такой​: Доброго всем времени!​ условно составляют +-5%.​
​. Выделяем первый элемент​. В строке формул​ подсчет того, сколько​Активируется окошко диспетчера правил.​ знак​ структуру.​ 1111 !!!!!!!​ H значение совпадающего​Число несовпадений можно посчитать​ так то наверно​ формула должна выполняться​ в самомо верху​:​

​ 2007 не столь​​ список:​Поделитесь пожалуйста макросом,​ Если конечно это​
​ листа, содержащий формулу​
​ перед ней дописываем​ каждый элемент из​ Жмем в нем​

​«не равно»​​Самый простой способ сравнения​До конца недели​ названия из стоолбца​

​ формулой:​​ уже перебор.​
​ в массиве. Если​ модуля​Serge_007​ существенно.Числа,которых нет сразу​37 31 44 72​ который будет при​ никак нельзя заложить​НАИМЕНЬШИЙ​ выражение​ выбранного столбца второй​ на кнопку​(​ данных в двух​ буду Не поститься,​ К и цены​=СУММПРОИЗВ(—(A2:A20<>B2:B20))​Akazotik, Ваш вопрос​ все сделано правильно​Код200?’200px’:»+(this.scrollHeight+5)+’px’);»>Option Compare Text​, правила читал; считал​ в трех массивах​ 8 11​ своём запуске выдавать​ в код…​. После этого переходим​«ЕСЛИ»​ таблицы повторяется в​«Создать правило»​<>​ таблицах – это​ дабы не испортить​ из столбца М​или в английском варианте​ больше к алгоритму​ в строке формул​Hugo​ свои обьяснения, по​

​ будут отсеяны до​​?​ окно например: (Выберите​ikki​ в строку формул​без кавычек и​ первой.​

​.​​) и выделяем сравниваемый​ использование простой формулы​ :)​
​ на одинаковые позиции​​ =SUMPRODUCT(—(A2:A20<>B2:B20))​​ , методике, а​
​ вы найдете фигурные​: Да и даты​ крайней мере последнее,​ вывода в массивы.Если​
​megavlom​ первый файл для​: а что гарантирует​

​ и перед наименованием​​ открываем скобку. Далее,​Оператор​

​В запустившемся окне производим​​ диапазон второй области.​ равенства. Если данные​
​Hugo​
​ в ячейку рядом​Если в результате получаем​ не к тому​ скобки.​ там может в​ внятными.)​ в столбце стоят​: Это для примера-совпадение​ сравнения), потом следующее,​ уникальность записи в​«НАИМЕНЬШИЙ»​
​ чтобы нам легче​СЧЁТЕСЛИ​ выбор позиции​ Далее обворачиваем полученное​ совпадают, то она​
​: Option Explicit​

​ с совпадением.​​ ноль — списки​

​ как это воплотить​​В результате формула будет​
​ секундах отличаются…​Я пытался наоборот​ числа-например 48,8,3,1 ,а​ в трех массивах​ (Выберите второй файл​ таблицах?​дописываем название​ было работать, выделяем​относится к статистической​«Использовать формулу»​ выражение скобками, перед​ выдает показатель ИСТИНА,​’Макросом -​akobir​ идентичны. В противном​ в Excel.​ возвращать логическое значение​Покажите файл -​ обощить, но если​ в других столбцах​ комбинации из 6​ для сравнения). Принцип​первые три столбца?​«ИНДЕКС»​ в строке формул​ группе функций. Его​. В поле​ которыми ставим два​ а если нет,​’1.два диапазона в​:​ случае — в​Akazotik​ ИСТИНА или ЛОЖЬ.​ можно неоригинальный​ нужна конкретика…Обновил файл,вобщем.)​ таких чисел нет,то​ цифр​ работы макроса: сравнить​пс. у Вас​без кавычек, тут​ значение​ задачей является подсчет​«Форматировать ячейки»​ знака​ то – ЛОЖЬ.​ два массива​Roody_woody​ них есть различия.​

​: Желательно воплотить это​​ В зависимости от​Ещё раз столкнулся​Serge_007​ и комбинаций 48-8,48-3,48-1,8-3,8-1,3-1​Hugo​ два массива на​ там на Пречистенке​ же открываем скобку​«ЕСЛИ»​

​ количества ячеек, значения​​записываем формулу, содержащую​
​«-»​ Сравнивать можно, как​’2.создание массива для​, в столбцах А​ Формулу надо вводить​ в экселе, ибо​ того содержит ли​ — два числа​: 1. Вместо #ЗНАЧ!​ таких не будет.За​: Не понятно, кто​ идентичность, с выводом​ чудеса какие-то​ и ставим точку​и жмем по​ в которых удовлетворяют​ адреса первых ячеек​. В нашем случае​ числовые данные, так​ результатов​
​ и В абсолютно​ как формулу массива,​ от программирования я​
​ таблица исходное значение​ совершенно одинаковые всюду​

CyberForum.ru

Сравнение массивов (сравнение макросом)

​ что должно получиться​​ счет этого происходит​ формирует эти комбинации.​ информационного сообщения о​Фдуч1985​ с запятой (​ иконке​ заданному условию. Синтаксис​ диапазонов сравниваемых столбцов,​ получилось такое выражение:​ и текстовые. Недостаток​

​’3.один перебор n​​ различные данные.​
​ т.е. после ввода​ довольно далёк​ или нет.​ глазом (и в​ в М5 при​ отсев.​Если вручную, то​ проделанной работе -​: Условно да, первые​;​​«Вставить функцию»​​ данного оператора имеет​

​ разделенные знаком «не​​—(A2:A7<>D2:D7)​ данного способа состоит​ значений массива в​

​Roody_woody​​ формулы в ячейку​БМВ​​ Locals тоже) кодом​ К5 равным 97?​megavlom​ я сгенерил список​ то есть: Результат​
​ три. Там и​
​). Затем выделяем в​
​.​ такой вид:​ равно» (​Щелкаем по кнопке​ в том, что​
​ словарь​
​: Простите, ошибся. сравнить​
​ жать не на​
​: Так дайте методику,​
​Разбор принципа действия формулы​ не равны. Но​
​2. И почему?​: Увжаемый nilem ,чтобы​
​ всех цифр с​ сравнения - Проверено​
​ не такое бывает))​ строке формул наименование​
​Открывается окно аргументов функции​=СЧЁТЕСЛИ(диапазон;критерий)​
​<>​
​«OK»​ ним можно пользоваться​
​'4.m проверок массива​ A c J​
​Enter​
​ тут помогут воплотить.​ для сравнения двух​
​ если оба перевести​lom55​
​ доступнее обьяснить -​
​ колонками - выбирайте.​ листов 8, Найдено​
​ikki​
​«ИНДЕКС»​
​ЕСЛИ​
​Аргумент​
​). Только перед данным​
​.​
​ только в том​
​ на наличие в​YouGreed​, а на​ Просто по ссылке​ столбцов разных таблиц:​ в string -​: 1) 36.​ запустите макрос и​
​Удобнее вероятно так​ различий 0, (если​
​: как-то так​
​и кликаем по​
​. Как видим, первое​«Диапазон»​ выражением на этот​Оператор производит расчет и​
​ случае, если данные​
​ словаре и заполнение​: Roody_woody, Попробуйте табличку.​
​Ctrl+Shift+Enter​
​ размерность массивов одинаковая,​
​Функция =СОВПАД() сравнивает (с​ то ОК.​
​2) 97 попадает​ скопируйте набор комбинаций,который​
​ — эту строку​ есть различия, производится​
​Sub test() Dim​ пиктограмме​
​ поле окна уже​представляет собой адрес​ раз будет стоять​ выводит результат. Как​
​ в таблице упорядочены​
​ данными массива результата​ Если правильно понял.​
​.​ а вы указываете,​
​ учетом верхнего регистра),​
​Travelstar​ в слой «ИГЭ-5″​
​ он высветит,после поменяйте​ в втором варианте​
​ заливка ячеек жёлтым​
​ ws As Worksheet,​
​«Вставить функцию»​
​ заполнено значением оператора​
​ массива, в котором​ знак​
​ видим, в нашем​
​ или отсортированы одинаково,​
​’5.выгрузка результатов (тут​
​200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ЕСЛИОШИБКА(ВПР(ЗАМЕНИТЬ($A1;1;2;82);$J$1:$M$15;СТОЛБЕЦ(B1););»»)​
​Если с отличающимися ячейками​
​ что у вас​
​ являются ли два​
​: Спасибо за подсказки,​

​ — номер 3​​ местами массивы1 и2​ напишите так:​ цветом или красным)…​
​ a, g, f,​.​​СЧЁТЕСЛИ​

​ производится подсчет совпадающих​​«=»​ случае результат равен​ синхронизированы и имеют​ нет предварительной очистки​

​akobir​​ надо что сделать,​ разная. Вот еще​
​ значения идентичными или​ но не помогло…​ во второй таблице.​ и опять запустите​
​If Len(x.Value) Then​Если есть что​ dict As Object,​После этого открывается небольшое​
​. Но нам нужно​ значений.​. Кроме того, ко​ числу​
​ равное количество строчек.​ диапазона)​
​:​ то подойдет другой​ вариант, и тоже​
​ нет. Если да,​
​Вот несколько файлов​
​ Он в расчет​
​ макрос.Сравните результаты первого​
​ oDict1.Item(x.Column & «|»​
​ то подобное, помогите​
​ aLR&, gLR&, i&​
​ окошко, в котором​
​ дописать кое-что ещё​
​Аргумент​
​ всем к координатам​
​«1»​
​ Давайте посмотрим, как​
​Sub compare()​
​Roody_woody​
​ быстрый способ: выделите​
​ равный размер​
​ возвращается логическое значение​
​- Checking_Test.xlsm -​
​ не берется.Над ним​
​ и второго массивов​
​ & x.Value) =​
​ пожалуйста найти.​
​ On Error Resume​
​ нужно определить, ссылочный​
​ в это поле.​
​«Критерий»​
​ столбцов в данной​
​, то есть, это​
​ использовать данный способ​

​Dim a(), b(),​​, У вас в​ оба столбца и​Akazotik​ ИСТИНА. Учитывая тот​ программа​ в этой же​

​ ,они будут отличаться,а​​ x.Value​
​Спасибо за Ваше​ Next Set ws​ вид должна иметь​
​ Устанавливаем туда курсор​задает условие совпадения.​ формуле нужно применить​ означает, что в​ на практике на​

​ c(), i As​​ столбце J числа​ нажмите клавишу​: У меня разное​ факт что формула​- Проверяемый файл.xls​​ таблице находятся 2​
​ по идее должны​тогда список будет​ внимание и помощь!​ = ThisWorkbook.Worksheets(«Г‹ГЁГ±ГІ1») aLR​

​ функция​​ и к уже​ В нашем случае​ абсолютную адресацию. Для​

​ сравниваемых списках было​​ примере двух таблиц,​ Long, ii As​ сохранены как текст.​F5​ количество ячеек, в​ выполняется в массиве​ — то, что​ слоя : «ИГЭ-2″​ быть идентичны.​

​ с колонкой впереди.​​megavlom​ = ws.Cells(ws.Rows.Count, 1).End(xlUp).Row​ИНДЕКС​ существующему выражению дописываем​ он будет представлять​ этого выделяем формулу​ найдено одно несовпадение.​ размещенных на одном​ Long​ Для начала нужно​, затем в открывшемся​ одном случае 192,​ функция СОВПАД сравнивает​ будет когда-то проверяться​ и «ИГЭ-3» с​nilem​Если выгрузить на​

​: Добрый вечер.Есть три​​ gLR = ws.Cells(ws.Rows.Count,​или предназначенный для​«=0»​ собой координаты конкретных​ курсором и трижды​​ Если бы списки​ листе.​
​’1.​ их преобразовать в​ окне кнопку​

​ в другом 283,​​ значение в ячейке​ // пока пустой​ весом 17 и​: По всякому менял​ лист и отсортировать,​
​ массива с числами.Необходимо​ 7).End(xlUp).Row a =​ работы с массивами.​без кавычек.​ ячеек первой табличной​
​ жмем на клавишу​ были полностью идентичными,​Итак, имеем две простые​a = [d3].CurrentRegion.Value​

​ число. Я просто​​Выделить (Special)​ + имеются пустые.​ B1 с каждым​- Отчёт PCN.xls​ 19 соответственно.​ — одно и​ то получите​ сравнить данные в​ ws.Range(ws.[a2], ws.Cells(aLR, 3)).Value​ Нам нужен второй​После этого переходим к​ области.​F4​ то результат бы​ таблицы со списками​b = [f3].CurrentRegion.Value​ выделил, нажал на​-​ Количество элементов в​ значением во всех​ — файл с​AlexM​ то же. Только​1|0​ них и при​ g = ws.Range(ws.[g2],​ вариант. Он установлен​ полю​Выделяем первый элемент дополнительного​. Как видим, около​ был равен числу​

​ работников предприятия и​​’2.​ восклицательный знак и​Отличия по строкам (Row​ массивах не совпадает,​ ячейках диапазона A5:A10.​ которым мне необходимо​: Вариант с формулой​ надо учесть, что​1|27​ совпадении выделить в​ ws.Cells(gLR, 9)).Value ReDim​ по умолчанию, так​

​«Значение если истина»​​ столбца, в котором​ всех адресов столбцов​«0»​ их окладами. Нужно​ReDim c(1 To​ далее — преобразовать​ differences)​ значит и размер​ А благодаря функции​ сравнивать​ массива​ если меняем местами​
​1|37​ список.Если по отдельности​ f(1 To gLR​ что в данном​
​. Тут мы воспользуемся​

​ будет производиться подсчет​​ появился знак доллара,​.​

​ сравнить списки сотрудников​​ UBound(a), 1 To​ в число.​. В последних версиях​ их не может​ =ИЛИ() формула возвращает​- Отчёт Sat.xls​200?’200px’:»+(this.scrollHeight+5)+’px’);»>=СУММ((A$3:A$15=ТРАНСП(ЕСЛИ(H$7:H$15​ верхние таблички, то​1|46​ перебором каждый,это понятно,а​

excelworld.ru

Сравнение двух одномерных массивов с разным числом элементов

​ — 1, 1​​ окошке просто щелкаем​
​ ещё одной вложенной​ количества совпадений. Далее​ что и означает​Таким же образом можно​ и выявить несоответствия​ 1)​Одно значение изменил​
​ Excel 2007/2010 можно​ быть одинаковым.​ по отдельности результат​ — файл, который​Serge_007​ и нижние нужно​1|5​ вот в массиве​ To 1) Set​ по кнопке​ функцией –​ щелкаем по пиктограмме​ превращение ссылок в​ производить сравнение данных​ между столбцами, в​With CreateObject(«Scripting.Dictionary»)​ для проверки.​ также воспользоваться кнопкой​Akazotik​ вычислений функции =СОВПАД().​ необходимо сравнить с​
​: Алекс, а зачем​ поменять соответственно. Визуально​

​2|0​​ пока понимаю не​ dict = CreateObject(«Scripting.Dictionary»)​«OK»​СТРОКА​«Вставить функцию»​

​ абсолютные. Для нашего​​ в таблицах, которые​
​ которых размещены фамилии.​’3.​Смотрите файл.​Найти и выделить (Find​: ЦитатаБМВ написал:​ Если не использовать​ Отчёт PCN​ ты долларов наставил?​ — картинки УФ​2|31​ до конца.​ For i =​.​. Вписываем слово​.​ конкретного случая формула​ расположены на разных​Для этого нам понадобится​For i =​Roody_woody​ & Select) -​Так дайте методику,​ функцию ИЛИ, тогда​
​Алгоритм пока пишется,​ Формула ведь в​ должны совпадать в​2|8​kim​ 1 To UBound(a,​Запускается окно аргументов функции​«СТРОКА»​

​Происходит запуск​​ примет следующий вид:​ листах. Но в​ дополнительный столбец на​ 1 To UBound(b)​

​: Решение найдено.​​ Выделение группы ячеек​ тут помогут воплотить.​
​ формула будет возвращать​ это наработки.​ одной ячейке будет​​ каждой паре верхних​​3|0​: Добрый вечер!​ 1) dict.Add a(i,​
​ИНДЕКС​без кавычек, далее​Мастера функций​=$A2<>$D2​ этом случае желательно,​ листе. Вписываем туда​.Item(b(i, 1)) =​В G1 и​ (Go to Special)​ Собственно вот так​ только результат первого​Если будут у​Ещё вариант:​ и нижних табличек.​3|1​Вы не первый​ 1) & «|»​. Данный оператор предназначен​ открываем скобки и​

​. Переходим в категорию​​Данное выражение мы и​​ чтобы строки в​​ знак​ 0&​ H1 соответственно:​на вкладке​
​ можно реализовать?​ сравнения.​ кого-нибудь интересные замечания​

​200?’200px’:»+(this.scrollHeight+5)+’px’);»>=СУММ((A3:A15=ТРАНСП(ЕСЛИ(ПОИСКПОЗ(;K5-K7:K15)>СТРОКА(1:10);I7:I15)))*B3:B15)​​Теперь результат пишем​3|15​ день на форуме​ & a(i, 2)​
​ для вывода значения,​

​ указываем координаты первой​​«Статистические»​
​ записываем в вышеуказанное​ них были пронумерованы.​«=»​Next​200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ЕСЛИОШИБКА(ВПР($A1;$J:$M;4;0);ЕСЛИОШИБКА(ВПР($A1&»»;$J:$M;4;0);»—«))​Главная (Home)​АlехМ​Вот как можно применять​ буду признателен.​lom55​ в строку через​3|17​

​ и должны прекрасно​​ & «|» &​ которое расположено в​
​ ячейки с фамилией​

​. Находим в перечне​​ поле. После этого​ В остальном процедура​. Затем кликаем по​'4.​
​Код200?'200px':''+(this.scrollHeight+5)+'px');">=ЕСЛИОШИБКА(ВПР($A1;$J:$K;2;0);ЕСЛИОШИБКА(ВПР($A1&"";$J:$K;2;0);"--"))​​Excel выделит ячейки, отличающиеся​

​: Akazotik, а файл​​ сразу несколько таких​Travelstar​
​: Точно! Транспонировать же​ символ «|» -​3|5​

​ знать, что прикрепленный​​ a(i, 3), «»​ определенном массиве в​ во второй таблице,​ наименование​
​ щёлкаем по кнопке​ сравнения практически точно​
​ первому наименованию, которое​

excelworld.ru

Сравнение двумерных массивов (Макросы/Sub)

​For i =​​и протянуть вниз​
​ содержанием (по строкам).​ вы тут до​ формул на практике​: и ещё 2​
​ надо.)​
​ так, вроде, проще.​3|72​ файл-пример значительно ускорит​
​ Next For i​ указанной строке.​ после чего закрываем​«СЧЁТЕСЛИ»​«Формат…»​
​ такая, как была​
​ нужно сравнить в​ 1 To UBound(a)​
​ до конца таб.​ Затем их можно​
​ сих не выложили.​ при сравнении двух​
​ файла​Спасибо большое Вам​
​Проверьте.​3|8​ решение. Или Вам​ = 1 To​Как видим, поле​ скобки. Конкретно в​. После его выделения​
​.​ описана выше, кроме​ первом списке. Опять​If Not .exists(a(i,​Во вложении результат.​ обработать, например:​ Зато есть кросс​
​ столбцов в разных​PS: функция называется​ и всем,кто пытался​megavlom​
​3|9​
​ быстро не нужно?​
​ UBound(g, 1) If​
​«Номер строки»​
​ нашем случае в​

​ щелкаем по кнопке​Активируется окно​
​ того факта, что​ ставим символ​

​ 1)) Then ii​​Всем большое спасибо​залить цветом или как-то​ на другом форуме​ таблицах одновременно:​ Compare(arr1 as Variant,​ помочь.​
​: За внимание спасибо,проверить​4|0​ К тому же​ Not dict.exists(g(i, 1)​уже заполнено значениями​

​ поле​​«OK»​«Формат ячеек»​ при внесении формулы​«=»​ = ii +​ за помощь!​ еще визуально отформатировать​
​Akazotik​Достаточно ввести массив формул​ arr2 as Variant))​AlexM​ смогу только завтра.​4|1​
​ это является нарушением​ & «|» &​ функции​«Значение если истина»​.​. Идем во вкладку​ придется переключаться между​с клавиатуры. Далее​ 1: c(ii, 1)​Формулы нужно оформлять​очистить клавишей​: АlехМ,я не могу​ в одну ячейку​Hugo​
​: Когда файл отправил​megavlom​4|11​ 3 пункта​ g(i, 2) &​НАИМЕНЬШИЙ​получилось следующее выражение:​

​Происходит запуск окна аргументов​​«Заливка»​
​ листами. В нашем​ кликаем по первой​ = a(i, 1)​ тегами (кнопка fx)!​Delete​
​ выложить файл, т.к.​ (E2), потом скопировать​
​: Не, я отказываюсь​ понял что $​: Здравствуйте.Уважаемый nilem первое​4|15​правил форума​
​ «|» & g(i,​

​. От уже существующего​​СТРОКА(D2)​ оператора​. Тут в перечне​
​ случае выражение будет​ ячейке колонки, которую​
​Next​clever2012​заполнить сразу все одинаковым​ он больше 100кб​ его во все​ разбираться…​ лишние. Решил не​ решение более удачное..,при​4|46​

​…​​ 3)) Then f(i,​ там значения следует​
​Теперь оператор​
​СЧЁТЕСЛИ​ цветов останавливаем выбор​
​ иметь следующий вид:​ мы сравниваем, во​End With​: Здравствуйте! Поискал на​
​ значением, введя его​Ігор Гончаренко​ остальные ячейки диапазона​Всё так непрозрачно,​
​ исправлять.​ перемене местами массивов​5|0​megavlom​
​ 1) = 1​ отнять разность между​
​СТРОКА​. Как видим, наименования​ на цвете, которым​

​=B2=Лист2!B2​​ второй таблице. Получилось​’5.​
​ форуме нужный мне​ и нажав​: БМВ,​

​ E3:E8. Обратите внимание,​​ эта привязка к​Формула созданная совместными​
​ всё таки часть​5|12​: Извините,что не доглядел​ Next ws.Range(ws.[f2], ws.Cells(gLR,​ нумерацией листа Excel​будет сообщать функции​
​ полей в этом​ хотим окрашивать те​То есть, как видим,​ выражение следующего типа:​[h3].Resize(ii, 1) =​ ответ, не нашел.​Ctrl+Enter​а клянчить у​ что теперь мы​
​ активной в некий​ усилиями​ комбинаций меняется(так и​5|37​ отсутствие файла.Хотя с​

​ 6)).Value = f​​ и внутренней нумерацией​ЕСЛИ​ окне соответствуют названиям​ элементы, где данные​ перед координатами данных,​=A2=D2​
​ c​Есть два числовых​
​удалить все строки с​

​ автора «расскажите как​​ используем абсолютные адреса​ момент книге/листу… Ещё​

​200?’200px’:»+(this.scrollHeight+5)+’px’);»>=СУММ((A3:A15=ТРАНСП(ЕСЛИ(H7:H15​​ должно быть). Фильтрацию​
​5|44​
​ нашей связью...​ End Sub​
​ табличной области. Как​
​номер строки, в​
​ аргументов.​
​ не будут совпадать.​ которые расположены на​
​Хотя, конечно, в каждом​End Sub​ столбца - задача​
​ выделенными ячейками, используя​
​ считать, расскажите как​
​ ссылок на диапазон​ куча MISSING, ну​
​Travelstar​ этого я сделаю​5|7​
​Hugo​Фдуч1985​ видим, над табличными​
​ которой расположена конкретная​
​Устанавливаем курсор в поле​
​ Жмем на кнопку​

​ других листах, отличных​​ конкретном случае координаты​
​Hugo​ сравнить первый массив​ команду​ считать…» — это​ $A$2:$A$12 во втором​ да это меньшее…​

​: Доброго времени суток!​​ функциями листа.Ваше решение​5|74​
​: Не совсем понял,​: Круто! Хорошо работает!​

excelworld.ru

Как сравнить два столбца таблицы Excel на совпадения значений

​ значениями у нас​ фамилия, и в​«Диапазон»​«OK»​ от того, где​ будут отличаться, но​: Карен, чего-то врёт​ со вторым и​Главная — Удалить -​ не перебор?​ аргументе функции СОВПАД.​Покажите два файла,​Прошу помощи в​ меня устраивает,поэтому наверное​6|0​ как Вам нужен​ А можно еще​ только шапка. Это​ случае, когда условие,​. После этого, зажав​.​ выводится результат сравнения,​ суть останется одинаковой.​ фильтр — вот​ вывести те числа​ Удалить строки с​

Функция СОВПАД позволяет сравнить два столбца таблицы

​АlехМ,​Скачать формулу для сравнения​ напишите код открытия​ написании функции для​

​ тему можно закрыть.Спасибо.​6|31​ список, да и​

1. ​ заложить в код​ значит, что разница​ заданное в первом​
2. ​ левую кнопку мыши,​Вернувшись в окно создания​
3. ​ указывается номер листа​Щелкаем по клавише​ эти есть в​ в отдельную строку​ листа (Home -​а выложил бы​ двух столбцов таблиц​ этих конкретных файлов,​ сравнения двух двумерных​lom55​

​6|7​ это вероятно не​ изменение площади в​ составляет одну строку.​ поле, будет выполняться,​ выделяем все значения​ правила форматирования, жмем​

​ и восклицательный знак.​

​Enter​ обоих списках:​ либо столбец, которых​

​ Delete — Delete​ автор файл, что​ на совпадение​ определения диапазонов, передачу​ массивов размерностью .​: Доброго времени суток.​megavlom​ главное — поэтому​ районе 3% или​ Поэтому дописываем в​ функция​ столбца с фамилиями​ на кнопку​Сравнение можно произвести при​, чтобы получить результаты​1-38/2012​ нет во втором​ Rows)​ измениться бы? Вы​В первом аргументе должны​ диапазонов на сравнение​200?’200px’:»+(this.scrollHeight+5)+’px’);»>​Сравнительно недавно начал​

​: Список -просто вывод​ пока вывожу в​ это космос получится?​ поле​ЕСЛИ​ второй таблицы. Как​

​«OK»​ помощи инструмента выделения​ сравнения. Как видим,​1-52/2012​ массиве.​и т.д.​ знаете как посчитать​ быть относительные адреса​ — вот тогда​Function Compare(arr1 As​ осваивать excel и​

​ всех совпадающих в​ окно отладки (можно​ikki​

​«Номер строки»​будет выводить этот​ видим, координаты тут​.​ групп ячеек. С​

exceltable.com

Сравнение двух массивов чисел в эксель

​ при сравнении первых​​1-65/2012​Помогите кто чем​Если списки разного размера​ «схожесть» двух массивов?​ ссылок на ячейки​ можно посмотреть что​ Variant, arr2 As​ в поисках решения​ 3 массивах комбинаций.К​
​ на лист/массив/строку выводить):​: и где у​
​значение​ номер в ячейку.​ же попадают в​После автоматического перемещения в​ его помощью также​ ячеек обоих списков​1-114/2012​
​ может!!!​ и не отсортированы​
​ дайте мне ссылку​ (как и в​ где как сравнивается​ Variant)​ своей задачи набрел​ сожалению проверить макрос​200?’200px’:»+(this.scrollHeight+5)+’px’);»>Option Explicit​ вас площадь? я​«-1»​

​ Жмем на кнопку​​ указанное поле. Но​ окно​

​ можно сравнивать только​​ программа указала показатель​1-117/2012​

​Заранее выражаю благодарность​​ (элементы идут в​ на раздел математики​ предыдущем примере).​ или нет.​’ массивы типа​ на ваш прекрасный​

​ и отписаться смогу​​Sub tt()​ не телепат, сорри​

​без кавычек.​​«OK»​ для наших целей​«Диспетчера правил»​ синхронизированные и упорядоченные​«ИСТИНА»​

​1-109/2012​​ откликнувшимся на проблему!​ разном порядке), то​
​ «массивы и схожести»​Akazotik​Я так и​ Variant — хранят​

​ форум.) В поиске​​ только второго числа.​Dim a, b,​это будет​В поле​.​ следует сделать данный​щелкаем по кнопке​ списки. Кроме того,​, что означает совпадение​1-84/2012​k61​ придется идти другим​ я почитаю и​: Приветствую всех. Возникла​
​ не смог ничего​

​ диапазоны значений -​​ решения не нашел.​Hugo​ c, oDict1 As​совершенно​«Массив»​Как видим, первый результат​ адрес абсолютным. Для​«OK»​ в этом случае​ данных.​У меня недавно​: Sub wwww()​ путем.​

​ тоже буду знать.​​ проблема с сравнением​ запустить — какие​ каждый по 2​Столкнулся я со​: Хорошо.​ Object, oDict2 As​другой код.​

​указываем адрес диапазона​​ отображается, как​ этого выделяем данные​и в нем.​
​ списки должны располагаться​Теперь нам нужно провести​ было 11111 -​Dim x As​Самое простое и быстрое​БМВ​

​ массивов в экселе.​​ файлы открывать, что​ столбца​ следующей трудностью :​Первый вариант -​

​ Object, oDict3 As​​нужен другой подход​ значений второй таблицы.​«ЛОЖЬ»​ координаты в поле​Теперь во второй таблице​ рядом друг с​ аналогичную операцию и​ тоже пару постов​ Range​

​ решение: включить цветовое​​: Ігор Гончаренко,​ Суть вопроса: есть​ нажимать…​Sheets(1).Activate​ есть массив из​ как раз выводит​ Object​ — и я​ При этом все​. Это означает, что​

​ и жмем на​​ элементы, которые имеют​
​ другом на одном​ с остальными ячейками​ разлогиненным писал :)​Dim y As​

​ выделение отличий, используя​​Я надеялся что​ два массива разной​SkyPro​Dim i As​ N элементов и​

​ список всех совпадающих.​​Dim x​ пока даже не​ координаты делаем абсолютными,​

​ значение не удовлетворяет​​ клавишу​
​ данные, несовпадающие с​ листе.​ обеих таблиц в​Hugo​ Range​
​ условное форматирование. Выделите​
​ ТС поймет что​ длины с числами.​: В месте, где​ Long​ массив из M​Второй вариант -​a = [a3:f16]​ определился, какой именно.​ то есть, ставим​ условиям оператора​

​F4​​ соответствующими значениями первой​
​Выделяем сравниваемые массивы. Переходим​ тех колонках, которые​: И кстати -​s1 = 1​ оба диапазона с​ проблема не с​ Требуется найти меру​ у вас функция​Dim k As​ элементов ,содержащий все​ список с признаком​b = [a19:f32]​кстати, скорее всего,​ перед ними знак​ЕСЛИ​.​ табличной области, будут​ во вкладку​
​ мы сравниваем. Но​

​ числовыми массивами тут​​ ‘столб со значениями​ данными и выберите​
​ Excel, а с​ похожести данных массивов​ сравнения, выведите на​ Long​ значения первого массива​ колонок. В разных​c = [a35:f48]​ будет работать на​ доллара уже ранее​. То есть, первая​Как видим, ссылка приняла​

​ выделены выбранным цветом.​​«Главная»​ можно просто провести​ и «не пахнет»!​ которые ищем​

​ на вкладке​​ математическим аппаратом. В​ в процентах.​ лист два массива​

​For i =​​ (где M>N). Нужно​

​ колонках могут быть​​Set oDict1 =​ порядок медленнее.​ описанным нами способом.​ фамилия присутствует в​
​ абсолютную форму, что​Существует ещё один способ​

​. Далее щелкаем по​​ копирование формулы, что​Guest​s2 = 3​Главная — Условное форматирование​ конце концов первая​Сслыка на пример​ и покажите их​ LBound(arr1) To UBound(arr1)​​ их сравнить и​ одинаковые числа.​
​ CreateObject(«scripting.dictionary»)​Фдуч1985​Жмем на кнопку​ обоих списках.​ характеризуется наличием знаков​ применения условного форматирования​

planetaexcel.ru

Поиск отличий в двух списках

​ значку​ позволит существенно сэкономить​: Да, действительно врёт.​ ‘столб в котором​ — Правила выделения​ ссылка худо-бедно дает​ подобной задачи:​ здесь.​For k =​ получить массив из​

Вариант 1. Синхронные списки

​nilem​Set oDict2 =​: Ой Площадь обозначается​«OK»​С помощью маркера заполнения,​ доллара.​ для выполнения поставленной​«Найти и выделить»​ время. Особенно данный​ :(​ ищем​ ячеек — Повторяющиеся​​ понимание что имеется​​Была попытка решить​​Вывести можно вот​​ LBound(arr2) To UBound(arr2)​

​ M элементов (нулей​: Вариант с УФ,​

​ CreateObject(«scripting.dictionary»)​

​ в 3-м столбце)​.​

​ уже привычным способом​Затем переходим к полю​ задачи. Как и​, который располагается на​ фактор важен при​Скрытые фильтром не​s3 = 4​ значения (Home -​ в виду, но​ данную задачу через​​ так:​​If arr1(i, 1)​​ и единиц в​​ доп. табличками, формулами​

​Set oDict3 =​ikki​После вывода результат на​ копируем выражение оператора​«Критерий»​ предыдущие варианты, он​​ ленте в блоке​​ сравнивании списков с​ проверяет?​​ ‘столб в который​​ Conditional formatting -​​ доп условие, о​ пропорции, но в​​200?’200px’:»+(this.scrollHeight+5)+’px’);»>[a1].resize(ubound(имя_массива), 2) = имя_массива​ = arr2(k, 2)​ местах совпадения значений​​ и макросом (хотел​ CreateObject(«scripting.dictionary»)​: давайте на всякий​ экран протягиваем функцию​​ЕСЛИ​​, установив туда курсор.​

​ требует расположения обоих​ инструментов​ большим количеством строк.​У нас эвакуация​

• ​ записываем НЕ найденные​ Highlight cell rules​
• ​ разной размерности, делает​​ связи с наличием​
• ​Travelstar​ Then ‘ тут​ елементов — все​​ еще сводную прикрутить​
• ​For Each x​ случай уточним задачу?​ с помощью маркера​​на весь столбец.​ Щелкаем по первому​ сравниваемых областей на​«Редактирование»​Процедуру копирования легче всего​
• ​ по случаю окончания​

Вариант 2. Перемешанные списки

​Columns(s3).Clear​ — Duplicate Values)​ её бесполезной. Беда​ пустых ячеек и​: Вот и значения​ сравниваю первую колонку​

​ это в одной​ — не придумалось​ In a​надо:​ заполнения до конца​ Как видим, по​ элементу с фамилиями​​ одном листе, но​. Открывается список, в​ выполнить при помощи​ рабочего дня. Завтра​Set x =​:​ в том, что​​ разной длины массивов​

​ массивов​​ первого массива и​​ строке). Желательно с​)​If Len(x) Then​для каждой записи​​ столбца вниз. Как​​ двум позициям, которые​

​ в первом табличном​ в отличие от​ котором следует выбрать​ маркера заполнения. Наводим​ разберу….​ Range(Cells(1, s1), Cells(Cells(Rows.Count,​Если выбрать опцию​ при наличии методики​

​ идея невозымела успеха.​nilem​​ вторую колонку второго​ ​ помощью формул, так​​Сортировка по 6-ти​​ oDict1.Item(x) = x​​ из «правой» таблицы​ видим, обе фамилии,​ присутствуют во второй​ диапазоне. В данном​

​ ранее описанных способов,​ позицию​ курсор на правый​

​Подпись: Карен.​ s1).End(xlUp).Row, s1))​Повторяющиеся​ задача становится, скорее​Заранее спасибо за​

​: например:​ массива​ как на освоение​

planetaexcel.ru

Сравнение массивов (Формулы/Formulas)

​ столбцам почему-то не​​Next​
​ найти в «левой»​ которые присутствуют во​ таблице, но отсутствуют​ случае оставляем ссылку​ условие синхронизации или​«Выделение группы ячеек…»​ нижний угол ячейки,​clever2012​Set y =​, то Excel выделит​ всего ,элементарной для​ помощь.​200?’200px’:»+(this.scrollHeight+5)+’px’);»>Sub ertert()​If arr1(i, 2)​
​ макросов пока нет​ идет, сделал по​For Each x​ таблице хотя бы​ второй таблице, но​ в первой, формула​ относительной. После того,​ сортировки данных не​.​ где мы получили​: Спасибо за суету​ Range(Cells(1, s2), Cells(Cells(Rows.Count,​ цветом совпадения в​ кодирования , а​Ccылки на файлик​Dim x, i&,​
​ = arr2(k, 1)​ времени да и​

​ 3-м.​​ In b​ одну в точности​
​ отсутствуют в первой,​ выдает номера строк.​ как она отобразилась​ будет являться обязательным,​Кроме того, в нужное​ показатель​ Карен. Буду ждать​ s2).End(xlUp).Row, s2))​ наших списках, если​ может и нет.​ с массивами и​ s$​ Then ‘ если​ большой необходимости.​

​MCH​​If Len(x) Then​​ соответствующую ей по​​ выведены в отдельный​Отступаем от табличной области​ в поле, можно​

​ что выгодно отличает​​ нам окно выделения​«ИСТИНА»​

​ завтрашнего дня.​​i = 1​ опцию​
​P.S. Бессонница? :-)​

​ попытками сравнения (Файл​​x = Range(«A1»).CurrentRegion.Value​​ ввреху всё ОК,​​Свои старания прикрепляю​: Ну и мой​ oDict2.Item(x) = x​ первым двум полям​ диапазон.​ вправо и заполняем​ щелкать по кнопке​ данный вариант от​ группы ячеек можно​. При этом он​
​Hugo​For Each w​
​Уникальные​

​АlехМ​​ «Тон чистый», вкладка​
​With CreateObject(«Scripting.Dictionary»)​ то сравниваю вторую​
​ в файле.)​
​ вариант формулами (в​
​Next​ запись, причем значение​
​При сравнении диапазонов в​
​ колонку номерами по​«OK»​
​ ранее описанных.​ попасть и другим​

excelworld.ru

Сравнение двух числовых массивов.

​ черный крестик. Это​​ :)​
​If y.Find(w, LookAt:=xlWhole)​Цветовое выделение, однако, не​
​ нужно сравнивать.​ же на изначальные​
​For i =​ первую колонку второго…​: Если цифры в​
​megavlom​ In c​ отличаться не более​
​ использовать перечисленные выше​1​В элемент листа выводится​
​ нужно сравнить.​
​ особенно будет полезен​ и есть маркер​Fishka​
​ Is Nothing Then​ всегда удобно, особенно​На другом форуме​
​ массивы (Файлы «Фраза​
​ 2 To UBound(x)​Cells(i, 2).Interior.Color =​
​ ст-це 2 всегда​: Здравствуйте Уважаемые Форумчане.Спасибо​
​If Len(x) Then​ чем на 3%.​
​ способы, исключая те​
​. Количество номеров должно​
​ результат. Он равен​
​Выполняем переход во вкладку​
​ тем пользователям, у​

​ заполнения. Жмем левую​​: clever2012​
​Cells(i, s3) =​ для больших таблиц.​
​ файл есть, и​ 1″ и «Фраза​
​.Item(x(i, 1) &​ 255 ‘ ну​ совпадают с номером​
​ за Ваш труд​ oDict3.Item(x) = x​если ни одной​
​ варианты, где требуется​ совпадать с количеством​ числу​
​ под названием​
​ которых установлена версия​ кнопку мыши и​В надстройке есть​
​ w​
​ Также, если внутри​ в файле есть,​
​ 2″, вкладки Тон)​
​ x(i, 2)) =​
​ и если совпало​ буквы, то вспомогательная​ и помощь.Вам nilem​
​Next​
​ такой записи не​ размещение обоих табличных​
​ строк во второй​«1»​
​«Главная»​ программы ранее Excel​
​ тянем курсор вниз​
​ «Сравнение диапазонов» (раздел​
​i = i + 1​
​ самих списков элементы​
​ как автор написал,​
​Akazotik​

​ i​​ — что-то делаю..​ таблица не нужна.​ особое спасибо.Вы догадались​For Each x​ найдено, то напротив​ областей на одном​

​ сравниваемой таблице. Чтобы​​. Это означает, что​. Делаем щелчок по​ 2007, так как​ на количество строчек​
​ 2). Ваши столбцы​End If​ могут повторяться, то​ формулы сравнения массивов.​
​: надо составить функцию​Next i​End If​

​lom55​​ ,что мне надо.Сейчас​

​ In oDict1.Items​​ искомой записи слева​
​ листе. Главное условие​ ускорить процедуру нумерации,​
​ в перечне имен​ кнопке​ метод через кнопку​ в сравниваемых табличных​

​ которые желаем сравнить,​​ все результаты сравнения​ за совет. Тема​: Sub wwww()​

​СЧЁТЕСЛИ​​ величину разницы некого​Akazotik​
​ 2) & x(i,​Данные сравниваются, но​
​ Числа в столбце​megavlom​End If​ikki​
​ файлов одновременно. Для​

​ колонки с номерами​​ табличного массива, встречается​. В следующем меню​ и жмем на​

​ данных в двух​​ закрыта​Dim x As​

​Next​​: проверяйте​ версий Excel 2013​ и щелкаем по​

planetaexcel.ru

​ один раз.​

Поиск отличий в двух списках

Типовая задача, возникающая периодически перед каждым пользователем Excel — сравнить между собой два диапазона с данными и найти различия между ними. Способ решения, в данном случае, определяется типом исходных данных.

Вариант 1. Синхронные списки

Если списки синхронизированы (отсортированы), то все делается весьма несложно, т.к. надо, по сути, сравнить значения в соседних ячейках каждой строки. Как самый простой вариант — используем формулу для сравнения значений, выдающую на выходе логические значения ИСТИНА (TRUE) или ЛОЖЬ (FALSE):

Число несовпадений можно посчитать формулой:

=СУММПРОИЗВ(—(A2:A20<>B2:B20))

или в английском варианте =SUMPRODUCT(—(A2:A20<>B2:B20))

Если в результате получаем ноль — списки идентичны. В противном случае — в них есть различия. Формулу надо вводить как формулу массива, т.е. после ввода формулы в ячейку жать не на Enter, а на Ctrl+Shift+Enter.

Если с отличающимися ячейками надо что сделать, то подойдет другой быстрый способ: выделите оба столбца и нажмите клавишу F5, затем в открывшемся окне кнопку Выделить (Special) — Отличия по строкам (Row differences). В последних версиях Excel 2007/2010 можно также воспользоваться кнопкой Найти и выделить (Find & Select) — Выделение группы ячеек (Go to Special) на вкладке Главная (Home)

Excel выделит ячейки, отличающиеся содержанием (по строкам). Затем их можно обработать, например:

• залить цветом или как-то еще визуально отформатировать
• очистить клавишей Delete
• заполнить сразу все одинаковым значением, введя его и нажав Ctrl+Enter
• удалить все строки с выделенными ячейками, используя команду Главная — Удалить — Удалить строки с листа (Home — Delete — Delete Rows)
• и т.д.

Вариант 2. Перемешанные списки

Если списки разного размера и не отсортированы (элементы идут в разном порядке), то придется идти другим путем.

Самое простое и быстрое решение: включить цветовое выделение отличий, используя условное форматирование. Выделите оба диапазона с данными и выберите на вкладке Главная — Условное форматирование — Правила выделения ячеек — Повторяющиеся значения (Home — Conditional formatting — Highlight cell rules — Duplicate Values):

Если выбрать опцию Повторяющиеся, то Excel выделит цветом совпадения в наших списках, если опцию Уникальные — различия.

Цветовое выделение, однако, не всегда удобно, особенно для больших таблиц. Также, если внутри самих списков элементы могут повторяться, то этот способ не подойдет.

В качестве альтернативы можно использовать функцию СЧЁТЕСЛИ (COUNTIF) из категории Статистические, которая подсчитывает сколько раз каждый элемент из второго списка встречался в первом:

Полученный в результате ноль и говорит об отличиях.

И, наконец, «высший пилотаж» — можно вывести отличия отдельным списком. Для этого придется использовать формулу массива:

Выглядит страшновато, но свою работу выполняет отлично

Ссылки по теме

• Выделение дубликатов в списке цветом
• Сравнение двух диапазонов с помощью надстройки PLEX
• Запрет ввода повторяющихся значений

Довольно часто перед пользователями Excel стоит задача сравнения двух таблиц или списков для выявления в них отличий или недостающих элементов. Каждый юзер справляется с этой задачей по своему, но чаще всего на решение указанного вопроса тратится довольно большое количество времени, так как далеко не все подходы к данной проблеме являются рациональными. В то же время, существует несколько проверенных алгоритмов действий, которые позволят сравнить списки или табличные массивы в довольно сжатые сроки с минимальной затратой усилий. Давайте подробно рассмотрим данные варианты.

Читайте также: Сравнение двух документов в MS Word

Способы сравнения

Существует довольно много способов сравнения табличных областей в Excel, но все их можно разделить на три большие группы:

сравнение списков, находящихся на одном листе;

сравнение таблиц, расположенных на разных листах;

сравнение табличных диапазонов в разных файлах.

Именно исходя из этой классификации, прежде всего, подбираются методы сравнения, а также определяются конкретные действия и алгоритмы для выполнения задачи. Например, при проведении сравнения в разных книгах требуется одновременно открыть два файла Excel.

Кроме того, следует сказать, что сравнивать табличные области имеет смысл только тогда, когда они имеют похожую структуру.

Способ 1: простая формула

Самый простой способ сравнения данных в двух таблицах – это использование простой формулы равенства. Если данные совпадают, то она выдает показатель ИСТИНА, а если нет, то – ЛОЖЬ. Сравнивать можно, как числовые данные, так и текстовые. Недостаток данного способа состоит в том, что ним можно пользоваться только в том случае, если данные в таблице упорядочены или отсортированы одинаково, синхронизированы и имеют равное количество строчек. Давайте посмотрим, как использовать данный способ на практике на примере двух таблиц, размещенных на одном листе.

Итак, имеем две простые таблицы со списками работников предприятия и их окладами. Нужно сравнить списки сотрудников и выявить несоответствия между столбцами, в которых размещены фамилии.

1. Для этого нам понадобится дополнительный столбец на листе. Вписываем туда знак «=». Затем кликаем по первому наименованию, которое нужно сравнить в первом списке. Опять ставим символ «=» с клавиатуры. Далее кликаем по первой ячейке колонки, которую мы сравниваем, во второй таблице. Получилось выражение следующего типа:

   =A2=D2

   

   Хотя, конечно, в каждом конкретном случае координаты будут отличаться, но суть останется одинаковой.

2. Щелкаем по клавише Enter, чтобы получить результаты сравнения. Как видим, при сравнении первых ячеек обоих списков программа указала показатель «ИСТИНА», что означает совпадение данных.



3. Теперь нам нужно провести аналогичную операцию и с остальными ячейками обеих таблиц в тех колонках, которые мы сравниваем. Но можно просто провести копирование формулы, что позволит существенно сэкономить время. Особенно данный фактор важен при сравнивании списков с большим количеством строк.

   Процедуру копирования легче всего выполнить при помощи маркера заполнения. Наводим курсор на правый нижний угол ячейки, где мы получили показатель «ИСТИНА». При этом он должен преобразоваться в черный крестик. Это и есть маркер заполнения. Жмем левую кнопку мыши и тянем курсор вниз на количество строчек в сравниваемых табличных массивах.



4. Как видим, теперь в дополнительном столбце отобразились все результаты сравнения данных в двух колонках табличных массивов. В нашем случае не совпали данные только в одной строке. При их сравнении формула выдала результат «ЛОЖЬ». По всем остальным строчкам, как видим, формула сравнения выдала показатель «ИСТИНА».



5. Кроме того, существует возможность с помощью специальной формулы подсчитать количество несовпадений. Для этого выделяем тот элемент листа, куда оно будет выводиться. Затем щелкаем по значку «Вставить функцию».





6. В окне Мастера функций в группе операторов «Математические» выделяем наименование СУММПРОИЗВ. Щелкаем по кнопке «OK».



7. Активируется окно аргументов функции СУММПРОИЗВ, главной задачей которой является вычисление суммы произведений выделенного диапазона. Но данную функцию можно использовать и для наших целей. Синтаксис у неё довольно простой:

   =СУММПРОИЗВ(массив1;массив2;…)

   Всего в качестве аргументов можно использовать адреса до 255 массивов. Но в нашем случае мы будем использовать всего два массива, к тому же, как один аргумент.

   Ставим курсор в поле «Массив1» и выделяем на листе сравниваемый диапазон данных в первой области. После этого в поле ставим знак «не равно» (<>) и выделяем сравниваемый диапазон второй области. Далее обворачиваем полученное выражение скобками, перед которыми ставим два знака «-». В нашем случае получилось такое выражение:

   --(A2:A7<>D2:D7)

   Щелкаем по кнопке «OK».



8. Оператор производит расчет и выводит результат. Как видим, в нашем случае результат равен числу «1», то есть, это означает, что в сравниваемых списках было найдено одно несовпадение. Если бы списки были полностью идентичными, то результат бы был равен числу «0».

Таким же образом можно производить сравнение данных в таблицах, которые расположены на разных листах. Но в этом случае желательно, чтобы строки в них были пронумерованы. В остальном процедура сравнения практически точно такая, как была описана выше, кроме того факта, что при внесении формулы придется переключаться между листами. В нашем случае выражение будет иметь следующий вид:

=B2=Лист2!B2

То есть, как видим, перед координатами данных, которые расположены на других листах, отличных от того, где выводится результат сравнения, указывается номер листа и восклицательный знак.

Способ 2: выделение групп ячеек

Сравнение можно произвести при помощи инструмента выделения групп ячеек. С его помощью также можно сравнивать только синхронизированные и упорядоченные списки. Кроме того, в этом случае списки должны располагаться рядом друг с другом на одном листе.

1. Выделяем сравниваемые массивы. Переходим во вкладку «Главная». Далее щелкаем по значку «Найти и выделить», который располагается на ленте в блоке инструментов «Редактирование». Открывается список, в котором следует выбрать позицию «Выделение группы ячеек…».
   

   Кроме того, в нужное нам окно выделения группы ячеек можно попасть и другим способом. Данный вариант особенно будет полезен тем пользователям, у которых установлена версия программы ранее Excel 2007, так как метод через кнопку «Найти и выделить» эти приложения не поддерживают. Выделяем массивы, которые желаем сравнить, и жмем на клавишу F5.

2. Активируется небольшое окошко перехода. Щелкаем по кнопке «Выделить…» в его нижнем левом углу.



3. После этого, какой бы из двух вышеперечисленных вариантов вы не избрали, запускается окно выделения групп ячеек. Устанавливаем переключатель в позицию «Выделить по строкам». Жмем по кнопке «OK».



4. Как видим, после этого несовпадающие значения строк будут подсвечены отличающимся оттенком. Кроме того, как можно судить из содержимого строки формул, программа сделает активной одну из ячеек, находящуюся в указанных не совпавших строках.

Способ 3: условное форматирование

Произвести сравнение можно, применив метод условного форматирования. Как и в предыдущем способе, сравниваемые области должны находиться на одном рабочем листе Excel и быть синхронизированными между собой.

1. Прежде всего, выбираем, какую табличную область будем считать основной, а в какой искать отличия. Последнее давайте будем делать во второй таблице. Поэтому выделяем список работников, находящийся в ней. Переместившись на вкладку «Главная», щелкаем по кнопке «Условное форматирование», которая имеет месторасположение на ленте в блоке «Стили». Из выпадающего списка переходим по пункту «Управление правилами».



2. Активируется окошко диспетчера правил. Жмем в нем на кнопку «Создать правило».



3. В запустившемся окне производим выбор позиции «Использовать формулу». В поле «Форматировать ячейки» записываем формулу, содержащую адреса первых ячеек диапазонов сравниваемых столбцов, разделенные знаком «не равно» (<>). Только перед данным выражением на этот раз будет стоять знак «=». Кроме того, ко всем к координатам столбцов в данной формуле нужно применить абсолютную адресацию. Для этого выделяем формулу курсором и трижды жмем на клавишу F4. Как видим, около всех адресов столбцов появился знак доллара, что и означает превращение ссылок в абсолютные. Для нашего конкретного случая формула примет следующий вид:

   =$A2<>$D2

   Данное выражение мы и записываем в вышеуказанное поле. После этого щёлкаем по кнопке «Формат…».



4. Активируется окно «Формат ячеек». Идем во вкладку «Заливка». Тут в перечне цветов останавливаем выбор на цвете, которым хотим окрашивать те элементы, где данные не будут совпадать. Жмем на кнопку «OK».



5. Вернувшись в окно создания правила форматирования, жмем на кнопку «OK».



6. После автоматического перемещения в окно «Диспетчера правил» щелкаем по кнопке «OK» и в нем.



7. Теперь во второй таблице элементы, которые имеют данные, несовпадающие с соответствующими значениями первой табличной области, будут выделены выбранным цветом.

Существует ещё один способ применения условного форматирования для выполнения поставленной задачи. Как и предыдущие варианты, он требует расположения обоих сравниваемых областей на одном листе, но в отличие от ранее описанных способов, условие синхронизации или сортировки данных не будет являться обязательным, что выгодно отличает данный вариант от ранее описанных.

1. Производим выделение областей, которые нужно сравнить.



2. Выполняем переход во вкладку под названием «Главная». Делаем щелчок по кнопке «Условное форматирование». В активировавшемся списке выбираем позицию «Правила выделения ячеек». В следующем меню делаем выбор позиции «Повторяющиеся значения».



3. Запускается окно настройки выделения повторяющихся значений. Если вы все сделали правильно, то в данном окне остается только нажать на кнопку «OK». Хотя при желании в соответствующем поле данного окошка можно выбрать другой цвет выделения.



4. После того, как мы произведем указанное действие, все повторяющиеся элементы будут выделены выбранным цветом. Те элементы, которые не совпадают, останутся окрашенными в свой изначальный цвет (по умолчанию белый). Таким образом, можно сразу визуально увидеть, в чем отличие между массивами.

При желании можно, наоборот, окрасить несовпадающие элементы, а те показатели, которые совпадают, оставить с заливкой прежним цветом. При этом алгоритм действий практически тот же, но в окне настройки выделения повторяющихся значений в первом поле вместо параметра «Повторяющиеся» следует выбрать параметр «Уникальные». После этого нажать на кнопку «OK».

Таким образом, будут выделены именно те показатели, которые не совпадают.

Урок: Условное форматирование в Экселе

Способ 4: комплексная формула

Также сравнить данные можно при помощи сложной формулы, основой которой является функция СЧЁТЕСЛИ. С помощью данного инструмента можно произвести подсчет того, сколько каждый элемент из выбранного столбца второй таблицы повторяется в первой.

Оператор СЧЁТЕСЛИ относится к статистической группе функций. Его задачей является подсчет количества ячеек, значения в которых удовлетворяют заданному условию. Синтаксис данного оператора имеет такой вид:

=СЧЁТЕСЛИ(диапазон;критерий)

Аргумент «Диапазон» представляет собой адрес массива, в котором производится подсчет совпадающих значений.

Аргумент «Критерий» задает условие совпадения. В нашем случае он будет представлять собой координаты конкретных ячеек первой табличной области.

1. Выделяем первый элемент дополнительного столбца, в котором будет производиться подсчет количества совпадений. Далее щелкаем по пиктограмме «Вставить функцию».



2. Происходит запуск Мастера функций. Переходим в категорию «Статистические». Находим в перечне наименование «СЧЁТЕСЛИ». После его выделения щелкаем по кнопке «OK».



3. Происходит запуск окна аргументов оператора СЧЁТЕСЛИ. Как видим, наименования полей в этом окне соответствуют названиям аргументов.

   Устанавливаем курсор в поле «Диапазон». После этого, зажав левую кнопку мыши, выделяем все значения столбца с фамилиями второй таблицы. Как видим, координаты тут же попадают в указанное поле. Но для наших целей следует сделать данный адрес абсолютным. Для этого выделяем данные координаты в поле и жмем на клавишу F4.

   Как видим, ссылка приняла абсолютную форму, что характеризуется наличием знаков доллара.

   Затем переходим к полю «Критерий», установив туда курсор. Щелкаем по первому элементу с фамилиями в первом табличном диапазоне. В данном случае оставляем ссылку относительной. После того, как она отобразилась в поле, можно щелкать по кнопке «OK».



4. В элемент листа выводится результат. Он равен числу «1». Это означает, что в перечне имен второй таблицы фамилия «Гринев В. П.», которая является первой в списке первого табличного массива, встречается один раз.



5. Теперь нам нужно создать подобное выражение и для всех других элементов первой таблицы. Для этого выполним копирование, воспользовавшись маркером заполнения, как это мы уже делали прежде. Ставим курсор в нижнюю правую часть элемента листа, который содержит функцию СЧЁТЕСЛИ, и после преобразования его в маркер заполнения зажимаем левую кнопку мыши и тянем курсор вниз.



6. Как видим, программа произвела вычисление совпадений, сравнив каждую ячейку первой таблицы с данными, которые расположены во втором табличном диапазоне. В четырех случаях результат вышел «1», а в двух случаях – «0». То есть, программа не смогла отыскать во второй таблице два значения, которые имеются в первом табличном массиве.

Конечно, данное выражение для того, чтобы сравнить табличные показатели, можно применять и в существующем виде, но есть возможность его усовершенствовать.

Сделаем так, чтобы те значения, которые имеются во второй таблице, но отсутствуют в первой, выводились отдельным списком.

1. Прежде всего, немного переработаем нашу формулу СЧЁТЕСЛИ, а именно сделаем её одним из аргументов оператора ЕСЛИ. Для этого выделяем первую ячейку, в которой расположен оператор СЧЁТЕСЛИ. В строке формул перед ней дописываем выражение «ЕСЛИ» без кавычек и открываем скобку. Далее, чтобы нам легче было работать, выделяем в строке формул значение «ЕСЛИ» и жмем по иконке «Вставить функцию».



2. Открывается окно аргументов функции ЕСЛИ. Как видим, первое поле окна уже заполнено значением оператора СЧЁТЕСЛИ. Но нам нужно дописать кое-что ещё в это поле. Устанавливаем туда курсор и к уже существующему выражению дописываем «=0» без кавычек.

   После этого переходим к полю «Значение если истина». Тут мы воспользуемся ещё одной вложенной функцией – СТРОКА. Вписываем слово «СТРОКА» без кавычек, далее открываем скобки и указываем координаты первой ячейки с фамилией во второй таблице, после чего закрываем скобки. Конкретно в нашем случае в поле «Значение если истина» получилось следующее выражение:

   СТРОКА(D2)

   Теперь оператор СТРОКА будет сообщать функции ЕСЛИ номер строки, в которой расположена конкретная фамилия, и в случае, когда условие, заданное в первом поле, будет выполняться, функция ЕСЛИ будет выводить этот номер в ячейку. Жмем на кнопку «OK».



3. Как видим, первый результат отображается, как «ЛОЖЬ». Это означает, что значение не удовлетворяет условиям оператора ЕСЛИ. То есть, первая фамилия присутствует в обоих списках.



4. С помощью маркера заполнения, уже привычным способом копируем выражение оператора ЕСЛИ на весь столбец. Как видим, по двум позициям, которые присутствуют во второй таблице, но отсутствуют в первой, формула выдает номера строк.



5. Отступаем от табличной области вправо и заполняем колонку номерами по порядку, начиная от 1. Количество номеров должно совпадать с количеством строк во второй сравниваемой таблице. Чтобы ускорить процедуру нумерации, можно также воспользоваться маркером заполнения.



6. После этого выделяем первую ячейку справа от колонки с номерами и щелкаем по значку «Вставить функцию».



7. Открывается Мастер функций. Переходим в категорию «Статистические» и производим выбор наименования «НАИМЕНЬШИЙ». Щелкаем по кнопке «OK».



8. Функция НАИМЕНЬШИЙ, окно аргументов которой было раскрыто, предназначена для вывода указанного по счету наименьшего значения.

   В поле «Массив» следует указать координаты диапазона дополнительного столбца «Количество совпадений», который мы ранее преобразовали с помощью функции ЕСЛИ. Делаем все ссылки абсолютными.

   В поле «K» указывается, какое по счету наименьшее значение нужно вывести. Тут указываем координаты первой ячейки столбца с нумерацией, который мы недавно добавили. Адрес оставляем относительным. Щелкаем по кнопке «OK».



9. Оператор выводит результат – число 3. Именно оно наименьшее из нумерации несовпадающих строк табличных массивов. С помощью маркера заполнения копируем формулу до самого низа.



10. Теперь, зная номера строк несовпадающих элементов, мы можем вставить в ячейку и их значения с помощью функции ИНДЕКС. Выделяем первый элемент листа, содержащий формулу НАИМЕНЬШИЙ. После этого переходим в строку формул и перед наименованием «НАИМЕНЬШИЙ» дописываем название «ИНДЕКС» без кавычек, тут же открываем скобку и ставим точку с запятой (;). Затем выделяем в строке формул наименование «ИНДЕКС» и кликаем по пиктограмме «Вставить функцию».



11. После этого открывается небольшое окошко, в котором нужно определить, ссылочный вид должна иметь функция ИНДЕКС или предназначенный для работы с массивами. Нам нужен второй вариант. Он установлен по умолчанию, так что в данном окошке просто щелкаем по кнопке «OK».



12. Запускается окно аргументов функции ИНДЕКС. Данный оператор предназначен для вывода значения, которое расположено в определенном массиве в указанной строке.

    Как видим, поле «Номер строки» уже заполнено значениями функции НАИМЕНЬШИЙ. От уже существующего там значения следует отнять разность между нумерацией листа Excel и внутренней нумерацией табличной области. Как видим, над табличными значениями у нас только шапка. Это значит, что разница составляет одну строку. Поэтому дописываем в поле «Номер строки» значение «-1» без кавычек.

    В поле «Массив» указываем адрес диапазона значений второй таблицы. При этом все координаты делаем абсолютными, то есть, ставим перед ними знак доллара уже ранее описанным нами способом.

    Жмем на кнопку «OK».



13. После вывода результат на экран протягиваем функцию с помощью маркера заполнения до конца столбца вниз. Как видим, обе фамилии, которые присутствуют во второй таблице, но отсутствуют в первой, выведены в отдельный диапазон.

Способ 5: сравнение массивов в разных книгах

При сравнении диапазонов в разных книгах можно использовать перечисленные выше способы, исключая те варианты, где требуется размещение обоих табличных областей на одном листе. Главное условие для проведения процедуры сравнения в этом случае – это открытие окон обоих файлов одновременно. Для версий Excel 2013 и позже, а также для версий до Excel 2007 с выполнением этого условия нет никаких проблем. Но в Excel 2007 и Excel 2010 для того, чтобы открыть оба окна одновременно, требуется провести дополнительные манипуляции. Как это сделать рассказывается в отдельном уроке.

Урок: Как открыть Эксель в разных окнах

Как видим, существует целый ряд возможностей сравнить таблицы между собой. Какой именно вариант использовать зависит от того, где именно расположены табличные данные относительно друг друга (на одном листе, в разных книгах, на разных листах), а также от того, как именно пользователь желает, чтобы это сравнение выводилось на экран.

Сравнение диапазона ячеек с массивом

PIRATSTEN Дата: Пятница, 29.03.2019, 18:52 | Сообщение № 1 Группа: Пользователи Ранг: Новичок Сообщений: 10 Репутация: 0 ± Замечаний: 0% ± Excel 2016 Перво наперво приветствую всех участников форму. Уже лет 10 как ни на каких форумах не регистрировался. Увидев стандартную форму регистрации (Придумайте подпись), ностальгически улыбнулся. А теперь собственно вопрос. Имеется таблица из 7 столбцов. 1 столбец дата, остальные 6 набор чисел. Те набор из 6 цифр соответствует дате. Мне необходимо релизовать следующую задачу: Я ввожу 6 своих чисел и при помощи формулы Excel ищет совпадения с таблицей. Если такой набор чисел уже имеется, то вывести дату которой этот набор соответствует. Если такого набора нет, то вывести «Нет совпадений». Вроде звучит не сложно, но в работе пригождается только порстая арифметика, поэтому все позабылось. Заранее спасибо! прикладываю скриншот и сам файл. К сообщению приложен файл: 0794474.xls (76.5 Kb) Сообщение отредактировал PIRATSTEN — Пятница, 29.03.2019, 18:55   Ответить

Karataev Дата: Пятница, 29.03.2019, 19:02 | Сообщение № 2 Группа: Проверенные Ранг: Старожил Сообщений: 1330 Репутация: 528 ± Замечаний: 0% ± Excel Формула для «J6»: Код =СУММЕСЛИМН(I10:I225;J10:J225;J5;K10:K225;K5;L10:L225;L5;M10:M225;M5;N10:N225;N5;O10:O225;O5) И в ячейке «J6» сделан такой формат, чтобы вместо нуля показывать текст. Киви-кошелек: 9166309108   Ответить

PIRATSTEN Дата: Пятница, 29.03.2019, 19:51 | Сообщение № 3 Группа: Пользователи Ранг: Новичок Сообщений: 10 Репутация: 0 ± Замечаний: 0% ± Excel 2016 Karataev, низкий поклон. Спасли. Пара моментов. Сравнение вывод результата корректно работает только с датами у которых разделитель точка. Все бы ничего. Но эти разделители не меняются через Формат ячеек-Дата-Тип. Такое ощущение, что перед датой стоит какой-то невидимый знак (не порбел, даже не занимает позицию), т.к. если в строке формулы поставить курсор в начало строки с датой и нажать Backspase и Enter, то тип разделителя сменится на точки. Не сталкивались с такой порблемой? Возможно ли это массово исправить? Руками это оооочень долгий поцесс, т.к. в файле только часть таблицы. Основная же начинается аж с 97 года. UPD. Извиняюсь. Бэкспейс жать не обязательно. Достаточно поставить курсор в строку с формулой и нажать Enter. Тип даты примет нужный вид. Сообщение отредактировал PIRATSTEN — Пятница, 29.03.2019, 21:27   Ответить

Karataev Дата: Пятница, 29.03.2019, 20:06 | Сообщение № 4 Группа: Проверенные Ранг: Старожил Сообщений: 1330 Репутация: 528 ± Замечаний: 0% ± Excel Чтобы даты не преобразовывать, можно использовать такую формулу в «J6»: Код =ИНДЕКС(I:I;СУММПРОИЗВ(СТРОКА(I10:I225)*(J10:J225=J5)*(K10:K225=K5)*(L10:L225=L5)*(M10:M225=M5)*(N10:N225=N5)*(O10:O225=O5));1) В J5:N5 числа преобразуйте в числа. В ячейке видна зеленая стрелка, щелкните её — Преобразовать в число. Числовой формат тоже изменен. Но есть недостаток — если нет искомых данных, то будет подставляться текст из левой ячейки (I6). Даты можно так преобразовать: 1) выделите фрагмент; 2) Данные — Текст по столбцам — ничего не делая, щелкните «Готово». PS. Не цитируйте посты целиком. Чтобы ответить, не нужно щелкать кнопку «Цитата», а достаточно прокрутить страницу вниз и там будет поле для написания поста. Если хотите к кому-то обратиться, то просто напишите ник. Киви-кошелек: 9166309108 Сообщение отредактировал Karataev — Пятница, 29.03.2019, 21:21   Ответить

bmv98rus Дата: Пятница, 29.03.2019, 20:21 | Сообщение № 5 Группа: Друзья Ранг: Участник клуба Сообщений: 4009 Репутация: 760 ± Замечаний: 0% ± Excel 2013/2016 Код =—INDEX(I10:I225;MATCH(J5&»_»&K5&»_»&L5&»_»&M5&»_»&N5&»_»&O5;INDEX(J10:J225&»_»&K10:K225&»_»&L10:L225&»_»&M10:M225&»_»&N10:N225&»_»&O10:O225;);)) Замечательный Временно просто медведь , процентов на 20.   Ответить

_Boroda_ Дата: Пятница, 29.03.2019, 20:32 | Сообщение № 6 Группа: Модераторы Ранг: Местный житель Сообщений: 16618 Репутация: 6465 ± Замечаний: 0% ± 2003; 2007; 2010; 2013 RUS Еще вариант Код =ЕСЛИОШИБКА(-ПРОСМОТР(;-I10:I225/(6=МУМНОЖ(—(J5:O5=J10:O225);{1:1:1:1:1:1})));»Нет совпадений») Код =ЕСЛИОШИБКА(-ПРОСМОТР(;-I10:I225/(6=МУМНОЖ(—(J5:O5=J10:O225);ТРАНСП(J5:O5)^0)));»Нет совпадений») Вторая — формула массива. Вводится одновременным нажатием Контл Шифт Ентер Еще найденная дата автоматически подкрашивается Условным форматированием Скажи мне, кудесник, любимец ба’гов… Платная помощь: Boroda_Excel@mail.ru Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995   Ответить

PIRATSTEN Дата: Пятница, 29.03.2019, 20:59 | Сообщение № 7 Группа: Пользователи Ранг: Новичок Сообщений: 10 Репутация: 0 ± Замечаний: 0% ± Excel 2016 2 Karataev, спасибо. Решил порблему вторым способом. bmv98rus и _Boroda_, тоже спасибо. Буду ковыряться. ЗЫ отличный форум. И пользователи отзывчивые. Сообщение отредактировал PIRATSTEN — Пятница, 29.03.2019, 21:02   Ответить

bmv98rus Дата: Пятница, 29.03.2019, 21:02 | Сообщение № 8 Группа: Друзья Ранг: Участник клуба Сообщений: 4009 Репутация: 760 ± Замечаний: 0% ± Excel 2013/2016 Еще найденная дата автоматически подкрашивается Условным форматированием Александр. Сегодня акция — получи формулу и УФ в подарок? Замечательный Временно просто медведь , процентов на 20.   Ответить

_Boroda_ Дата: Пятница, 29.03.2019, 21:03 | Сообщение № 9 Группа: Модераторы Ранг: Местный житель Сообщений: 16618 Репутация: 6465 ± Замечаний: 0% ± 2003; 2007; 2010; 2013 RUS Это было вовсе не так уж обязательно. Вы что, каждый раз после загрузки данных так делать будете? Когда-нибудь забудете Формулы из постов 5 и 6 (и 4 тоже) все сами за Вас делают, посмотрите приложенные файлы-примеры оттуда *Акция. Ага. И второй день рулит ПРОСМОТР Скажи мне, кудесник, любимец ба’гов… Платная помощь: Boroda_Excel@mail.ru Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995   Ответить

bmv98rus Дата: Пятница, 29.03.2019, 21:09 | Сообщение № 10 Группа: Друзья Ранг: Участник клуба Сообщений: 4009 Репутация: 760 ± Замечаний: 0% ± Excel 2013/2016 это да, а вот MMULТ рулит ли? Вроде не торопливая она. Замечательный Временно просто медведь , процентов на 20.   Ответить

PIRATSTEN Дата: Пятница, 29.03.2019, 21:13 | Сообщение № 11 Группа: Пользователи Ранг: Новичок Сообщений: 10 Репутация: 0 ± Замечаний: 0% ± Excel 2016 2 all, ну раз общение пошло в треде, то вопрос. Если ответ положительный, то я офигею. Возможно ли мой файл экспортировать в exe и пользоваться им без установки дистрибутива Excel?   Ответить

_Boroda_ Дата: Пятница, 29.03.2019, 21:18 | Сообщение № 12 Группа: Модераторы Ранг: Местный житель Сообщений: 16618 Репутация: 6465 ± Замечаний: 0% ± 2003; 2007; 2010; 2013 RUS Это да, но 1. Таблица небольшая 2. Если добавится еще штук 20 столбцов, то формулы со сцепками или произведениями придется соответственно на 20 элементов увеличивать, а мою нет. Да и 6 произведений или сцепок массивов тоже скоростью не особо блещут, хотя, конечно, должны быть побыстрее МУМНОЖ. Но по-любому см. п.1 PIRATSTEN, п.4 Правил форума Скажи мне, кудесник, любимец ба’гов… Платная помощь: Boroda_Excel@mail.ru Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995   Ответить

PIRATSTEN Дата: Пятница, 29.03.2019, 21:30 | Сообщение № 13 Группа: Пользователи Ранг: Новичок Сообщений: 10 Репутация: 0 ± Замечаний: 0% ± Excel 2016 _Boroda_, усвоил. Вливаюсь.   Ответить

PIRATSTEN Дата: Среда, 03.04.2019, 17:50 | Сообщение № 14 Группа: Пользователи Ранг: Новичок Сообщений: 10 Репутация: 0 ± Замечаний: 0% ± Excel 2016 UP. Ребят, было неудобно снова писать сюда, т.к. Вы за меня мою задачу решили. Но оказывается я не верно понял человека. Мучаюсь третий день сам, но хоть убейте не могу реализовать. Набор из 6 цифр который набирается пользователем ищется в любом порядке. Т.е. важен сам набор значений в 6ке. Если такие числа встречались в любом порядке в опред дату, то выводить дату. Уже уши горят. Спотыкаюсь на мелочах, то формула как текст вводится, то формат сбивается. Каждую функцию приходится изучать и отрабатывать, вспоминаю лабораторные работы в политехе. Поможет кто? Файл тот же. Сообщение отредактировал PIRATSTEN — Среда, 03.04.2019, 17:51   Ответить

Светлый Дата: Среда, 03.04.2019, 20:16 | Сообщение № 15 Группа: Друзья Ранг: Старожил Сообщений: 1742 Репутация: 479 ± Замечаний: 0% ± Excel 2013, 2016 У меня только пока такой вариант. Формула массива: Код =МАКС((ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(«!»&J10:J225&»!»&K10:K225&»!»&L10:L225&»!»&M10:M225&»!»&N10:N225&»!»&O10:O225;»!»&J5;;1);»!»&K5;;1);»!»&L5;;1);»!»&M5;;1);»!»&N5;;1);»!»&O5;;1)=»»)*I10:I225) *При нескольких вариантах показывает самую позднюю дату. Программировать проще, чем писать стихи. Сообщение отредактировал Светлый — Среда, 03.04.2019, 20:19   Ответить

PIRATSTEN Дата: Среда, 03.04.2019, 20:23 | Сообщение № 16 Группа: Пользователи Ранг: Новичок Сообщений: 10 Репутация: 0 ± Замечаний: 0% ± Excel 2016 Фуууух. Почти победил. Остался последний шаг — вывести дату. Способ квадратно-гнездовой. Но хотя бы факт наличия комбинации проверяется. Не знаю как он будет работать с огромным массивом данных. Скрещиваю пальцы. Если интересно, то расскажу как я делаю. 1 шаг. Проверяю наличие первой позиции моего набора в первой строке статистики. Если это значение есть, то в первой ячейке напротив строки со статистикой я ставлю позицию на которой она нашлась. Если не нашлась, то ставится — 0. И так с каждым СВОИМ числом. Таким образом получаем набор значений от 0 до 5 (оказалось что и сравнивать нужно только первые 5). Формула такая: Цитата =ЕСЛИОШИБКА(ПОИСКПОЗ(J$5; $J10:$O10; 0);0) Далее я проверяю каждую строку из полученных наборов на наличие — 0. Если есть ноль, то ставится позиция на которой он находится, если не найден, то получается ошибка и при помощие ЕСЛИОШИБКА, мы исправляем на её на ноль. В итоге если у нас в какой-нибудь строчке есть ноль — Вуаля, совпадение с нашим набором есть. Формула: Цитата =ЕСЛИОШИБКА(ПОИСКПОЗ(0;P10:T10; 0);0) Ну и в конце концов в поле где нам нужно вывести результат проверки я ввожу формулу: Цитата =ЕСЛИ((ЕСЛИОШИБКА(ПОИСКПОЗ(0;U10:U225;0);»Нет совпадений»))<>»Нет совпадений»;»Найдено»;»Не найдено») Мне надо самому 5 раз её прочитать чтобы сориентироваться, но работает. ЕСЛИОШИБКА и ПОИСКПОЗ творят чудеса. Осталось только научиться выделять номер строки в которой встретился ноль, чтобы сформировать координаты на ячейку с датой и вывести её (механизм же примерно такой?). 2 Светлый, спасибо! Пока я сам печатал, Вы уже ответили. Попробую это всяко лучше моего. Правда несколько совпадений исключено. Точнее маловероятно. Но это делу не мешает. Светлый, Ошибка в значении и все тут. … Разобрался! Ctrl+Shift+Enter, массив же. И ячейку в формат даты нужно было перевести. Сначала не понял что за 45тыр на выходе. Спасибище! … Еще вопрос Как в случае если такого набора нет, вместо 00.01.1900 вывести «Совпадений нет». Лаконично в смысле. А то нагородить-то могу. К сообщению приложен файл: 333.xlsx (38.2 Kb) Сообщение отредактировал PIRATSTEN — Среда, 03.04.2019, 20:41   Ответить

Светлый Дата: Среда, 03.04.2019, 20:39 | Сообщение № 17 Группа: Друзья Ранг: Старожил Сообщений: 1742 Репутация: 479 ± Замечаний: 0% ± Excel 2013, 2016 Одновременное нажатие Ctrl+Shift+Enter *И формат ячейки можно задать: ДД.ММ.ГГ;;Нет совпадения Программировать проще, чем писать стихи. Сообщение отредактировал Светлый — Среда, 03.04.2019, 20:54   Ответить

PIRATSTEN Дата: Среда, 03.04.2019, 20:42 | Сообщение № 18 Группа: Пользователи Ранг: Новичок Сообщений: 10 Репутация: 0 ± Замечаний: 0% ± Excel 2016 Я чтобы не мультипостить в своем сообщении понаписал уже)   Ответить

Светлый Дата: Среда, 03.04.2019, 20:56 | Сообщение № 19 Группа: Друзья Ранг: Старожил Сообщений: 1742 Репутация: 479 ± Замечаний: 0% ± Excel 2013, 2016 вместо 00.01.1900 вывести «Совпадений нет» И формат ячейки можно задать: ДД.ММ.ГГ;;Нет совпадения Программировать проще, чем писать стихи.   Ответить

Светлый Дата: Среда, 03.04.2019, 21:42 | Сообщение № 20 Группа: Друзья Ранг: Старожил Сообщений: 1742 Репутация: 479 ± Замечаний: 0% ± Excel 2013, 2016 Нашёл ошибку в формуле. Новая формула: Код =МАКС((ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(«!»&J10:J225&»!!»&K10:K225&»!!»&L10:L225&»!!»&M10:M225&»!!»&N10:N225&»!!»&O10:O225&»!»;»!»&J5&»!»;;1);»!»&K5&»!»;;1);»!»&L5&»!»;;1);»!»&M5&»!»;;1);»!»&N5&»!»;;1);»!»&O5&»!»;;1)=»»)*I10:I225) Программировать проще, чем писать стихи.   Ответить

Умение сравнивать два массива данных в Excel часто пригождается для людей, обрабатывающих большие объемы данных и работающих с огромными таблицами. Например, сравнение может быть использовано в выявлении повторяющихся значений, корректности занесения данных или внесение данных в таблицу в срок. В статье ниже описаны несколько приемов сравнения двух столбцов с данными в Excel.

Использование условного оператора ЕСЛИ

Метод использования условного оператора ЕСЛИ отличается тем, что для сравнения двух столбцов используется только необходимая для сравнения часть, а не весь массив целиком. Ниже описаны шаги по реализации данного метода:

Разместите оба столбца для сравнения в колонках A и B рабочего листа.

В ячейке С2 введите следующую формулу =ЕСЛИ(ЕОШИБКА(ПОИСКПОЗ(A2;$B$2:$B$11;0));»»;A2) и протяните ее до ячейки С11. Данная формула последовательно просматривает наличие каждого элемента из столбца A в столбце B и возвращает значение элемента, если оно было найдено в столбце B.

Использование формулы подстановки ВПР

Принцип работы формулы аналогичен предыдущей методике, отличие заключается в использовании формулы ВПР, вместо ПОИСКПОЗ. Отличительной особенностью данного метода также является возможность сравнения двух горизонтальных массивов, используя формулу ГПР.

Чтобы сравнить два столбца с данными, находящимися в столбцах A и B(аналогично предыдущему способу), введите следующую формулу =ВПР(A2;$B$2:$B$11;1;0) в ячейку С2 и протяните ее до ячейки С11.

Данная формула просматривает каждый элемент из основного массива в сравниваемом массиве и возвращает его значение, если оно было найдено в столбце B. В противном случае Excelвернет ошибку #Н/Д.

Использование макроса VBA

Использование макросов для сравнения двух столбцов позволяет унифицировать процесс и сократить время на подготовку данных. Решение о том, какой результат сравнения необходимо отобразить, полностью зависит от вашей фантазии и навыков владения макросами. Ниже представлена методика, опубликованная на официальном сайте Микрософт.

Создайте новый модуль кода VBA и введите следующий код. О том, как писать макросы вы можете прочитать более подробно в статье написания VBA кода.

В данном коде переменной CompareRange присваивается диапазон со сравниваемым массивом. Затем запускается цикл, который просматривает каждый элемент в выделенном диапазоне и сравнивает его с каждым элементом сравниваемого диапазона. Если были найдены элементы с одинаковыми значениями, макрос заносит значение элемента в столбец С.

Чтобы использовать макрос, вернитесь на рабочий лист, выделите основной диапазон (в нашем случае, это ячейки A1:A11), нажмите сочетание клавиш Alt+F8. В появившемся диалоговом окне выберите макрос Find_Matches и щелкните кнопку выполнить.

После выполнения макроса, результат должен быть следующим:

Использование надстройки Inquire

С запуском версии 2013, Excel обзавелась интересной надстройкой под названием Inquire, которая позволяет сравнивать и анализировать два файла Excel. Если вам необходимо сравнить две версии одного и того же файла, например, после создания книги, ваши коллеги внесли кое-какие изменения, и вам нужно определить что именно они изменили, воспользуйтесь инструментом WorkbookCompare надстройки Inquire. Подробнее о том, как устанавливать, запускать и использовать надстройку читайте в моей предыдущей статье про надстройку Inquire.

Итог

Итак, мы рассмотрели несколько способов сравнения данных в Excel, которые помогут вам решить некоторые аналитические задачи и упростят работу в поиске повтояющихся (или уникальных) значений.