Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Страницы: 1
RSS
Удаление последней объединенной строки
 
Есть таблица в Excel, в которой необходимо удалить последнюю строку(она объединенная). Подскажите как это сделать с помощью макроса.
Изменено: sdens2009 - 5 Апр 2018 17:25:36
 
Удаляем последнюю строку с данными в столбце A
Код
Cells(Cells(Rows.Count, 1).End(xlUp).Row, 1).MergeArea.EntireRow.Delete
Согласие есть продукт при полном непротивлении сторон.
 
OFF: Sanja, а MergeArea зачем тут, если не секрет?)) проверка на объединение? То есть, если последняя ячейка не объединённая - не удалит?
«Тот, кто несет фонарь, спотыкается чаще, чем тот, кто идет следом.»
Иоганн Пауль Фридрих Рихтер
 
Цитата
Jack Famous написал: То есть, если последняя ячейка не объединённая - не удалит?
Удалит. Но если ячейка объединена, то будет удалена только одна строка (та, которая с данными, Areas(1)), а я так понял, что нужно удалить все строки объединенной ячейки  
Изменено: Sanja - 5 Апр 2018 18:10:27
Согласие есть продукт при полном непротивлении сторон.
 
Sanja, благодарю  ;)
«Тот, кто несет фонарь, спотыкается чаще, чем тот, кто идет следом.»
Иоганн Пауль Фридрих Рихтер
Страницы: 1
Читают тему (гостей: 1)