Note: The other languages of the website are Google-translated. Back to English

Як фільтрувати комірки жирними символами в Excel?

Ви можете застосувати жирний стиль шрифту для форматування даних або вмісту в комірках в Excel, але чи знаєте ви, як фільтрувати комірки за клітинками, які містять жирний шрифт у Excel? У цій статті зібрано кілька хитрих макросів VBA для фільтрації комірок жирними символами в Excel.

Фільтруйте жирні комірки за допомогою допоміжного стовпця
Відфільтруйте жирні комірки за допомогою коду VBA
Легко фільтруйте жирні комірки за допомогою дивовижного інструменту
Більше підручників з фільтрації даних ...


Фільтруйте жирні комірки за допомогою довідкового стовпця

Припустимо, вам потрібно відфільтрувати всі жирні клітинки в стовпці B, як показано на знімку екрана, будь-ласка, зробіть наступне:

Нижче визначена користувачем функція допомагає визначити, чи є клітинка в стовпці жирним шрифтом чи ні, а потім повернути результати як TRUE або False у допоміжному стовпці. Ви можете відфільтрувати всі ІСТИННІ результати для відображення лише жирних комірок у стовпці B.

1 Натисніть кнопку інший + F11 ключі, щоб відкрити Microsoft Visual Basic для програми вікна.

2 В Microsoft Visual Basic для програми вікна, натисніть Insert > Модуль потім скопіюйте наступний код VBA у вікно Модуль. Дивіться знімок екрана:

Код VBA: фільтруйте комірки жирними символами

Function IsBold(rCell As Range)
IsBold = rCell.Font.Bold
End Function

3 Натисніть кнопку інший + Q клавіші, щоб закрити вікно коду.

4. Виберіть порожню комірку, яка знаходиться поруч із таблицею (вибрана комірка повинна знаходитись у тому самому рядку першого рядка таблиці фільтрів), скопіюйте в неї формулу нижче та натисніть вводити ключ

= IsBold (B2)

5. Продовжуйте обирати першу комірку результату та перетягніть маркер заповнення, щоб отримати всі результати. Дивіться знімок екрана:

6. Виберіть заголовок стовпця помічника, клацніть дані > Фільтрувати Клацніть на кнопку зі стрілкою поруч із коміркою заголовка, поставте галочку ІСТИНА , а потім клацніть ОК.

Тепер усі жирні клітинки у стовпці B відфільтровані, як показано на знімку екрана.


Швидко фільтруйте жирні комірки в стовпці за допомогою декількох клацань у програмі Excel:

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


Відфільтруйте жирні комірки за допомогою коду VBA

Наведений нижче код VBA дозволяє вам безпосередньо відфільтрувати всі жирні клітинки в одному стовпці. Будь ласка, виконайте наступне.

1. Виберіть діапазон стовпців, який ви відфільтруєте, усі жирні комірки, крім комірки заголовка. У цьому випадку я вибираю B2: B16.

2 Натисніть кнопку інший + F11 ключі, щоб відкрити Microsoft Visual Basic для програми вікна.

3 В Microsoft Visual Basic для програми вікна, натисніть Insert > Модуль потім скопіюйте та вставте наступний код VBA у вікно модуля.

Код VBA: фільтруйте жирні комірки в стовпці

Sub FilterBold()
'Updated by Extendoffice 20191018
Dim cell As Range
For Each cell In Selection
If cell.Font.Bold = False Then
cell.EntireRow.Hidden = True
End If
Next cell
End Sub

4 Натисніть кнопку F5 ключ для запуску цього макросу. Потім усі жирні комірки негайно відфільтровуються у вибраному діапазоні стовпців.


Легко фільтруйте жирні комірки за допомогою дивовижного інструменту

У цьому розділі ми рекомендуємо вам зручний інструмент - Відфільтруйте сміливі комірки корисність Kutools для Excel. За допомогою цієї утиліти всі жирні клітинки у вибраному стовпці відразу фільтруються за допомогою декількох клацань.

Перед поданням заявки Kutools для Excel, будь ласка завантажте та встановіть його спочатку.

1. Виберіть діапазон стовпців, для якого ви будете фільтрувати жирні комірки, натисніть Kutools Plus> Спеціальний фільтр > Фільтр жирний щоб це зробити. Дивіться нижче демонстрацію:

  Якщо ви хочете отримати безкоштовну пробну версію (30-день) цієї утиліти, натисніть, щоб завантажити, а потім перейдіть до застосування операції, як описано вище.


Статті по темі

Фільтрувати кілька стовпців одночасно в Excel
Після фільтрування одного стовпця за допомогою функції Фільтрування лише до одного стовпця можуть застосовуватися лише критерії І. У цьому випадку, як можна застосувати критерії AND та OR для одночасного фільтрування кількох стовпців на аркуші Excel? Методи в цій статті можуть вам допомогти.

Фільтруйте або виділяйте комірки за кольором комірки в Excel
Зазвичай ви можете заповнювати комірки різними кольорами для будь-яких цілей в Excel. Якщо у вас є аркуш із використанням різних кольорів для позначення різного типу вмісту, і ви хочете відфільтрувати або виділити ці клітинки за кольором комірки, ви можете зробити це за допомогою методів у цій статті.

Вставити, пропустивши приховані / відфільтровані комірки та рядки в Excel
Наприклад, ви відфільтрували таблицю в Excel, але тепер вам потрібно скопіювати діапазон і вставити в цю відфільтровану таблицю. Чи знаєте ви, як вставити, пропускаючи приховані / відфільтровані комірки та рядки? Кілька простих способів у цій статті можуть вам допомогти.

Фільтруйте рядки на основі виділення списку на іншому аркуші
В Excel ми зазвичай фільтруємо рядки на основі критеріїв, але якщо є два списки, один знаходиться в аркуші1, а інший у аркуші2, чи можете ви мати якісь хитрощі для швидкого фільтрування рядків у аркуші1 на основі списку в аркуші2? Тут ця стаття представляє шляхи вирішення цієї роботи.

Фільтруйте всі пов’язані дані із об’єднаних комірок у Excel
Припустимо, що у вашому діапазоні даних є стовпець об’єднаних комірок, і тепер вам потрібно відфільтрувати цей стовпець із об’єднаними комірками, щоб показати всі рядки, пов’язані з кожною об’єднаною коміркою, як показано на наступних скріншотах. У програмі Excel функція фільтрації дозволяє фільтрувати лише перший елемент, який пов’язаний із об’єднаними клітинками. У цій статті ми говоримо про те, як фільтрувати всі пов’язані дані із об’єднаних комірок у Excel.

Більше підручників з фільтрації даних ...


Найкращі інструменти для підвищення продуктивності офісу

Kutools для Excel вирішує більшість ваших проблем і збільшує продуктивність на 80%

  • Повторне використання: Швидко вставте складні формули, діаграми і все, що ви використовували раніше; Шифрувати комірки з паролем; Створити список розсилки та надсилати електронні листи ...
  • Супер формула бар (легко редагувати кілька рядків тексту та формули); Макет читання (легко читати та редагувати велику кількість комірок); Вставте у відфільтрований діапазон...
  • Об’єднати клітинки / рядки / стовпці без втрати даних; Вміст розділених комірок; Об'єднати повторювані рядки / стовпці... Запобігання дублюючим клітинам; Порівняйте діапазони...
  • Виберіть Повторюваний або Унікальний Рядки; Виберіть Пусті рядки (усі клітинки порожні); Супер знахідка та нечітка знахідка у багатьох робочих зошитах; Випадковий вибір ...
  • Точна копія Кілька клітинок без зміни посилання на формулу; Автоматичне створення посилань на кілька аркушів; Вставте кулі, Прапорці та інше ...
  • Витяг тексту, Додати текст, Видалити за позицією, Видаліть пробіл; Створення та друк проміжних підсумків підкачки; Перетворення вмісту комірок та коментарів...
  • Супер фільтр (зберегти та застосувати схеми фільтрів до інших аркушів); Розширене сортування за місяцем / тижнем / днем, частотою та іншим; Спеціальний фільтр жирним, курсивом ...
  • Поєднайте робочі зошити та робочі аркуші; Об’єднати таблиці на основі ключових стовпців; Розділіть дані на кілька аркушів; Пакетне перетворення xls, xlsx та PDF...
  • Понад 300 потужних функцій. Підтримує Office / Excel 2007-2021 і 365. Підтримує всі мови. Легке розгортання на вашому підприємстві чи в організації. 30-денна безкоштовна пробна версія повних функцій. 60-денна гарантія повернення грошей.
вкладка kte 201905

Вкладка Office забезпечує інтерфейс з вкладками для Office і значно спрощує вашу роботу

  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
  • Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
  • Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
дно офісної таблиці
Коментарі (15)
Оцінено 4.5 з 5 · рейтинги 1
Цей коментар був мінімізований модератором на сайті
Я припускаю, що стовпець A є довідковим стовпцем із жирними клітинками. Я створюю ім'я "Жирний?" із посиланням нижче =GET.CELL(20,OFFSET(INDIRECT("A1"),ROW()-1,0)) У стовпці B я вводжу: = Жирний? Скопіюйте формулу, а потім скористайтеся автофільтром, щоб відфільтрувати значення TRUE. ГОТОВО
Цей коментар був мінімізований модератором на сайті
@Cadafi... це чудово... хоча цікаво, як це працює!
Цей коментар був мінімізований модератором на сайті
Формула @cadafi працює нормально, але не є оптимізованим чи ефективним її використанням. Скоріше ми повинні використовувати пряме посилання на діапазон або клітинку замість цієї команди повного зміщення. Подібно до наступного: =GET.CELL(20,'Sheet1'!A1) Скопіюйте формулу, а потім скористайтеся автофільтром, щоб відфільтрувати значення TRUE. ГОТОВО
Цей коментар був мінімізований модератором на сайті
@Mohammad Faizan Ви абсолютно праві. Спасибі.
Цей коментар був мінімізований модератором на сайті
Дякую Мохаманду Файзану. Ви абсолютно праві.
Цей коментар був мінімізований модератором на сайті
Це спрацювало чудово, дякую!!! :D :lol:
Цей коментар був мінімізований модератором на сайті
Просто та геніально, дякую!
Цей коментар був мінімізований модератором на сайті
Привіт, я використовую цей код, і він працює нормально, але щоразу, коли я натискаю кнопку "Скасувати" діалогове вікно, з'являється спливаюче вікно з деякою помилкою. Підкажіть, будь ласка, як видалити цю помилку. :Sub FilterBold() Dim myRange As Range Встановіть myRange = Application.InputBox(Prompt:="Виберіть діапазон", Title:="InputBox Method", Type:=8) myRange.Select Application.ScreenUpdating = False для кожного myRange У виборі Якщо myRange.Font.Bold = False Then myRange.EntireRow.Hidden = True End Якщо наступний myRange Application.ScreenUpdating = True End Sub
Цей коментар був мінімізований модератором на сайті
Шановний Нітін Джайн,

Вибачте, що так пізно відповідаю!

Ми знайшли проблему і вже усунули її. Сценарій VBA у статті тепер оновлено,

Дякую за коментар!
Цей коментар був мінімізований модератором на сайті
Дякую, що поділились. Це чудово працює.
Цей коментар був мінімізований модератором на сайті
Привіт, я повний новачок у Excel. Я зробив таку техніку, але тепер мені потрібно скопіювати дані, виділені жирним шрифтом/істинно. Коли я спробував зробити це, не буде копіювати те, що виділено. Будь-які ідеї щодо того, як я можу скопіювати дані? Дякую, Річард
Цей коментар був мінімізований модератором на сайті
@RICHARD Чи можете ви надати будь-який знімок екрана вашої електронної таблиці, що показує, що саме ви намагаєтеся зробити?
Цей коментар був мінімізований модератором на сайті
Я використовував цю техніку, і під час спроби скопіювати жирні дані виникла проблема. Він чомусь копіює лише деякі дані. Чи є спосіб скопіювати лише жирні дані за допомогою цієї техніки? Дякую, Річард
Цей коментар був мінімізований модератором на сайті
Шановний Річард Скін,



Ми не зіткнулися з проблемою, як ви сказали. Не могли б ви надати знімок екрана з деталями вашої операції?



Дякую за коментар!
Цей коментар був мінімізований модератором на сайті
Дякую за формулу, вона допомогла
Оцінено 4.5 з 5
There are no comments posted here yet

Слідуй за нами

Copyright © 2009 - WWW.extendoffice.com. | Всі права захищені. На основі ExtendOffice. | Карта сайту
Microsoft та логотип Office є товарними знаками або зареєстрованими товарними знаками Microsoft Corporation у США та / або інших країнах.
Захищений Sectigo SSL