Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Как сделать проверку на уникальность двух столбцов? - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Manyasha, SLAVICK, китин  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Как сделать проверку на уникальность двух столбцов? (Формулы/Formulas)
Как сделать проверку на уникальность двух столбцов?
regga5 Дата: Вторник, 08.01.2019, 04:54 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 11
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Здравствуйте.

Есть колонки B C.
В них пересекаются значения.

Как сохранить только те строки, где b=c?

Было


Стало


Спасибо!
К сообщению приложен файл: mkt.xlsx(10.6 Kb)
 
Ответить
СообщениеЗдравствуйте.

Есть колонки B C.
В них пересекаются значения.

Как сохранить только те строки, где b=c?

Было


Стало


Спасибо!

Автор - regga5
Дата добавления - 08.01.2019 в 04:54
Nic70y Дата: Вторник, 08.01.2019, 10:39 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 5317
Репутация: 1155 ±
Замечаний: 0% ±

Excel ru:home:13;10;03 work:10
[vba]
Код
Sub U_257()
    Application.ScreenUpdating = False
    u = Cells(Rows.Count, 1).End(xlUp).Row
    For i = u To 2 Step -1
        If Cells(i, 2) <> Cells(i, 3) Then
            Rows(i).Delete
        End If
    Next i
    Application.ScreenUpdating = True
End Sub
[/vba]
К сообщению приложен файл: mkt.xlsm(18.8 Kb)


ЯД(poison) 41001841029809
 
Ответить
Сообщение[vba]
Код
Sub U_257()
    Application.ScreenUpdating = False
    u = Cells(Rows.Count, 1).End(xlUp).Row
    For i = u To 2 Step -1
        If Cells(i, 2) <> Cells(i, 3) Then
            Rows(i).Delete
        End If
    Next i
    Application.ScreenUpdating = True
End Sub
[/vba]

Автор - Nic70y
Дата добавления - 08.01.2019 в 10:39
bmv98rus Дата: Вторник, 08.01.2019, 11:11 | Сообщение № 3
Группа: Проверенные
Ранг: Старожил
Сообщений: 2278
Репутация: 399 ±
Замечаний: 20% ±

Excel 2013/2016
Расширенный фильтр с условием формулой
Код
=B2=C2
К сообщению приложен файл: Copy_of_541.xlsx(11.2 Kb)


Замечательный медведь, процентов на 20.
 
Ответить
СообщениеРасширенный фильтр с условием формулой
Код
=B2=C2

Автор - bmv98rus
Дата добавления - 08.01.2019 в 11:11
regga5 Дата: Вторник, 08.01.2019, 13:32 | Сообщение № 4
Группа: Пользователи
Ранг: Новичок
Сообщений: 11
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Расширенный фильтр с условием формулой


Спасибо!
Sub U_257()
    Application.ScreenUpdating = False
    u = Cells(Rows.Count, 1).End(xlUp).Row
    For i = u To 2 Step -1
        If Cells(i, 2) <> Cells(i, 3) Then
            Rows(i).Delete
        End If
    Next i
    Application.ScreenUpdating = True
End Sub


Вам тоже!
 
Ответить
Сообщение
Расширенный фильтр с условием формулой


Спасибо!
Sub U_257()
    Application.ScreenUpdating = False
    u = Cells(Rows.Count, 1).End(xlUp).Row
    For i = u To 2 Step -1
        If Cells(i, 2) <> Cells(i, 3) Then
            Rows(i).Delete
        End If
    Next i
    Application.ScreenUpdating = True
End Sub


Вам тоже!

Автор - regga5
Дата добавления - 08.01.2019 в 13:32
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Как сделать проверку на уникальность двух столбцов? (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс цитирования
© 2010-2019 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!