Удаление строк по цвету |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
Как можно удалить целые строки в зависимости от цвета фона? В этом примере мне нужно удалить все строки, ячейки которых заполнены синим цветом фона, как показано на следующем снимке экрана. В этой статье вы получите несколько кодов для выполнения этой задачи в Excel.
Удалить строки с определенным цветом фона на основе каждой ячейки
Удалить строки с определенным цветом фона на основе одного столбца
Удалить строки с определенным цветом фона на основе каждой ячейки
Если у вас есть диапазон данных, которые случайным образом заполнены некоторыми цветами ячеек, и вам нужно удалить строки, цвет ячейки которых синий, как показано на следующем снимке экрана:
Чтобы удалить этот тип строк, вы можете использовать следующий код VBA, сделайте следующее:
1. Удерживайте ALT + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.
2. Нажмите Вставить > Модулии вставьте следующий код в Модули Окно.
Код VBA: удалить строки, ячейки которых содержат определенный цвет заливки:
Sub DeleteRows()
'Updateby Extendoffice
Dim rngCl As Range
Dim xRows As Long
Dim xCol As Long
Dim colorLg As Long
On Error Resume Next
Set rngCl = Application.InputBox _
(Prompt:="Select a cell with the background color to be deleted", _
Title:="Kutools for Excel", Type:=8)
On Error GoTo 0
If rngCl Is Nothing Then
MsgBox "User cancelled operation." & vbCrLf & _
"Processing terminated", vbInformation, "Kutools for Excel"
Exit Sub
End If
colorLg = rngCl.Interior.Color
Application.ScreenUpdating = False
With ActiveSheet.UsedRange
For xRows = .Rows.Count To 1 Step -1
For xCol = 1 To .Columns.Count
If .Cells(xRows, xCol).Interior.Color = colorLg Then
.Rows(xRows).Delete
Exit For
End If
Next xCol
Next xRows
End With
Application.ScreenUpdating = True
End Sub
3, Затем нажмите F5 нажмите клавишу для запуска этого кода, и появится диалоговое окно, напоминающее вам о выборе ячейки с цветом заливки, который вы хотите удалить, см. снимок экрана:
4. Затем нажмите OK, и все строки были удалены, если ячейка с определенным цветом заливки.
Удалить строки с определенным цветом фона на основе одного столбца
Если вы хотите удалить строки с определенным цветом на основе только одного столбца, например, удалите строки с синим цветом в столбце A и получите снимок экрана ниже, вот также код VBA может оказать вам услугу.
1. Удерживайте ALT + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.
2. Нажмите Вставить > Модулии вставьте следующий код в Модули Окно.
Код VBA: удаление строк на основе столбца, ячейки которого имеют определенный цвет заливки:
Sub deleterow()
'UpdateBY Extendoffice
Dim xRg As Range, rgDel As Range
For Each xRg In ThisWorkbook.ActiveSheet.Range("A2:A21")
If xRg.Interior.ColorIndex = 20 Then
If rgDel Is Nothing Then
Set rgDel = xRg
Else
Set rgDel = Union(rgDel, xRg)
End If
End If
Next xRg
If Not rgDel Is Nothing Then rgDel.EntireRow.Delete
End Sub
Внимание: В приведенном выше коде A2: A21 — это столбец, содержащий определенный цвет заливки, на основе которого вы хотите удалить строки, число 20 in Индекс цвета = 20 script — это индекс цвета, на основе которого вы хотите удалить строки. Вы можете изменить их по своему усмотрению.
3, Затем нажмите F5 ключ для запуска этого кода, и все строки, ячейки которых содержат синий цвет в столбце A, были удалены сразу.
Лучшие инструменты для работы в офисе
Kutools for Excel Решит большинство ваших проблем и повысит вашу производительность на 80%
- Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма …
- Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон…
- Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы… Предотвращение дублирования ячеек; Сравнить диапазоны…
- Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор …
- Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое …
- Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии…
- Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом …
- Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF…
- Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
Is it possible to clear a large number of cells contents based on color alone? I don’t think that simply filtering is going to work well on this because the dataset is large and ‘wide’
asked Feb 13, 2012 at 20:06
wootscootinboogiewootscootinboogie
8,36133 gold badges109 silver badges194 bronze badges
If you don’t need this done programatically, it can be faster to just use Find and Replace (Ctrl-H).
- Press
Ctrl-H
- Click
Options > >
- Click the top
Format...
button to search for for colored cells (use theFill
tab) - Leave the
Replace with
field blank to delete the contents of cells with the format you specified.
answered Feb 13, 2012 at 20:45
0
This will clear the content of any cell within the range A1:G8 filled with yellow (65535). Change the color for your color and the range for your range. This is kind of crude, sorry.
Sub Macro1()
Range("A1:G8").Select
For Each Cell In Selection
If Cell.Interior.Color = Excel.XlRgbColor.rgbYellow Then
Cell.Clear
End If
Next
End Sub
jpsecher
4,3152 gold badges33 silver badges40 bronze badges
answered Feb 13, 2012 at 20:21
RaystafarianRaystafarian
2,8922 gold badges30 silver badges42 bronze badges
2
You can clear cells by background color using Excel’s filter options.
For Excel 2013 & 2010
-
Open a worksheet where each column has a header row.
-
Enable column filtering with Data -> Sort & Filter -> Filter
-
Click the drop-down-arrow on a column, go to Filter by Color, and select a color you want to view. (Any non-colored cells will be hidden)
-
Select the remaining cells, right-click and select Clear Contents.
-
To unhide the remaining cells, disable column filtering with Data -> Sort & Filter -> Filter
answered Nov 29, 2017 at 17:38
StevoisiakStevoisiak
22.8k27 gold badges122 silver badges219 bronze badges
Вы можете добавить заливку к ячейкам, заполнив их сплошными цветами или конкретными узорами. Если при печати цветная заливка ячеек выводится неправильно, проверьте значения параметров печати.
Выделите ячейки, к которым вы хотите применить заливку, или удалите затенение. Дополнительные сведения о выделении ячеек на листе можно найти в разделе выделение ячеек, диапазонов, строк и столбцов на листе.
На вкладке Главная в группе Шрифт выполните одно из указанных ниже действий.
Чтобы заполнить ячейки сплошным цветом, щелкните стрелку рядом с кнопкой Цвет заливки , а затем в разделе цвета темы или Стандартные цветавыберите нужный цвет.
Чтобы заполнить ячейки с помощью настраиваемого цвета, щелкните стрелку рядом с кнопкой Цвет заливки , выберите пункт другие цвета, а затем в диалоговом окне цвета выберите нужный цвет.
Чтобы применить последний выбранный цвет, нажмите кнопку Цвет заливки .
Примечание: Microsoft Excel сохраняет 10 самых последних выбранных настраиваемых цветов. Чтобы быстро применить один из этих цветов, щелкните стрелку рядом с кнопкой Цвет заливки , а затем выберите нужный цвет в разделе Последние цвета.
Совет: Если вы хотите использовать другой цвет фона для всего листа, нажмите кнопку выделить все , а затем выберите нужный цвет. Это приведет к скрытию линий сетки, но вы можете улучшить удобочитаемость листа, отображая границы ячеек вокруг всех ячеек.
Мнение эксперта
Витальева Анжела, консультант по работе с офисными программами
Со всеми вопросами обращайтесь ко мне!
Задать вопрос эксперту
Помимо того, что можно выделить первые последние значения в том числе и по процентам , можно использовать возможность выделить данные выше и ниже среднего пользуюсь даже чаще. Если же вам нужны дополнительные объяснения, обращайтесь ко мне!
Для этого зайдите в пункт Правила отбора первых и последних ячеек и выберите нужный пункт. Помимо того, что можно выделить первые/последние значения (в том числе и по процентам), можно использовать возможность выделить данные выше и ниже среднего (пользуюсь даже чаще). Очень удобно для просмотра результатов отличающихся от нормы или среднего!
Как в Excel удалить пустые строки — ЭКСЕЛЬ ХАК
- Нажмите клавишу . При этом вы снимаете выделение и возвращаете курсор в начало блока (или в начало документа, если был выделен весь документ). Данный метод применим в тех случаях, когда для выделения текста вы использовали мышь или клавишу .
- Щелкните кнопкой мыши. Это действие снимает выделение и переводит курсор в ту область, на которой вы щелкнули кнопкой мыши. Подходит для случаев, когда операция выделения выполняется с помощью мыши или клавиши .
- Нажмите клавишу , а затем клавишу . Так вы снимете выделение, выполненное в расширенном режиме выделения блоков текста (с использованием клавиши и подсвеченными буквами ВДЛ, помните?).
- Не забывайте о команде ! Эта комбинация не только снимает выделение с текстового блока (как бы он ни выделялся — с помощью клавиш , или мышью), но и возвращает вас к тексту, который вы редактировали до того, как взялись за процедуру выделения.
Представим, что наша задача – найти и выделить в столбце таблицы те значения, которые совпадают хотя бы с одним столбцом второй таблицы. В нашем случае – мы последовательно будем брать данные из столбца B и определять, нет ли такого же значения в этой же строке в нескольких колонках второй таблицы.
Если невыделенных листов нет, щелкните правой кнопкой мыши ярлычок выделенного листа и в контекстном меню выберите команду Разгруппировать листы. В Excel 2007: на вкладке Вид в группе Показать/скрыть снимите флажок Сетка. В других версиях Excel: на вкладке Вид в группе Показать снимите флажок Сетка.
Выделите ячейку или диапазон ячеек, которые нужно отформатировать. На вкладке Главная нажмите кнопку вызова диалогового окна Формат ячеек или просто нажмите клавиши CTRL+SHIFT+F. На вкладке Заливка выберите в разделе Цвет фона нужный цвет.
- Выделите таблицу или диапазон, в котором Вы хотите изменить цвет заливки ячеек. …
- Откройте вкладку Home (Главная), в разделе Styles (Стили) нажмите Conditional Formatting (Условное форматирование) > New Rule (Создать правило).
Мнение эксперта
Витальева Анжела, консультант по работе с офисными программами
Со всеми вопросами обращайтесь ко мне!
Задать вопрос эксперту
Слева внизу вы увидите кнопку Очистить все , которая и удаляет все выставленные условия проверки, то есть в данном случае выпадающий список. Если же вам нужны дополнительные объяснения, обращайтесь ко мне!
Если ранее вы самостоятельно создавали раскрывающийся список, то уже знаете, через какое именно меню это делается. Его можно использовать и для очистки данных, удалив все значения кроме выбранного. Это отличный вариант в тех случаях, когда нужно сохранить текущее число или текст в ячейке, но удалить все остальные варианты списка.
Excel выделение цветом ячеек по условиям. Условное форматирование
- Выделите весь затемненный документ. Откройте вкладку — Правка – Выделить все;
- После выделения перейдите на вкладку меню Формат и выберите Границы и заливка;
- В открывшемся окне Границы и заливка перейдите на вкладку Заливка и выберите Нет заливки;
Еще больше полезных приемов в работе со списками данных и функциями в Excel вы узнаете в практическом курсе «От новичка до мастера Excel«. Успей зарегистрироваться по ссылке!
Удаление объектов, очистка листов от диаграмм или прочих добавленных объектов
Чтобы удалить диаграмму, или автофигуры, нужно сперва ее выбрать, а затем удалить кнопкой Delete или через правую кнопку мыши — Удалить (см. выше). Но как быть, если вам необходимо удалить сразу несколько объектов — зажмите Ctrl и выберите нужные объекты. Если объектов очень много, то придется воспользоваться макросом, например, предложенном в пункте 4, этой статьи .
Так же объекты можно удалить, если вы перейдете в меню Главная — раздел Редактирование — Найти и выделить — пункт Выделение группы ячеек — Объекты. Так можно очистить ячейки в Excel от объектов.
Напомню, что объекты могут значительно замедлять работу файла. Особенно, если данные копировались из внешнего источника.
Если же вам необходим специальный макрос для удаления специфических объектов, то пишите в комментариях или мне на почту!
Как убрать цвет в таблице Эксель? блог про компьютеры и их настройку
В последних версиях пакета Microsoft Office (2007 и 2010) файлы, созданные в программе Excel, имеют расширение XLSX. Значок такого файла в папке с файлами будет выглядеть, как показано на рис. 1.8. В предыдущих версиях Excel файл программы имел расширение XLS.
Мнение эксперта
Витальева Анжела, консультант по работе с офисными программами
Со всеми вопросами обращайтесь ко мне!
Задать вопрос эксперту
В программе Excel вы можете работать не только с одной ячейкой, но и с целой группой в Excel также принято говорить диапазоны ячеек. Если же вам нужны дополнительные объяснения, обращайтесь ко мне!
На вкладке «Заливка» можно выбрать цвет фона и узор. Таким образом, для того, чтобы скопировать формат необходимо выделить интересующую нас ячейку, нажать на «метелочку» и кликнуть по ячейке, формат которой мы хотим задать.
Как отменить выделение в excel — ПК журнал
- Очистить все — т.е. удалить все данные на листе и форматы в том числе
- Очистить форматы — это как раз то, что нужно для примера
- Очистить содержимое — очищаем данные в ячейках, не трогая форматы
- Очистить примечания — удобная функция, если кто-то сильно зарецензировал ваш лист и оставил много примечаний. Появилась относительно недавно.
- Очистить гиперссылки — совсем новая возможность, появившаяся в 2016 версии. Позволяет очистить все ссылки на листе. Очень удобно, если вы скопировали данные из интернета, например, из Википедии, почти всегда копируется множество гиперссылок.
Очень полезно при работе с текстом. Пример, когда в столбце у вас записаны ФИО сотрудников, а надо отобрать всех коллег Ивановых. Выделяем ячейки заходим в нужный пункт и выделяем содержащий текст Иванов, после чего фильтруем таблицу по цвету
У меня есть строки — выходные и праздники, они покрашены серым (не условное_форматирование) хорошо бы их с помощью макроса удалять, так как подгрузку данных мне не удаётся настроить, а каждый раз за 5+ лет удалять строки я запарюсь (уже).
Спасибо!
если у вас 2007 эксель, то там есть фильтр по цвету, поставить его и выделенные строки удалить
если 2003, то нужно вставить такой макрос
Sub delete_rows()
r = 1
While r <= ActiveSheet.UsedRange.Rows.Count
If Cells(r, 1).Interior.ColorIndex <> xlNone Then
Rows(r).Delete shift:=xlUp
r = r — 1
End If
r = r + 1
Wend
End Sub
Не торопись, и все успеешь намного быстрее
А теперь задача немного изменилась — есть лист 1 с датами и есть лист 2 с датами, необоходимо удалить строки в обоих листах с единожды повторяющимеся значениями. таким образом остануться даты которые встречаются на обоих листах.
думаю, так это можно сделать, хотя можно и формулами если(еошибка(поискпоз());0;1), поставить фильтр с 0, и удалить эти строки.
Не торопись, и все успеешь намного быстрее