Как удалить скрытые объекты в excel
Перейти к содержимому

Как удалить скрытые объекты в excel

  • автор:

Как удалить все скрытые элементы в Excel

Довольно часто люди скрывают какие-либо данные в табличках.

Это хороший вариант оставить видимыми только те данные, которые важны (например, в отчете), а остальные (например, вспомогательный столбик для расчетов) просто скрыть.

Но если вам эти данные больше не нужны — можно их удалить. В случае, если их очень много, это займет довольно много времени вручную.

В данной статье мы рассмотрим быстрые способы удаления скрытых столбиков и строк.

Удаляем скрытые столбики и строки с помощью встроенных функций Excel

Мы можем использовать встроенную функцию Excel чтобы сделать это.

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

  • Щелкните «Главная»;
  • Далее — «Сведения»;
  • Далее — «Проверка книги»;
  • Жмем «Проверить документ»;
  • И просто нажимаем «Проверить»;
  • Далее найдите Далее найдите «Скрытые строки и столбцы»;
  • И просто удалите их.

Готово! Таким образом, все скрытые элементы будут удалены. Вот результат проверки после удаления:

Я думаю вы уже столкнулись с этим, но все равно скажу: перед проверкой документа таким образом — сохраните его. Даже если вы этого не сделаете, Excel автоматически предложит сделать это:

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

Обязательно сделайте резервную копию файла перед тем, как будете использовать этот способ. Так как изменения, которые вы сделаете — невозможно откатить.

Однако, этот способ не подойдет вам, если нужно удалить скрытые элементы только с одного листа. А другие не трогать.

В таком случае мы можем создать свою функцию с помощью Visual Basic.

С помощью Visual Basic

В этом разделе статьи мы создадим несколько функций (для разных целей) с помощью Visual Basic.

Удаляем скрытые элементы из выделенного диапазона ячеек

Мы можем создать функцию которая удалит скрытые элементы со всего листа, но я считаю что это глупая затея.

Самый приемлемый вариант — сделать так, чтобы функция удаляла скрытые элементы из выделенного диапазона. А там уже можно выделить и весь лист (CTRL + A), если это необходимо.

Код для удаления скрытых строк Visual Basic:

Lastrow — этой переменной присваивается номер последней строки в выделенном диапазоне.

Далее он проверяет скрыта или нет эта строка и так далее.

Если скрыта — удаляется.

Код для удаления скрытых столбиков Visual Basic:

Работает точно так же, только для столбиков.

А этот код работает сразу для столбиков и строк:

Это, по сути, объединенные коды, которые мы уже рассмотрели.

Тут работает 2 цикла — сначала проверяются и удаляются скрытые строки, а потом столбики.

Код нужно вставить в Visual Basic -> правой кнопкой на любой лист -> «Insert» -> «Module».

Удаляем скрытые элементы из определенного диапазона ячеек

Бывает и такое, что нужно часто удалять скрытые элементы из конкретного диапазона ячеек.

В таком случае, мы можем указать, в каком диапазоне удалять скрытые элементы и сделать это прямо в функции!

Пример такого кода:

Эта функция удалит все скрытые элементы из A2:B300.

Сам код такой же, как и те, что мы рассмотрели ранее, но в нем указан конкретный диапазон.

Вот и все! Рекомендую использовать встроенную функцию проверки документа, если вам нужно удалить скрытые элементы со всех листов. А в других случаях — используйте любой из кодов для Visual Basic.

Удалить из excel все картинки

​Открываем документ Excel, содержащий​​ клавиш​ Для этого кликаем​ когда рисунок, наоборот,​Найдите новый рисунок и​ текст с web-страницы.​ Выделение группы ячеек​ на лист EXCEL​: Всем привет! Помогите​: Sub Delete_Pic() For​For Each pic​ есть куча картинок.​ Sheets.Count Sheets(i).Shapes.SelectAll Selection.Delete​ выкладывать файлы в​

​ убрать эти рисунки. ​ чтобы все сразу.​ нажав на кнопку​ изображения. Переходим во​Ctrl+V​ по нему один​

​ нужно извлечь из​ дважды щелкните его.​ Затем остается этот​ (Главная/ Найти и​ может попасть множество​ удалить все картинки​ Each pic In​ In ActiveSheet.Shapes​ Мне периодически их​ Next End SubПервый​ архивах до 10​p.s. Файл используется​ Их очень много​​«OK»​​ вкладку​. В​ раз левой кнопкой​ книги. Для достижения​Щелкните рисунок, который нужно​ текст скопировать в​ выделить). Переключатель установить​

​ ненужных объектов: картинок,​ или объекты на​ ActiveSheet.Shapes If pic.Type​

​If pic.Type =​
​ все надо удалять.​ макрос удаляет со​ мегабайт.​ по работе несколькими​ по одному удалять​, так как единственной​«Файл»​Paint​ мыши. Затем выполняем​ данной цели существует​ удалить и нажмите​ EXCEL.​ на Объекты.​ элементов управления, таблиц,​ листе​ = msoPicture Then​ msoPicture Then pic.Delete​

Замена или удаление изображения в Microsoft Office

​ Для этого я​​ всех листов книги​Ваша ситуация произошла​ людьми, но никто​ очень долго. За​ целью является извлечение​.​, кроме этого, можно​ щелчок правой кнопкой​ два способа. Каждый​ клавишу DELETE.​Примечание:​На первом рисунке (окно​ форм. Часть из​Спасибо. ​ pic.Delete Next pic​Next pic​ использую следующий макрос​ только автофигуры, второй​ скорей всего из​ в авторстве рисунков​

​ ранее всех благодарю.​ картинок.​В открывшемся окне щелкаем​ нажать на кнопку​ мыши по выделению,​

​ из них является​Чтобы удалить несколько рисунков,​ Мы стараемся как можно​

​ Область выделения. ) видно,​ этих объектов может​

Замена рисунка

​Sub Picture() Dim​ End Sub​

​End Sub​​Set myDocument =​​ -​​ за того, что​​ не признается​

Откройте вкладку Формат и выберите команду Изменить рисунок

​Дмитрий догадкин​После этого открываем​

Удалить картинку

​ по пункту​«Вставить»​ тем самым вызывая​

​ наиболее актуальным при​ удерживая клавишу CTRL​ оперативнее обеспечивать вас​ все объекты разделены​ быть скрыта. Научимся​

Замена рисунка

​Юрий М​​ ActiveSheet​​все «посторонние» объекты -​​ Вы где то​​analyst​​: F5 — выделить​​Проводник Windows​​«Сохранить как»​​, расположенную на ленте​

​ контекстное меню. В​ тех или иных​

Удалить картинку

​ щелкните рисунки, которые​ актуальными справочными материалами​ на 2 группы​

​ отображать эти объекты,​ For i =​: См. макрос.​: И всего-то три​myDocument.Pictures.Select​

​ диаграммы, графики, надписи​​ получили данные автоматически.​: А вы бы​ — объекты -​или любой другой​

Извлечение изображения из документа Microsoft Excel

Картинка в Microsoft Excel

​, который находится в​ в блоке инструментов​ появившемся списке выбираем​ обстоятельствах. Давайте подробно​ нужно удалить и​ на вашем языке.​ (группы отделены горизонтальной​ а затем удалять​ 1 To 3​bigfatman90​ года прошло. :-)​Selection.Delete​ и т.п.»​ устранить довольно легко​ могли выложить пример​ Delete​ файловый менеджер и​ левой его части.​«Буфер обмена»​ пункт​ рассмотрим каждый из​

​ нажмите клавишу DELETE.​ Эта страница переведена​

​ линией). Инструмент Выделение​​ их.​ ActiveSheet.Shapes.Range(Array(«Picture » &​

Извлечение картинок

​: У меня все​BiGFaTMaN90​Однако, на том​seazone​ но как все​ файла?​Ахтунg​ переходим в директорию,​После этого действия запускается​.​«Копировать»​ них, чтобы вы​Щелкните рисунок, который вы​ автоматически, поэтому ее​

Способ 1: копирование

​ группы ячеек выделяет​Для примера можно скопировать​ i)).Delete Next End​ картинки в формате​: Добрый день, проблема​

    ​ же листе есть​: Спасибо всем большое,​ сразу не знаю.​p.s. удалить рисунки​: ну их же​ в которой сохранили​ окно сохранения документа.​После этого картинка будет​.​ могли определить, какой​ хотите заменить.​ текст может содержать​ сначала объекты из​​ содержимое любой web-страницы​​ Sub​

Копирование изображения через контекстное меню в Microsoft Excel

​ *.gif​ — нужно создать​ проигрыватель WMA. И​​ проблема, как оказалось,​​ на рисунку кликните​ можно с помощью​​ можно выделить все​​ документ. В этой​​ Нам следует перейти​​ вставлена в редактор​

Копирование изображения с помощью кнопки на ленте в Microsoft Excel

​Можно также после выделения​ из вариантов лучше​В разделе​ неточности и грамматические​​ нижней группы (наподобие​​ на лист, например,​

Вставка изображения в программе Paint

Сохранение изображения в программе Paint

​ После их выделения,​Для отображения скрытых объектов​ActiveSheet.Shapes.SelectAll Selection.Delete​ потому что в​ с листа, а​ макроса.​ рисунков ctrl+a и​ «размер и свойства».​

Способ 2: массовое извлечение изображений

​seazone​ в папку а​ наименование документа. Именно​ в которой желаем,​ виде файла тем​«Главная»​Скачать последнюю версию​Формат​ статья была вам​ а затем удаления​ необходимо вызвать в​The_Prist​ предложенном варианте не​ сам макрос закреплен​Можно ли так​ последующим их удалением​

    ​ затем «свойства» и​:​ папку удали —IObit​​ в этой папке​​ чтобы разместилась папка​

Переход во вкладку Файл в Microsoft Excel

Переход к соранению документа Microsoft Excel

Сохранение файла в Microsoft Excel

Диалоговое окно в Microsoft Excel

Папка с изображениями в Проводнике Windows

Изображения в Проводнике Windows

​ были в документе​ изменения, так как​ вы сами можете​«Копировать»​Главным критерием выбора конкретного​.​ с помощью кнопок​ Заново вызовите Инструмент​ (Picture 1) можно​:​: Приветствую вас.​

​Данный макрос удаляет​

Как удалить все рисунки EXCEL

​ в диапазоне A1:AB60000,​ в Файл -​ удалить данный рисунок.​ сюда — из-за​http://chewriter.ru/hitrosti/kak-udalit-vse-kartinki-v-excel.html​ Excel, представлены в​ для наших целей​

​ выбрать формат файла,​​.​ способа является тот​Найдите новый рисунок и​

​ внизу страницы. Для​​ Выделение группы ячеек,​ выделить объект, затем​toiai​Пробовал записать действия​ все картинки, но​ а все проигрыватели​ Поиск Проблем -​ кстати советую заглянуть​

​ рисунков он весит​​seazone​
​ этой папке в​

Как удалить пустые рисунки в Excel

​ это не важно.​​ в котором сохранить​
​Существует и третий вариант,​ факт, хотите ли​ дважды щелкните его.​ удобства также приводим​ который выделит теперь​ клавишей​спасибо). а можно​ на макрос, только​ и саму кнопку,​ стоят правее. Возможно,​ Проверка читаемости. Нажимаем.​ на вкладку «замещающий​ 4,3 мб, выложила​: Добрый день!​ виде отдельных файлов.​ А вот в​ картинку, из поддерживаемых​ при котором после​ вы вытащить одиночное​Щелкните рисунок, который нужно​
​ ссылку на оригинал​ оставшиеся элементы (верхнюю​DEL​ ли без Select​ скроллинг запечатлелся.​

​ а кнопка желательно​​ это поможет.​ Откроется снова прежний​ текст» не оттуда​
​ сюда — http://fayloobmennik.net/201946.​Помогите, пожалуйста, разобраться​ Теперь с ними​ поле​

​ вариантов выбранного редактора​​ выделения нужно нажать​​ изображение или произвести​​ удалить и нажмите​
​ (на английском языке).​ группу).​– удалить его​ обойтись?​На листе лежат​ чтобы осталась на​Pavel55​ лист, но в​ случаем ваши данные?​ Рисунки есть на​ — в файле​ можно выполнять те​«Тип файла»​ изображений.​ на комбинацию клавиш​ массовое извлечение. В​ клавишу DELETE.​Вы можете заменить рисунок​Аналогичный подход может быть​ если нужно.​

​The_Prist​​ картинки, их все​​ листе.​​: Попробуйте так​ правом углу появятся​Pasha V​ вкладках И и​
​ Excel (*xls) ни​ же манипуляции, что​следует выбрать значение​Но, конечно, если изображений​Ctrl+C​ первом случае можно​Чтобы удалить несколько рисунков,​ в документ с​ использован и для​Совет​: for each s​ нужно удалить. Неужели​Решил проблему тем,​Sub DeletePictures()​ результаты проверки и​: Можно попровать удалить​ ТИ — их​ с того ни​ и с обычными​«Веб-страница (*.htm; *.html)»​ больше десятка, а​.​

​ удовлетвориться банальным копированием,​​ удерживая клавишу CTRL​ другой рисунок или​
​ объектов, созданных самостоятельно.​: чтобы удалить элемент​ in ActiveSheet.Shapes s.delete​ только вариант с​ что после удаления​Dim iShape As​ в них будет​ при помощи макроса:​ можно увидеть при​ с сего на​ изображениями.​. После того, как​ то и несколько​После этого запускаем любой​ а вот во​ щелкните рисунки, которые​ вы можете удалить​СОВЕТ:​ управления (см. Control​ next​​ переносом ячеек в​ картинок заново добавлять​ Shape​

​ Замещающий текст. Нажимаем​​вариант макроса №1​ клике на строку,​ одной из вкладок​Вытащить картинки из файла​ вышеуказанные настройки произведены,​ сотен, и их​

​ редактор изображений. Можно,​​ втором придется применить​ нужно удалить и​ изображение.​Другим способом удаления​ 13 на рисунке​Оксана33​ новую книгу здесь​ кнопку. Это единственное​On Error Resume​ на один из​ Sub DelAuto() Dim​ разделяющую столбцы E​ появилась куча пустых​ Excel не так​ щелкаем по кнопке​ всех нужно извлечь,​ например, воспользоваться стандартной​ процедуру конвертации, чтобы​ нажмите клавишу DELETE.​Если вы используете Microsoft​

Удаление картинок из листа excel

​ картинок, объектов (элементов​​ выше) необходимо перейти​

​ решение? или можно​ Next​ них, потом CTRL+A​ S As Shape,​ и F -​ рисунков — отображаются​

​ уж сложно, как​«Сохранить»​
​ то вышеуказанный способ​
​ программой​

​ не терять время​Совет:​ PowerPoint, отображается Удаление​ формы), гиперссылок является​ на вкладке Разработчик​Спасибо​

​Tester​ как то упростить​For Each iShape​

​ и далее нажимаем​ i As Integer​ начинается с E28​ при клике мышки​ могло показаться на​.​

​ представляется непрактичным. Для​​Paint​

​ на извлечении каждого​
​ Можно также использовать эту​ изображения.​
​ вставка содержимого web-страницы​ в режим Конструктора​
​pashulka​: Sub DeleteShapes()​
​alexthegreat​ In ActiveSheet.Shapes​
​ Delete. После полного​
​ For i =​ примерно. Метод вырезания​
​ в любое поле.​

​ первый взгляд. Это​​Возможно, при этом появится​

​ этих целей существует​​, которая встроена в​
​ рисунка по отдельности.​ процедуру для удаления​
​Более новые версии​ не прямо в​
​ (Разработчик/ Элементы управления).​
​- опечатка. Правильно​

​On Error Resume​​: может быть сделать​If iShape.Name Like​

Удалить все картинки с листа (только изображения)

​ удаления сохраняем файл​​ 1 To Sheets.Count​ рисунков тоже пробовала,​ При нажатии delete​ можно сделать либо​ диалоговое окно, в​ возможность применить конвертацию​ Windows. Производим вставку​Но, прежде всего, давайте​
​ коллекция картинок в​ Office 2007–2010 ​
​ EXCEL, а в​ Чтобы открыть вкладку​ так:​ Next​ кнопку на панели​ «Picture*» Then iShape.Delete​
​ и видим, что​ For Each S​ но при закрытии​ ничего не удаляется,​ путем простого копирования​ котором будет сообщаться,​

​ документа Excel в​​ в эту программу​ все-таки рассмотрим, как​ документе Office 2007.​Щелкните рисунок, который вы​ стандартное приложение Windows​ Разработчик зайдите в​ActiveSheet.DrawingObjects.Delete​Activesheet.Shapes.SelectAll​ быстрого доступа или​

​Next​​ размер стал намного​ In Sheets(i).Shapes If​ и последующем открытии​ куча пустых рисунков​ изображения, либо путем​ что файл может​

​ формат HTML. При​​ любым из тех​

​ произвести извлечение изображения​​При работе с файлами​ хотите заменить.​ Блокнот (Notepad.exe). После​
​ меню Кнопка офис/​The_Prist​Selection.Delete​ к макросу прилепить​On Error GoTo​
​ меньше.​ S.Type = msoAutoShape​

Удалить все картинки с листа. VBA

​ файла они никуда​​ засоряет лист и​

​ сохранения документа, как​ иметь возможности, несовместимые​ этом все изображения​

​ способов, которые в​ из файла методом​ Excel бывают не​Откройте вкладку​ вставки содержимого web-страницы​ Параметры Excel/ Основные/​, спасибо)) теперь работает)​

​On Error GoTo​​ сочетание клавиш. так​
​ 0​Дмитрий Д​
​ Then S.Delete Next​
​ не пропадают.​
​ при внесении изменений​ веб-страницы, встроенными инструментами​
​ с форматом​

​ автоматически будут сохранены​​ ней доступен. В​

Удалить все картинки на листе

​ копирования.​​ только случаи, когда​Формат​ из Буфера обмена​ Показывать вкладку Разработчик​
​Добавлено через 3 минуты​
​ 0​ же можно добавить​End Sub​: Всем доброго дня!​ Next End Subвариант​javvva​ приходится ждать по​

​ Эксель.​​«Веб-страница»​
​ в отдельной папке​

​ большинстве вариантов можно​​Для того чтобы скопировать​

​ нужно вставить изображение​​и выберите команду​

​ в новый документ​​ на ленте.​​pashulka​​End Sub​ свой пункт в​Дмитрий Д​

​У меня следующая​​ макроса №2 Sub​:​ несколько минут. Может,​

​Автор: Максим Тютюшев​​, и при конвертации​

​ на жестком диске​​ воспользоваться универсальным способом​​ изображение, прежде всего​ в документ, но​
​Изменить рисунок​
​ Блокнота в нем​​Выделить ВСЕ объекты можно​
​, спасибо)​
​Широкат​​ меню ПКМ (тоже​

Удалить скрытые строки в Excel. По одной и все сразу

В Microsoft Office Excel можно быстро удалить скрытые, пустые строчки, которые портят внешний вид табличного массива. О том, как это сделать будет рассказано в данной статье.

Как деинсталлировать скрытые строки в Эксель

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

Способ 1. Как удалять строчки в таблице по одной через контекстное меню

Чтобы справиться с данной операцией, рекомендуется пользоваться следующим алгоритмом:

  1. Выделить нужную строчку табличного массива ЛКМ.
  2. Кликнуть по любому месту выделенной области правой кнопкой мышки.
  3. В контекстном меню нажать по слову «Удалить…».
  1. В открывшемся окошке поставить тумблер рядом с параметром «Строку» и щелкнуть по «ОК».
  1. Проверить результат. Выбранная строка должна деинсталлироваться.
  2. Проделать подобную процедуру с остальными элементами таблички.

Обратите внимание! Рассмотренным методом также можно удалять скрытые столбцы.

Способ 2. Одиночная деинсталляция строк через опцию в ленте программы

В Excel есть стандартные инструменты для удаления ячеек табличного массива. Чтобы воспользоваться ими для удаления строчек, необходимо действовать так:

  1. Выделить любую ячейку в строке, которую нужно удалить.
  2. Перейти во вкладку «Главная» в верхней панели Excel.
  3. Найти кнопку «Удалить» и развернуть эту опцию, щелкнув по стрелочке справа.
  4. Выбрать вариант «Удалить строки с листа».
  1. Удостовериться, что выделенная ранее строчка была деинсталлирована.

Способ 3. Как удалить все скрытые строчки сразу

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

  1. По аналогичной схеме переключиться на вкладку «Главная».
  2. В открывшейся области в разделе «Редактирование» нажать по кнопке «Найти и выделить».
  3. После выполнения предыдущего действия появится контекстное меню, в котором пользователю надо будет кликнуть по строке «Выделение группы ячеек…».
  1. В отобразившемся окне необходимо выбрать элементы для выделения. В данной ситуации следует поставить тумблер рядом с параметром «Пустые ячейки» и кликнуть по «ОК». Теперь в исходной таблице должны выделиться одновременно все пустые строчки независимо от места их расположения.
  1. Правой клавишей манипулятора щелкнуть по любой из выделенных строк.
  2. В окне контекстного типа нажать по слову «Удалить…» и выбрать вариант «Строку». После нажатия на «ОК» все скрытые элементы деинсталлируются.

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

udalit-skrytye-stroki-v-excel-po-odnoj-i-vse-srazu

Табличка с нарушенной структурой в Эксель

Способ 4. Применение сортировки

Актуальный метод, который выполняется по следующему алгоритму:

  1. Выделить шапку таблицы. Это область, в которой будет производиться сортировка данных.
  2. Во вкладке «Главная» развернуть подраздел «Сортировка и фильтр».
  3. В появившемся окне выбрать вариант «Настраиваемая сортировка», щелкнув по нему ЛКМ.
  1. В меню настраиваемой сортировки поставить галочку напротив параметра «Мои данные содержат заголовки».
  2. В столбце Порядок указать любой из вариантов сортировки: либо «От А до Я», либо «От Я до А».
  3. По окончании настройки сортировки нажать на «ОК» внизу окошка. После этого данные в табличном массиве будут отсортированы по указанному критерию.
  1. По схеме, рассмотренной в предыдущем разделе статьи, выделить все скрытые строки и удалить их.

Сортировка значений автоматически выставляет все пустые строчки в конец таблички.

Дополнительная информация! После сортировки информации в массиве скрытые элементы можно будет деинсталлировать, выделив их все и в контекстном меню нажать по пункту «Удалить».

udalit-skrytye-stroki-v-excel-po-odnoj-i-vse-srazu

Деинсталляция пустых строчек, которые автоматически выставились в конец табличного массива после его сортировки

Способ 5. Применение фильтрации

В таблицах Excel возможно отфильтровать заданный массив, оставив только нужную информацию в нем. Этим способом можно убрать любую строку из таблицы. Важно действовать по алгоритму:

  1. Левой клавишей манипулятора выделить шапку таблички.
  2. Перейти в раздел «Данные», располагающийся сверху главного меню программы.
  3. Нажать на кнопку «Фильтр». После этого в заголовке каждого столбца массива появятся стрелочки.
  1. Нажать ЛКМ по любой стрелке, чтобы развернуть список доступных фильтров.
  2. Снять галочки со значений в нужных строчках. Для деинсталляции пустой строки, потребуется указать ее порядковый номер в табличном массиве.
  1. Проверить результат. После нажатия на «ОК» изменения должны вступить в силу, а выбранные элементы удалиться.

Обратите внимание! Данные в составленном табличном массиве можно быстро отфильтровать по различным критериям. Например, по цвету ячеек, по дате, по названиям столбцов и т.д. Эта информация подробно изложена в окошке выбора фильтра.

Заключение

Таким образом, в Microsoft Office Excel деинсталлировать скрытые строчки в таблице достаточно просто. Для этого не обязательно быть опытным пользователем Эксель. Достаточно воспользоваться одним из вышеуказанных способов, которые работают независимо от версии программного обеспечения.

Как удалить все скрытые строки и столбцы в Excel

Многие пользователи Excel скрывают строки и столбцы, когда у них есть данные, которые им не нужны.

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

И, если у вас много таких скрытых строк / столбцов, может быть сложно найти и удалить эти скрытые строки и столбцы (в случае, если они вам не нужны).

В этом уроке я покажу вам несколько способов легко удалить скрытые строки и столбцы в Excel.

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

Удалить все скрытые строки и столбцы в Excel

Если вы хотите удалить все скрытые строки и столбцы во всей книге в Excel, вы можете использовать показанный здесь метод.

Помните, что он удалит эти скрытые строки и столбцы из всей книги, а не только из активного листа.

Ниже приведены шаги по удалению всех скрытых строк и столбцов из книги в Excel:

  1. Нажмите на опцию File
  2. В параметрах слева нажмите «Информация».
  3. Нажмите на опцию «Проверить наличие проблем».
  4. Нажмите на опцию «Проверить документ». Откроется диалоговое окно «Инспектор документов».
  5. В диалоговом окне «Инспектор документов» нажмите кнопку «Проверить». Это проверит всю книгу и предоставит вам информацию о книге.
  6. Прокрутите вниз до параметра «Скрытые строки и столбцы». Вы увидите, что он показывает общее количество скрытых строк и столбцов, найденных в книге.
  7. Нажмите кнопку «Удалить все».

Вышеупомянутые шаги удалят все скрытые строки и столбцы в книге.

Как удалить все скрытые строки и столбцы в Excel

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

Как удалить все скрытые строки и столбцы в Excel

Если нет скрытых строк и столбцов, вы увидите зеленую галочку перед параметром «Скрытые» и «Строки и столбцы» (в диалоговом окне «Инспектор документов»).

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

Примечание. Вы не можете отменить изменения, внесенные Инспектором документов. Поэтому убедитесь, что у вас есть резервная копия исходных данных (на случай, если она вам понадобится в будущем).

Это отличный метод, если вы хотите удалить все скрытые столбцы и строки для всей книги.

Но если вы хотите удалить его только на определенном листе или в определенном диапазоне, вы не можете использовать эту опцию.

В этом случае вы можете использовать описанный далее метод VBA.

Удалите скрытые строки и столбцы с помощью VBA

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

Но если это то, что вам нужно делать довольно часто или если у вас большой набор данных с большим количеством скрытых строк / столбцов, лучше всего использовать макрокоды VBA для автоматизации этого процесса.

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

Со всего рабочего листа (использованный диапазон)

Хотя я могу заставить код VBA проверять весь лист, начиная с номера последней строки и номера последнего столбца на листе, это было бы пустой тратой ресурсов.

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

Ниже приведен код VBA, который удалит все скрытые строки в используемом диапазоне:
Sub DeleteHiddenRows () Dim sht As Worksheet Dim LastRow Set sht = ActiveSheet LastRow = sht.UsedRange.Rows (sht.UsedRange.Rows.Count) .Row For i = LastRow To 1 Step -1 If Rows (i) .Hidden = True Затем Rows (i) .EntireRow.Delete Next End Sub
Приведенный выше код VBA сначала определяет номер последней строки в используемом диапазоне и назначает этот номер строки переменной «LastRow».

Этот номер последней строки затем используется в цикле For Next, где он начинается с последней строки и проверяет, скрыта она или нет.

Если он скрыт, вся строка удаляется. А если он не скрыт, код оставляет эту строку как есть и перемещается в строку над ней. Этот цикл проверяет все строки и удаляет все скрытые строки, которые встречаются в процессе.

Если вы хотите удалить все скрытые столбцы в используемом диапазоне, используйте приведенный ниже код VBA:
Sub DeleteHiddenColumns () Dim sht As Worksheet Dim LastCol as Integer Set sht = ActiveSheet LastCol = sht.UsedRange.Columns (sht.UsedRange.Columns.Count) .Column For i = LastCol To 1 Step -1 If Columns (i) .Hidden = True Then Columns (i) .EntireColumn.Delete Next End Sub
Это снова работает таким же образом, где вместо строк мы проверяем столбцы.

Таким образом, он определяет номер последнего столбца в используемом диапазоне, присваивает его переменной, а затем использует цикл для перехода от последнего столбца к первому столбцу и удаления всех скрытых столбцов в процессе.

А если вы хотите иметь код, который удалял бы все скрытые строки, а также скрытые столбцы, используйте приведенный ниже код VBA:
Sub Удалить Columns.Count) .Column For i = LastRow To 1 Step -1 Если Rows (i) .Hidden = True Then Rows (i) .EntireRow.Delete Next For i = LastCol To 1 Step -1 If Columns (i) .Hidden = True Then Columns (i) .EntireColumn.Delete Next End Sub
Это просто комбинированный код для строк и столбцов, работающий одинаково.

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

Обратите внимание, что вам нужно поместить этот код VBA в обычный модуль в редакторе Visual Basic. Затем вы можете запустить код непосредственно из редактора VB, используя диалоговое окно макроса или добавив этот макрос на панель быстрого доступа.

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

Из определенного диапазона ячеек

Если у вас есть определенный диапазон, из которого вы хотите удалить скрытые строки и столбцы, вам необходимо указать это в коде.

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

Ниже кода VBA, который сделает это:
Sub DeleteHiddenRowsColumns () Dim sht As Worksheet Dim Rng As Range Dim LastRow As Integer Dim RowCount As Integer Set sht = ActiveSheet Set Rng = Range («A1: K200») RowCount = Rng.Rows.Count LastRow = Rng.Rows (Rng. Rows.Count) .Row ColCount = Rng.Columns.Count LastCol = Rng.Columns (Rng.Columns.Count) .Column For i = LastRow To LastRow — RowCount Step -1 If Rows (i) .Hidden = True Then Rows ( i) .EntireRow.Delete Next For j = LastCol To LastCol — ColCount Step -1 Если Columns (j) .Hidden = True Then Columns (j) .EntireColumn.Delete Next End Sub
В приведенном выше коде я указал диапазон как A1: K200.

Это заставляет код пройти все строки и столбцы в указанном диапазоне и удалить все обнаруженные скрытые строки и столбцы.

Если у вас есть скрытые строки или столбцы за пределами этого диапазона, это не повлияет на них.

Вот как можно удалить скрытые строки и столбцы в Excel.

Если вы хотите сделать это для всей книги, вы можете использовать параметр «Инспектор документов». А если вам нужно больше контроля, вы можете использовать коды VBA, как показано выше.

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *