как сравнить два столбца, в первым 11 цифр, в другом 2 цифры
Franky09
Дата: Суббота, 27.05.2017, 16:24 |
Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация:
0
±
Замечаний:
0% ±
Excel 2007
как сравнить два столбца, в первым 11 цифр, в другом 2 цифры. Как сравнить второй столбец по последним числам первого, при совпадении оставлять белым, при не совпадении отмечать красным??? Заранее СПАСИБО!!! кому не лень напишите сразу макрос на это, СПАСИБО!
как сравнить два столбца, в первым 11 цифр, в другом 2 цифры. Как сравнить второй столбец по последним числам первого, при совпадении оставлять белым, при не совпадении отмечать красным??? Заранее СПАСИБО!!! кому не лень напишите сразу макрос на это, СПАСИБО! Franky09
Сообщение отредактировал Franky09 - Суббота, 27.05.2017, 17:05
Ответить
Сообщение как сравнить два столбца, в первым 11 цифр, в другом 2 цифры. Как сравнить второй столбец по последним числам первого, при совпадении оставлять белым, при не совпадении отмечать красным??? Заранее СПАСИБО!!! кому не лень напишите сразу макрос на это, СПАСИБО! Автор - Franky09 Дата добавления - 27.05.2017 в 16:24
Pelena
Дата: Суббота, 27.05.2017, 16:41 |
Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 19510
Репутация:
4620
±
Замечаний:
±
Excel 365 & Mac Excel
Дайте теме более конкретное название в соответствии с Правилами форума и приложите файл с примером для лучшего понимания проблемы. Обязательно макрос, Условное форматирование не подойдёт?
Дайте теме более конкретное название в соответствии с Правилами форума и приложите файл с примером для лучшего понимания проблемы. Обязательно макрос, Условное форматирование не подойдёт? Pelena
"Черт возьми, Холмс! Но как??!!" Ю-money 41001765434816
Ответить
Сообщение Дайте теме более конкретное название в соответствии с Правилами форума и приложите файл с примером для лучшего понимания проблемы. Обязательно макрос, Условное форматирование не подойдёт? Автор - Pelena Дата добавления - 27.05.2017 в 16:41
Manyasha
Дата: Суббота, 27.05.2017, 16:43 |
Сообщение № 3
Группа: Модераторы
Ранг: Старожил
Сообщений: 2198
Репутация:
902
±
Замечаний:
0% ±
Excel 2010, 2016
Franky09 , назовите тему более конкретно (можно взять кусок из 1-й строки Вашего поста). всегда 11? всегда 2? Пример в файле не помешал бы. [offtop]Не успела [/offtop]
Franky09 , назовите тему более конкретно (можно взять кусок из 1-й строки Вашего поста). всегда 11? всегда 2? Пример в файле не помешал бы. [offtop]Не успела [/offtop]Manyasha
ЯД: 410013299366744 WM: R193491431804
Ответить
Сообщение Franky09 , назовите тему более конкретно (можно взять кусок из 1-й строки Вашего поста). всегда 11? всегда 2? Пример в файле не помешал бы. [offtop]Не успела [/offtop]Автор - Manyasha Дата добавления - 27.05.2017 в 16:43
Franky09
Дата: Суббота, 27.05.2017, 16:57 |
Сообщение № 4
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация:
0
±
Замечаний:
0% ±
Excel 2007
Отредактировал!
Ответить
Сообщение Отредактировал! Автор - Franky09 Дата добавления - 27.05.2017 в 16:57
Pelena
Дата: Суббота, 27.05.2017, 16:59 |
Сообщение № 5
Группа: Админы
Ранг: Местный житель
Сообщений: 19510
Репутация:
4620
±
Замечаний:
±
Excel 365 & Mac Excel
Franky09 , файл с примером - это файл в формате Excel. Или ответ Вам тоже картинкой нарисовать?
Franky09 , файл с примером - это файл в формате Excel. Или ответ Вам тоже картинкой нарисовать?Pelena
"Черт возьми, Холмс! Но как??!!" Ю-money 41001765434816
Ответить
Сообщение Franky09 , файл с примером - это файл в формате Excel. Или ответ Вам тоже картинкой нарисовать?Автор - Pelena Дата добавления - 27.05.2017 в 16:59
Franky09
Дата: Суббота, 27.05.2017, 17:05 |
Сообщение № 6
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация:
0
±
Замечаний:
0% ±
Excel 2007
дубль 2
Ответить
Сообщение дубль 2 Автор - Franky09 Дата добавления - 27.05.2017 в 17:05
Manyasha
Дата: Суббота, 27.05.2017, 17:22 |
Сообщение № 7
Группа: Модераторы
Ранг: Старожил
Сообщений: 2198
Репутация:
902
±
Замечаний:
0% ±
Excel 2010, 2016
Franky09 , макрос (пример на 1-м листе): [vba]Код
Sub test() Dim cell, lr& lr = Cells(Rows.Count, 1).End(xlUp).Row For Each cell In Range("b2:b" & lr) If cell = CInt(Right(Cells(cell.Row, 1), 2)) Then cell.Interior.Color = vbRed Else cell.Interior.Color = xlNone End If Next cell End Sub
[/vba] формула для УФ (пример на 2-м листе)Код
=(B1=--ПРАВБ(A1;2))*(B1<>"")
Franky09 , макрос (пример на 1-м листе): [vba]Код
Sub test() Dim cell, lr& lr = Cells(Rows.Count, 1).End(xlUp).Row For Each cell In Range("b2:b" & lr) If cell = CInt(Right(Cells(cell.Row, 1), 2)) Then cell.Interior.Color = vbRed Else cell.Interior.Color = xlNone End If Next cell End Sub
[/vba] формула для УФ (пример на 2-м листе)Код
=(B1=--ПРАВБ(A1;2))*(B1<>"")
Manyasha
ЯД: 410013299366744 WM: R193491431804
Ответить
Сообщение Franky09 , макрос (пример на 1-м листе): [vba]Код
Sub test() Dim cell, lr& lr = Cells(Rows.Count, 1).End(xlUp).Row For Each cell In Range("b2:b" & lr) If cell = CInt(Right(Cells(cell.Row, 1), 2)) Then cell.Interior.Color = vbRed Else cell.Interior.Color = xlNone End If Next cell End Sub
[/vba] формула для УФ (пример на 2-м листе)Код
=(B1=--ПРАВБ(A1;2))*(B1<>"")
Автор - Manyasha Дата добавления - 27.05.2017 в 17:22
Franky09
Дата: Суббота, 27.05.2017, 17:39 |
Сообщение № 8
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация:
0
±
Замечаний:
0% ±
Excel 2007
Manyasha, огромное СПАСИБО!!!!!
Ответить
Сообщение Manyasha, огромное СПАСИБО!!!!! Автор - Franky09 Дата добавления - 27.05.2017 в 17:39