Как удалить все строки под определенной строкой или активной ячейкой в ​​Excel?

Эта статья может помочь вам в удалении всех строк ниже определенной строки или активной ячейки.

Удалите все строки ниже определенной строки в Excel с помощью Код VBA
Удалить все строки ниже активной ячейки в Excel с кодом VBA

Возможно, вас заинтересует in:

Легко удалить все пустые строки в выбранном диапазоне/листах или активном/всех листах в Excel

Как показано на скриншоте ниже, вы можете удалить все пустые строки в выбранном диапазоне, активном листе, выбранных листах или всех листах всего несколькими щелчками мыши в Excel.

Kutools for Excel включает более 300 удобных инструментов Excel. Бесплатная пробная версия без ограничений в течение 60 дней. Подробнее Загрузите бесплатную пробную версию сейчас

Вкладка Office Включите редактирование и просмотр с вкладками в Office и сделайте вашу работу намного проще .. .
Подробнее … Скачать бесплатно …
Kutools for Excel Решает большинство ваших проблем и увеличивает вашу производительность на 80%.
  • Повторное использование чего угодно: добавляйте наиболее часто используемые или сложные формулы, диаграммы и все остальное в избранное, и быстро использовать их в будущем.
  • Более 20 текстовых функций: извлечение числа из текстовой строки; Извлечь или удалить часть текстов; Преобразование чисел и валют в английские слова.
  • Инструменты слияния: несколько книг и листов в одну; Объединить несколько ячеек/строк/столбцов без потери данных; Объедините повторяющиеся строки и суммируйте.
  • Инструменты разделения: разделение данных на несколько листов в зависимости от значения; Из одной книги в несколько файлов Excel, PDF или CSV; Один столбец в несколько столбцов.
  • Вставить пропуск скрытых/отфильтрованных строк; Подсчет и сумма по цвету фона; Массовая отправка персонализированных писем нескольким получателям.
  • Суперфильтр: создавайте расширенные схемы фильтров и применяйте их к любым листам; Сортировать по неделе, дню, частоте и т. Д. Фильтр жирным шрифтом, формулами, комментарием …
  • Более 300 мощных функций; Работает с Office 2007-2019 и 365; Поддерживает все языки; Простое развертывание на вашем предприятии или в организации.
Подробнее … Бесплатная загрузка …

->


Удалить все строки ниже определенной строки в Excel с кодом VBA

Потрясающе! Использование эффективных вкладок в Excel, таких как Chrome, Firefox и Safari!
Сэкономьте 50% своего времени и сократите тысячи щелчков мышью каждый день!

->

Следующий код VBA поможет вам удалить все строки под определенной строкой в ​​Excel.

1. Одновременно нажмите клавиши Alt + F11 , чтобы открыть окно Microsoft Visual Basic для приложений .

2. В окне Microsoft Visual Basic для приложений нажмите Вставить > Модуль . Затем скопируйте и вставьте следующий код VBA в окно кода.

Код VBA: удалить все строки ниже определенных строк в Excel

Примечание . В коде VBA число 5 и Sheet1 указывают, что все строки под строкой 5 (включая строку 5) в Sheet1 будут удалены после запуска кода. Вы можете изменить их в зависимости от ваших потребностей.

3. Нажмите клавишу F5 , чтобы запустить код. Затем все строки под строкой 5 (включая строку 5) немедленно удаляются, как показано на скриншоте ниже.


Удалить все строки под активной ячейкой в ​​Excel с кодом VBA

Для удаления всех строк непосредственно под строкой активной ячейки в Excel вы можете попробовать следующий код VBA.

1. Выберите ячейку, из которой вы удалите все строки под ней, а затем одновременно нажмите клавиши Alt + F11 , чтобы открыть Microsoft Visual Basic для Окно приложений .

2. В окне Microsoft Visual Basic для приложений нажмите Вставить > Модуль . Затем скопируйте и вставьте следующий код VBA в окно кода.

Код VBA: удалите все строки ниже активной строки ячейки в Excel

3. Нажмите клавишу F5 , чтобы запустить код. Затем все строки ниже активной строки ячейки (включая строку активной ячейки) немедленно удаляются.


Статьи по теме:

  • Как удалить все строки, кроме первой строки заголовка в Excel?
  • Как удалить строки, если ячейка больше/меньше чем определенное значение в Excel?

Оцените статью
Frestage.ru
Добавить комментарий