Excel миллион строк как убрать

Как удалить строки из MS Excel, который имеет>65000 строк?

мой лист Excel, кажется, имеет 65555 строк, хотя мы используем только первые несколько сотен. Если я удаляю строки снизу, это ничего не меняет. Как я могу изменить его размер до того, что мы используем?

2 ответов

это иногда происходит, когда эти ячейки имеют форматирование, но нет данных

при сохранении книги Excel сохраняет только ту часть каждого листа, которая содержит данные или форматирование. Пустые ячейки могут содержать форматирование, в результате которого последняя ячейка в строке или столбце выходит за пределы диапазона ячеек, содержащих данные. В этом случае размер книги будет больше, чем необходимо, и может привести к более печатных страниц при печати листа или рабочая тетрадь.

наиболее распространенной причиной установки последней ячейки вне диапазона листа, который используется в настоящее время является чрезмерное форматирование. При форматировании целых строк и столбцов некоторые типы форматирования могут привести к тому, что последняя ячейка будет установлена в ячейку, расположенную значительно ниже или справа от фактического диапазона использовать.

при нажатии Ctrl + конец приносит вам далеко за пределы диапазона данных, то попробуйте сбросить последние ячейки. Есть 2 способа сделать это

вручную очистить форматирование

• выберите все столбцы справа от последнего столбца, содержащего данные, или выберите все строки под последняя строка, содержащая данные. Быстрый способ сделать это-нажать F5 и ввести F: IV для столбцов или 5:65536 для строк, предполагая, что F и 5-последний столбец/строка
• на вкладке Главная в группе редактирование щелкните стрелку рядом с кнопкой очистить и выберите Очистить Все.
• сохранить лист и закрыть его

пресс Alt + F11 открыть VBA

выберите Insert > Module, затем вставьте фрагмент

Источник

Как удалить много пустых строк в excel

Как удалить пустые строки в «Экселе»: несколько простых методов

​Смотрите также​ Настройка ленты (File​ пошаговые инструкции Вам​Application.CutCopyMode = False​ вариант со скрытием​Сжал в rar-архив​ не так, нудно​ сохраняться, ничего не​ всем по порядку:​ и их будет​ пропустив этапы по​ что в некоторых​ строки не содержащие​ есть таблица с​ в разделе операций​ сначала необходимо использовать​ строку удаления. Но​

Как удалить пустые строки в «Экселе» двумя простейшими методами?

​Всем пользователям, которые работают​ — Options -​ либо я, либо​Range(Cells(1, 1), Cells(lAntR,​ областей.​ — 20Кб. Скрыть​ и малоперспективно. Поэтому​ меняется, неиспользуемая область​Снова выделите всю таблицу,​ легче выделить и​ вызову контекстного меню.​ случаях совсем недопустимо.​ данных и удаляем​ какими-то значениями, в​ с ячейками выбирается​ вставку пустого столбца​ такая методика применима​

​ с электронными таблицами​ Customize Ribbon)​ любой из планетян​ iAntK)).Copy​Всем спасибо за​ неиспользуемые строки можно,​ и прошу: заголовок​ остается, скроллер не​ в которой находятся​ удалить, используя способ,​ Для этого просто​ В этой статье​ их.​ которой есть полностью​ кнопка удаления.​ со сквозной нумерацией.​ только в том​ в офисном редакторе​.​ дадут. Это не​

​Workbooks.Add​ помощь )​ но это не​ таблицы, несколько строк​ изменятся.​ нужные вам данные​ который был приведен​ выделите ненужные строки​ пойдет речь о​Другим способом выделения пустых​ пустые строки.​Вот, собственно, и все​ После удаления строк​ случае, если ячейки​ Excel, очень часто​В открывшемся окне редактора​ сложно. Попробуйте.​sFil2 = ActiveWorkbook.Name​Михаил С.​ решает две проблемы:​ данных и подвал(это​Guest​ и непосредственно пустые​

Как в «Экселе» удалить пустые строки с помощью сортировки?

​ самым первым.​ и нажмите сочетание​ том, как в​ ячеек является использование​Приведем методы, которые используются​ простейшие методы, при​ снова производите упорядочивание​ располагаются подряд.​

​ приходится убирать пустые​ Visual Basic выберите​KuklP​ActiveSheet.Name = sArk​: Сохраненный в формате​ скроллинга и размера.​ там где подписи​: Что значит -​ строки.​В Excel удалить повторяющиеся​ клавиш «CTRL+-«.​ Excel удалить пустые​ инструмента Выделение группы​ при удалении пустых​ помощи которых можно​ по пронумерованному столбцу.​Как удалить пустые строки​ ячейки, находящиеся в​ в меню​

Удаление строк с использованием фильтра

​: 🙂 Это одно​ActiveSheet.Paste​ 2010, файл весит​да у вас​ начальников). От этого​ «В ручную не​Перейдите во вкладку «Главная»​ строки, которые пустые,​Также есть альтернатива. Вы​ строки. Будет представлено​ ячеек.​

​ строк. Зачем нужно​ произвести удаление пустых​Решить вопрос того, как​ в «Экселе», если​ строках, чтобы они​Insert — Module​ и то же.:-)​Application.CutCopyMode = False​ 180 КБ, Но​ лист волшебный удалите​ можно будет плясать.​

Выделение групп ячеек

​ удаляется». ​ и нажмите по​ можно при помощи​ можете после выделения​ четыре способа, которые​выделяем диапазон​ удалять пустые строки​ строк буквально в​ удалить пустые строки​

​ пустые поля чередуются​ не загромождали рабочее​и в появившийся​Alex_ST​For n =​ если его опять​ его а данные​ А так, все​Вариант (как один​ «Найти и выделить».​ фильтра. Много не​ строк перейти во​ помогут вам это​А2:C17​ можно прочитать в​

Вместо послесловия

​ пару кликов. Опять​ в «Экселе», можно​ с данными? В​ пространство. Сейчас будет​ пустой модуль скопируйте​: Продолжение темы про​ 1 To lAntR​ сохранять в 2003,​ вставьте на новый​ только гадают.​ из многих): после​В меню, которое появится,​ разглагольствуя, перейдем непосредственно​ вкладку «Главная» и​ сделать. Советуется дочитать​;​ статье Советы по​ же, нужно помнить​ и при помощи​ этом случае вопрос​ рассмотрено, как в​ и вставьте следующие​ фитнес для файлов​Rows(n).RowHeight = aR(n)​ то 1,43 МБ​KuklP​KuklP​ проделанных манипуляций по​ вам необходимо нажать​ к самой инструкции:​ там на панели​ статью до финала,​выбираем пункт меню Главная/​ построению таблиц.​ и том, что​

​ простого фильтра. Устанавливают​

Удаляем в MS EXCEL пустые строки в таблице

​ решается другим способом.​ таблице «Эксель» удалить​ строки:​ Серёга-KuklP перенёс в​Next n​KuklP​: Ну вот, пока​: Я вообще-то имел​ очистке/удалению обязательно сразу​ на строку «Выделение​

​Изначально вам необходимо выделить​ инструментов из выпадающего​ чтобы в конце​ Редактирование/ Найти и​Самым простым способом удаления​

​ в некоторых ячейках​ его путем выделения​ Для этого следует​ пустые строки. Некоторые​Sub DeleteEmptyRows() LastRow​ форум Серёги-Serge007 в​For n =​

Сортировка

​: Может еще вот​ я шушукался в​ ввиду файл сВашей​ же жмем Ctrl+Home​ группы ячеек».​​ область вашей таблицы.​​ списка «Удалить» выбрать​ принять для себя​ выделить/ Выделение группы​ пустых строк является​ может находиться скрытый​ столбца, группы столбцов​

​ зажать клавишу Ctrl,​ решения пригодятся и​ = ActiveSheet.UsedRange.Row -​ топик «Файл распух​ 1 To iAntK​ это?​ оффсайте R Dmitry​ таблицей в 2003​ и затем Ctrl+S!​В появившемся меню, вам​ Для этого, зажав​

​ пункт «Удалить строки​ решение, каким способом​ ячеек…,​ сортировка таблицы: выделяем​ текст. А сами​ или всей таблицы.​ а затем, удерживая​ в других ситуациях.​ 1 + ActiveSheet.UsedRange.Rows.Count​

Фильтр

​ до нелогичных размеров»​Columns(n).ColumnWidth = aK(n)​Sub ReduceSize()​ уже успел.​ Экселе сохраненный. И​Z.​ нужно установить переключатель​ левую кнопку мыши​ с листа», что​ пользоваться, так как​

Выделение группы ячеек

​выберите пункт пустые ячейки​ диапазон, в котором​ пустые ячейки могут​ Кроме того, применяют​

• ​ ее, выделить каждую​​ Например, при аналогичных​​ ‘определяем размеры таблицы​
• ​ ( )​Next n​Dim lAntR As​Вот мой вариант(«да​

• ​ на «пустые ячейки»​ в левом верхнем​ также довольно удобно.​
• ​ они в достаточной​ в разделе Выделить;​ содержится таблица (​

​ быть зависимыми при​ команду «Фильтр» в​ строку, подлежащую удалению.​ действиях со столбцами​ Application.ScreenUpdating = False​Во многих случаях пустые​Application.DisplayAlerts = False​ Long​ у вас лист​ кб. размером(в соответствии​: Евгений может, настало​ и нажать кнопку​ ее углу, перетащите​Первый способ, как в​ степени отличаются друг​далее нажимаем маленькую стрелочку​А2:C17​

​ ссылке на них​
​ разделе сортировки.​ После этого в​ или отдельными ячейками.​ For r =​ строки на листе​Workbooks(sFil2).SaveAs sKat &​

Четыре способа, как в Excel удалить пустые строки

​Dim iAntK As​ волшебный удалите его​ с правилами форума).​ время выложить пример​ «ОК».​ ее в нижний​ Excel удалить пустые​ от друга.​ в меню Главная/​), затем вызываем команду​ в формулах. Если​Теперь остается нажать на​ меню правого клика​Для начала стоит сказать,​ LastRow To 1​ представляют собой проблему.​ «» & «(2)»​ Integer​ а данные вставьте​ Еще раз с​ на десяток строк?​Теперь все пустые строки​

Простое удаление

​ правый.​ строки, мы разобрали.​Для начала разберемся, как​ Ячейки/ Удалить;​ меню Данные/ Сортировка​ произвести их удаление,​ сам фильтр, отобразить​ выбираете соответствующую операцию.​ что при проведении​

​ Step -1 ‘проходим​ Например, если ваша​ & sFil1​

1. ​Dim aR() As​ на новый») таки​ уважением, Сергей.​
2. ​ На форуме почти​ выделены и вы​Далее перейдите во вкладку​
3. ​ Однако он не​ в Excel удалить​

​выберем Удалить ячейки (удалить​ и фильтр/ Сортировка​ формула потом не​ только пустые ячейки​ Заметьте, если использовать​ операций такого рода​ от последней строки​ таблица с данными​Workbooks(sFil1).Close savechanges:=True​ Single​ да. Откуда вес,​Serge​ каждый третий пост​ можете их удалить.​ «Главная» и кликните​ очень удобен, если​ пустые строки самым​ ячейки, со сдвигом​

​ от минимального к​ сработает, а сама​ и удалить их.​ клавишу Del, будет​ нужно быть крайне​ до первой If​ содержит пустые строки,​Application.DisplayAlerts = True​Dim aK() As​ так и не​

Сортировка

​: У меня работает. ​ касается определения последней​ Для этого, как​ по кнопке «Сортировка​ нужно удалить много​ простым способом, который​ вверх).​ максимальному или просто​ программа выдаст ошибку​ Но тут есть​ произведена только очистка​ внимательным. Дело в​ Application.CountA(Rows(r)) = 0​ то возникнут сложности​

1. ​ понял. Скролл работает​25Кб​ строки диапазона. И​
2. ​ и в первом​ и фильтр», а​ строк, ведь выделять​ используют практически все​
3. ​Здесь нужно быть аккуратным:​ /Сортировка.​ о присутствии в​ одна загвоздка. Нельзя​ содержимого, а не​ том, что ячейки​

​ Then Rows(r).Delete ‘если​ с фильтрацией, сортировкой,​Евгений Шульц​Dim n As​ и вниз и​KuklP​ может не нужно​ способе, нажмите на​ в контекстном меню​ их придется довольно​

Использование фильтра

​ неопытные пользователи, но​ если таблица сдержит​При сортировке таблиц с​ вычислениях ссылки на​ применять такое удаление​ удаление целых строк.​

1. ​ могут содержать скрытые​ в строке пусто​ построением сводных, т.к.​: А что это​ Integer​ вбок. В том​: Хитрый и коварный​ будет удалять остаток​
2. ​ кнопку «Удалить» в​ выберите «Фильтр».​ долго. Именно поэтому​ в некоторых случаях​ помимо пустых строк,​ несколькими столбцами нужно​
3. ​ несуществующие или некорректные​ для нескольких столбцов,​ В прочем, для​ формулы (бесцветный текст).​ — удаляем ее​ Microsoft Excel считает​
4. ​ Сергей? Просто ни​Dim sFil1 As​ числе и на​ Serge 007.:-)​

​ листа. Вам подскажут​ панели инструментов вкладки​Как только вы это​ мы сейчас расскажем,​ именно такое удаление​ строки с заполненными​

Выделение

​ быть осторожным, чтобы​ данные. Поэтому в​ если в одной​ самого простого случая​ А сами вычисления​ Next r End​ пустую строку разрывом​ макросами ни кодом​ String​ тяжелом файле.​

1. ​Guest​ решение поэффективней. С​ «Главная».​ сделаете, в шапке​ как в Excel​
2. ​ использовать лучше всего.​ и пустыми ячейками,​ ячейки не перескочили​
3. ​ такой ситуации следует​ строке хоть одна​ можно использовать и​ могут ссылаться на​
4. ​ Sub​ таблицы.​ не пользуюсь, поэтому​Dim sFil2 As​Юрий М​

​: а если скрыть​ уважением, Сергей.​Автор: Вадим Матузок​ столбцов появятся выдающие​ удалить пустые строки​Итак, чтобы удалить лишние​ то часть ячеек​ из своих строк​ быть особо внимательным,​

​ ячейка содержит данные.​

Как удалить неиспользуемые строки ниже рабочей области

​ ее.​​ строки, в которых​Закройте редактор и вернитесь​Обычно для удаления​
​ собственно не понимаю​ String​: У кого есть​
​ лишние строки?​Евгений Шульц​Евгений Шульц​ списки, вам необходимо​ при помощи инструмента​ пустые строки в​ перескочит со своих​ в другие. Поэтому,​
​ чтобы не нарушить​Наконец, рассмотрим еще один​Есть еще несколько методов​ данные отсутствуют, но​ в Excel.​ пустых строк включают​ о чем речь.​Dim sKat As​ две версии? Сохраните​KuklP​: Так тоже делал.​

​: Как удалить неиспользуемые​​ развернуть один из​ «Сортировка».​ программе, вам необходимо:​
​ строк на другие,​ для сортировки нужно​ целостность математических или​ универсальный метод. Он​ для проведения таких​ их предполагается ввести​
​Теперь нажмите сочетание Alt+F8​

​ фильтр, отбирают пустые​​ Но если не​ String​ в другой и​: А Серж, что​ После этого закрываю​ строки ниже рабочей​ них (любой).​Итак, вам необходимо сделать​Изначально выделить ту область​ что испортит таблицу.​ выделять всю таблицу.​ других операций. В​

​ позволяет решить проблему​​ операций. Одним из​ в дальнейшем. Такие​ или кнопку​ строки вручную и​
​ сложно готов попробовать​Dim sArk As​

​ потом обратно. Что​​ по-Вашему сделал?​ файл, открываю, Ctrl+End​ области?​В меню, которое появилось,​ следующее:​

​ таблицы, которая содержит​​ Если таблица в​ После сортировки по​ остальном же все​ того, как в​ решений вопроса того,​ ячейки с точки​Макросы​ затем их удаляют,​ )​ String​ получится — будут​Guest​ — 65536 строка.​Excel 2003, рабочая​ надо снять галку​Выделите всю таблицу. Для​ ненужные строки.​ формате EXCEL 2007,​

​ возрастанию пустые строки​​ просто. В зависимости​ «Эксель» удалить пустые​ как удалить пустые​ зрения программы пустыми​на вкладке​ что хотя и​Казанский​sFil1 = ActiveWorkbook.Name​ ли изменения?​

​: Урезал таблицу до​​И скроллер не​

​ с пункта «Пустые»​​ этого можно нажать​Затем нажать правую кнопку​

​ то EXCEL не​​ окажутся внизу таблицы.​ от того, какой​

​ строки в диапазоне​​ строки в «Экселе»,​ не считаются.​

​Разработчик​​ не сложно, но​:​sKat = ActiveWorkbook.Path​KuklP​ 25 строк, все​
​ меняется.​ строки.​ и нажать «ОК».​ кнопку «CTRL+A».​ мыши, чтобы вызвать​ даст испортить таким​

​Если важен порядок строк​​ результат должен быть​ от и до​ может стать применение​Но посмотрим, как в​.​
​ занимает некоторое время.​Почитай тут:​sArk = ActiveSheet.Name​: Юрий М имел​ по прежнему, размер​Guest​
​При определении последней​Вот и все, как​Нажмите правую кнопку мыши​ контекстное меню.​

​ образом таблицу: появится​​ до сортировки, то​ получен, можно применять​ определенного номера или​ инструмента сортировки.​
​ «Экселе» удалить пустые​В открывшемся окне​Для автоматизации подобной задачи​И тут:​lAntR = Cells.Find(What:=»*»,​ ввиду 2003 и​ книги с одним​: Извините Сергей, не​ ячейки показывает на​ видно, третий способ,​ на таблице и​В списке надо нажать​

​ сообщение «Данная команда​​ перед сортировкой нужно​ ту или иную​ значения.​Для этого нужно после​ строки, если они​ будут перечислены все​

​ проще всего использовать​​KuklP​ SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row​ 2007.​

​ листом 1,5Мб О_о​​ понял, что значит​ 65536 строку, до​
​ как удалить лишние​ в меню кликните​ на строку «Удалить».​ неприменима для перекрывающихся​
​ создать столбец с​ методику.​В этом случае следует​ выделения всей таблицы​
​ действительно являются таковыми.​ доступные вам в​ простой макрос. Нажмите​
​: Это макрос. Попробуйте​iAntK = Cells.Find(What:=»*»,​

​Евгений Шульц​​Сжал в rar-архив​ пример на десяток​ нее же и​ строки в Excel,​ по строке «Сортировка».​После этого появится окошко,​

​ диапазонов».​​ порядковой нумерацией строк,​Автор: Панькова Оксана Владимировна​
​ использовать раздел редактирования​
​ (Ctrl + A)​ Самым простым методом​
​ данный момент для​ Alt+F11 или выберите​
​ выполнить его в​ SearchOrder:=xlByColumns, SearchDirection:=xlPrevious).Column​
​: Прикольно, я нашел​ — 20Кб. Скрыть​
​ строк ? Что​ полоса прокрутки крутит,​
​ намного удобнее, чем​Из дополнительного меню вам​
​ в котором необходимо​СОВЕТ:​
​ а после удаления​Часто, особенно при импорте​
​ на главной панели​ в разделе данных​

​ считается обычное выделение​
​ запуска макросы, в​
​ на вкладке​

​ своем файле. Вам​ReDim aR(lAntR)​
​ волшебный лист )​ неиспользуемые строки можно,​

​ выложить ?​
​ из-за этого в​
​ некоторые из предыдущих.​ необходимо выбрать один​
​ выбрать, что именно​
​Стоит помнить, что​
​ пустых строк, заново​ данных в EXCEL,​
​ с выбором кнопки​
​ выбрать меню сортировки​

​ при помощи мыши​
​ том числе только​Разработчик​
​ он никак не​
​ReDim aK(iAntK)​
​А я уж​
​ но это не​
​KuklP​

​ рабочую область скроллером​Напоследок расскажем еще об​
​ из пунктов, в​
​ нужно удалить. В​
​ ячейки, содержащие формулы​ отсортировать таблицу уже​
​ на листе могут​
​ «Найти и выделить».​

​ и фильтра. Тут​
​ с зажатой левой​ что созданный макрос​- Visual Basic​
​ навредит. Ваш файл​
​For n =​
​ думал че с​

​ решает две проблемы:​​: Вашу таблицу в​ практически невозможно попасть.​ одном интересном способе,​ соответствии с тем,​ нашем случае это​ (даже если это​ по этому столбцу.​ формироваться таблицы с​ Из выпадающего меню​

​ применяется команда упорядочивания​​ кнопкой. Оно производится​

​DeleteEmptyRows​
​(Developer — Visual Basic​

​ не пострадает. Будет​​ 1 To lAntR​ руками или с​ скроллинга и размера.​ урезанном варианте. «При​В ручную не​ как удалить из​ какой тип данных​ строки, значит, выбирайте​ ссылки на пустые​Для нахождения пустых ячеек​ ПОЛНОСТЬЮ пустыми строками.​ выбирается строка выделения​ от минимального к​ движением вверх или​. Выберите его и​ Editor)​ создан новый -​

​aR(n) = Rows(n).RowHeight​​ головой уже О_о​R Dmitry​

​ определении последней ячейки»​​ удаляется. Выделяю 401​ таблицы пустые строки.​ находится в таблице.​ пункт «Строку» и​ ячейки), не считаются​ можно также воспользоваться​ Научимся быстро удалять​

Удаление всех пустых строк на листе

​ группы ячеек. А​ максимальному (пустые строки​ вниз по полю​ нажмите кнопку​. Если вкладки Разработчик​ (2)+имя Вашего файла.​Next n​Заменить лист сложно,​: Урезал таблицу до​ — есть разные​ строку, далее выделяю​ На сей раз​

​Как только вы сделаете​ нажимайте «ОК». Теперь​ пустыми по определению.​ Фильтром (Главная/ Редактирование/​ эти ненужные строки,​ в окошке условия​ окажутся снизу). После​ нумерации слева. Затем,​

​Выполнить (Run)​ не видно, то​ Так мне удалось​For n =​ много данных и​​ 25 строк, все​ ​ способы определения таковой.​ ​ все неиспользуемые строки​ будем использовать выделение​​ выбор, все пустые​ все лишние строки​Работая с огромным объемом​ Сортировка и фильтр/​​ которые в дальнейшем​ активируется та, которая​ этого их можно​ используя правый клик,​​- все пустые​

​ можно включить ее​ уменьшить Ваш пример​ 1 To iAntK​​ перекрестных ссылок с​​ по прежнему, размер​ Возможно Вам не​ CTRL+SHIFT+стрелка вниз. Пробовал​ ячеек, которое осуществляется​

​ строки, которые были​ будут удалены из​ данных в таблицах​ Фильтр). Выбираем подходящий​ могут затруднить работу​ указывает на пустые​ удалить. Если порядок​ вы вызываете контекстное​ строки на листе​ через​ с 1.5мб до​aK(n) = Columns(n).ColumnWidth​ другими листами.​ книги с одним​ все известны. Гадать,​ очищать это выделение​

​ с помощью специального​ в таблице, переместятся​

​ таблицы. Однако можно​ «Эксель», ненароком можно​​ столбец, отображаем только​​ с таблицей.​​ единицы. После этого​​ построения данных важен,​​ меню, где выбираете​ будут удалены.​Файл — Параметры -​ 18кб. Если интересно,​Next n​Видимо придеться использовать​ листом 1,5Мб О_о​​ что у Вас​​ по всякому, удалять,​ инструмента. Но обо​​ в ее низ​​ ускорить этот процесс,​ оставить пустые строки,​ пустые ячейки, выделяем​

Источник