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

Вход

Регистрация

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

 

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

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Удаление строки по слову в ячейке (Макросы/Sub)
Удаление строки по слову в ячейке
Espada Дата: Среда, 12.11.2014, 08:50 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 121
Репутация: 0 ±
Замечаний: 40% ±

Здравствуйте, подскажите пожалуйста как сделать такую штуку) Есть таблица, в конце таблицы есть строка "Всего", как её удалить?
я пробовал сделать что-то типо проверки столбца B на наличие слова Всего, и удаление всей строки,но что-то пошло не так)
[vba]
Код
If Cells(x, 2).Value > "Всего" Then Rows(x, 4).Delete
[/vba]
К сообщению приложен файл: 5603393.xlsx (9.7 Kb)
 
Ответить
СообщениеЗдравствуйте, подскажите пожалуйста как сделать такую штуку) Есть таблица, в конце таблицы есть строка "Всего", как её удалить?
я пробовал сделать что-то типо проверки столбца B на наличие слова Всего, и удаление всей строки,но что-то пошло не так)
[vba]
Код
If Cells(x, 2).Value > "Всего" Then Rows(x, 4).Delete
[/vba]

Автор - Espada
Дата добавления - 12.11.2014 в 08:50
nilem Дата: Среда, 12.11.2014, 08:53 | Сообщение № 2
Группа: Авторы
Ранг: Старожил
Сообщений: 1613
Репутация: 563 ±
Замечаний: 0% ±

Excel 2013, 2016
[vba]
Код
Sub tt()
On Error Resume Next
ActiveSheet.UsedRange.Find("Âñåãî", LookIn:=xlValues, lookat:=xlWhole).EntireRow.Delete
End Sub
[/vba]
Âñåãî - это Всего :)


Яндекс.Деньги 4100159601573

Сообщение отредактировал nilem - Среда, 12.11.2014, 08:58
 
Ответить
Сообщение[vba]
Код
Sub tt()
On Error Resume Next
ActiveSheet.UsedRange.Find("Âñåãî", LookIn:=xlValues, lookat:=xlWhole).EntireRow.Delete
End Sub
[/vba]
Âñåãî - это Всего :)

Автор - nilem
Дата добавления - 12.11.2014 в 08:53
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Удаление строки по слову в ячейке (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

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