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

Вход

Регистрация

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

 

= Мир MS Excel/Удаление строк с русскими символами - Мир MS Excel

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

Excel 2010
Приветствую. Подскажите пожалуйста, как удалить строки, где встречается хоть один русский символ?
Исходный текст:
1. Text
16:04
Текст
Text (Text)

Результат:
1. Text
16:04
Text (Text)
 
Ответить
СообщениеПриветствую. Подскажите пожалуйста, как удалить строки, где встречается хоть один русский символ?
Исходный текст:
1. Text
16:04
Текст
Text (Text)

Результат:
1. Text
16:04
Text (Text)

Автор - Vladi
Дата добавления - 10.07.2019 в 16:06
bmv98rus Дата: Среда, 10.07.2019, 17:16 | Сообщение № 2
Группа: Проверенные
Ранг: Старожил
Сообщений: 2333
Репутация: 401 ±
Замечаний: 20% ±

Excel 2013/2016
в доп. столбце или УФ написать формулу, которая проставит признак, что есть РУС символ. Фильтр, удаление.


Замечательный медведь, процентов на 20.
 
Ответить
Сообщениев доп. столбце или УФ написать формулу, которая проставит признак, что есть РУС символ. Фильтр, удаление.

Автор - bmv98rus
Дата добавления - 10.07.2019 в 17:16
sboy Дата: Среда, 10.07.2019, 17:24 | Сообщение № 3
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2566
Репутация: 721 ±
Замечаний: 0% ±

Excel 2010
Добрый день.
Если данные в одном столбце, выделяем - запускаем
[vba]
Код
Sub del()
Set cl = Selection.Cells
With CreateObject("VBScript.RegExp")
    .Pattern = "[а-яА-ЯёЁ]"
    For i = Selection.Rows.Count To 1 Step -1
        If .test(cl(i)) Then cl(i).EntireRow.Delete
    Next
End With
End Sub
[/vba]


Яндекс: 410016850021169
 
Ответить
СообщениеДобрый день.
Если данные в одном столбце, выделяем - запускаем
[vba]
Код
Sub del()
Set cl = Selection.Cells
With CreateObject("VBScript.RegExp")
    .Pattern = "[а-яА-ЯёЁ]"
    For i = Selection.Rows.Count To 1 Step -1
        If .test(cl(i)) Then cl(i).EntireRow.Delete
    Next
End With
End Sub
[/vba]

Автор - sboy
Дата добавления - 10.07.2019 в 17:24
Vladi Дата: Среда, 10.07.2019, 18:14 | Сообщение № 4
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
sboy, спасибо большое
 
Ответить
Сообщениеsboy, спасибо большое

Автор - Vladi
Дата добавления - 10.07.2019 в 18:14
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Удаление строк с русскими символами (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

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