メインコンテンツへスキップ

Excelで太字でセルをフィルタリングするにはどうすればよいですか?

太字のフォントスタイルを適用してExcelのセルのデータまたはコンテンツを書式設定できますが、Excelの太字のフォントスタイルを含むセルでセルをフィルター処理する方法を知っていますか? この記事では、Excelで太字でセルをフィルタリングするためのトリッキーなVBAマクロをいくつか集めています。

ヘルパー列で太字のセルをフィルタリングする
VBAコードで太字のセルをフィルタリングする
すばらしいツールで太字のセルを簡単にフィルタリング
データフィルタリングのその他のチュートリアル…


ヘルプ列で太字のセルをフィルタリングする

以下のスクリーンショットに示すように、列Bのすべての太字のセルをフィルタリングする必要がある場合は、次のようにしてください。

以下のユーザー定義関数は、列のセルが太字であるかどうかを識別し、ヘルパー列で結果をTRUEまたはFalseとして返すのに役立ちます。 すべてのTRUE結果をフィルタリングして、列Bの太字のセルのみを表示できます。

1。 プレス 他の + F11 キーを押して アプリケーション用 Microsoft Visual Basic 窓。

2。 の中に アプリケーション用 Microsoft Visual Basic ウィンドウ、クリック インセット > モジュール、 次に、次のVBAコードをモジュールウィンドウにコピーします。 スクリーンショットを参照してください:

VBAコード:太字でセルをフィルタリングする

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

3。 プレス 他の + Q コードウィンドウを閉じるためのキー。

4.テーブルに隣接する空白のセルを選択し(選択したセルはフィルターテーブルの最初の行の同じ行にあるはずです)、以下の数式をコピーして、を押します。 入力します キー。

= IsBold(B2)

5.最初の結果セルを選択し続け、塗りつぶしハンドルをドラッグしてすべての結果を取得します。 スクリーンショットを参照してください:

6.ヘルパー列のヘッダーを選択し、をクリックします 且つ > フィルタ。 ヘッダーセルの横にある矢印ボタンをクリックして、 TRUE ボックスのみをクリックし、をクリックします [OK]をクリックします。

これで、以下のスクリーンショットに示すように、列Bのすべての太字のセルが除外されます。


Excelで数回クリックするだけで、列の太字のセルをすばやくフィルタリングできます。

また, 太字のセルをフィルタリングする の有用性 Kutools for Excel 以下のデモに示すように、数回クリックするだけで、特定の列のすべての太字のセルをすばやくフィルタリングできます。
今すぐKutoolsfor Excelの全機能を30日間無料でダウンロードしてください!


VBAコードで太字のセルをフィルタリングする

以下のVBAコードを使用すると、XNUMXつの列のすべての太字セルを直接フィルタリングできます。 次のようにしてください。

1.ヘッダーセルを除くすべての太字セルを除外する列範囲を選択します。 この場合、B2:B16を選択します。

2。 プレス 他の + F11 キーを押して アプリケーション用 Microsoft Visual Basic 窓。

3。 の中に アプリケーション用 Microsoft Visual Basic ウィンドウ、クリック インセット > モジュール、 次に、次の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 for Excel。 このユーティリティを使用すると、選択した列のすべての太字のセルが数回クリックするだけですぐにフィルタリングされます。

申請する前に Kutools for Excelについては 最初にダウンロードしてインストールします.

1.太字のセルをフィルタリングする列範囲を選択し、をクリックします クツールズプラス> 特殊フィルター > 太字のフィルター それを成し遂げるために。 以下のデモを参照してください。

  このユーティリティの無料トライアル(30日)が必要な場合は、 クリックしてダウンロードしてください、次に、上記の手順に従って操作を適用します。


関連記事

Excelで複数の列を同時にフィルタリングする
フィルタ機能を使用してXNUMXつの列をフィルタリングした後、AND基準のみを複数の列に適用できます。 この場合、ANDとORの両方の基準を適用して、Excelワークシートで複数の列を同時にフィルタリングするにはどうすればよいでしょうか。 この記事のメソッドはあなたに有利に働くことができます。

Excelでセルの色でセルをフィルタリングまたは選択します
通常、Excelでは、目的に応じてセルをさまざまな色で塗りつぶすことができます。 さまざまな種類のコンテンツを示すためにさまざまな色を使用するワークシートがあり、それらのセルをセルの色でフィルタリングまたは選択する場合は、この記事の方法で実行できます。

非表示/フィルタリングされたセルと行をスキップしてExcelに貼り付けます
たとえば、Excelでテーブルをフィルタリングしましたが、範囲をコピーしてこのフィルタリングされたテーブルに貼り付ける必要があります。非表示/フィルタリングされたセルと行をスキップして貼り付ける方法を知っていますか? この記事のいくつかの簡単な方法が役に立ちます。

別のシートのリスト選択に基づいて行をフィルタリングする
Excelでは通常、条件に基づいて行をフィルタリングしますが、1つのリストがあり、2つはSheet1にあり、もう2つはSheetXNUMXにある場合、SheetXNUMXのリストに基づいてSheetXNUMXの行をすばやくフィルタリングするためのトリックはありますか? この記事では、この仕事を解決する方法を紹介します。

Excelで結合されたセルからすべての関連データをフィルタリングする
データ範囲にマージされたセルの列があるとします。次に、この列をマージされたセルでフィルタリングして、次のスクリーンショットのように、マージされた各セルに関連するすべての行を表示する必要があります。 Excelでは、フィルター機能を使用すると、結合されたセルに関連付けられた最初のアイテムのみをフィルター処理できます。この記事では、Excelで結合されたセルからすべての関連データをフィルター処理する方法について説明します。

データフィルタリングのその他のチュートリアル…

最高のオフィス生産性向上ツール

人気の機能: 重複を検索、強調表示、または識別する   |  空白行を削除する   |  データを失わずに列またはセルを結合する   |   数式なしのラウンド ...
スーパールックアップ: 複数の基準の VLookup    複数の値の VLookup  |   複数のシートにわたる VLookup   |   ファジールックアップ ....
詳細ドロップダウン リスト: ドロップダウンリストを素早く作成する   |  依存関係のドロップダウン リスト   |  複数選択のドロップダウンリスト ....
列マネージャー: 特定の数の列を追加する  |  列の移動  |  Toggle 非表示列の表示ステータス  |  範囲と列の比較 ...
注目の機能: グリッドフォーカス   |  デザインビュー   |   ビッグフォーミュラバー    ワークブックとシートマネージャー   |  リソースライブラリ (自動テキスト)   |  日付ピッカー   |  ワークシートを組み合わせる   |  セルの暗号化/復号化    リストごとにメールを送信する   |  スーパーフィルター   |   特殊フィルター (太字/斜体/取り消し線をフィルター...) ...
上位 15 のツールセット12 テキスト 工具 (テキストを追加, 文字を削除する、...)   |   50+ チャート 種類 (ガントチャート、...)   |   40+ 実用的 (誕生日に基づいて年齢を計算する、...)   |   19 挿入 工具 (QRコードを挿入, パスから画像を挿入、...)   |   12 変換 工具 (数字から言葉へ, 通貨の換算、...)   |   7 マージ&スプリット 工具 (高度な結合行, 分割セル、...)   |   ... もっと

Kutools for Excel で Excel スキルを強化し、これまでにない効率を体験してください。 Kutools for Excelは、生産性を向上させ、時間を節約するための300以上の高度な機能を提供します。  最も必要な機能を入手するにはここをクリックしてください...

kteタブ201905


Officeタブは、タブ付きのインターフェイスをOfficeにもたらし、作​​業をはるかに簡単にします

  • Word、Excel、PowerPointでタブ付きの編集と読み取りを有効にする、パブリッシャー、アクセス、Visioおよびプロジェクト。
  • 新しいウィンドウではなく、同じウィンドウの新しいタブで複数のドキュメントを開いて作成します。
  • 生産性を 50% 向上させ、毎日何百回もマウス クリックを減らすことができます!
Comments (16)
Rated 4.5 out of 5 · 2 ratings
This comment was minimized by the moderator on the site
Thanks for sharing, it works wonderful, thank you!
Rated 4.5 out of 5
This comment was minimized by the moderator on the site
Thanks for the formula..it helped
Rated 4.5 out of 5
This comment was minimized by the moderator on the site
I've used this technique and had an issue when trying to copy the bold data. It only copies some of the data for some reason. Is there any way of copying only the bold data using this technique? Thanks, Richard
This comment was minimized by the moderator on the site
Dear richard skins,



We didn't encounter the problem as you mentioned. Would you please provide a screenshot with details of your operation?



Thank you for your comment!
This comment was minimized by the moderator on the site
Hi, I'm a complete excel novice, i've done the following technique but now need to copy the data which is bold/true. When I have tried to do this is won't copy what is highlighted. Any ideas on how I can copy the data? Thanks, Richard
This comment was minimized by the moderator on the site
@RICHARD Can u please provide any screenshot of your spreadsheet showing what u are exactly trying to do?
This comment was minimized by the moderator on the site
Thanks for sharing. It works wonderful.
This comment was minimized by the moderator on the site
Hi I am using this code and its working fine but whenever I click on cancel the dialogue box a popup window appear and shows some error. Can you please tell me how to remove that error. :Sub FilterBold() Dim myRange As Range Set myRange = Application.InputBox(Prompt:="Please Select a Range", Title:="InputBox Method", Type:=8) myRange.Select Application.ScreenUpdating = False For Each myRange In Selection If myRange.Font.Bold = False Then myRange.EntireRow.Hidden = True End If Next myRange Application.ScreenUpdating = True End Sub
This comment was minimized by the moderator on the site
Dear Nitin Jain,

Sorry to reply so late!

We have found the proble and fixed it already. The VBA script in the article is now updated,

Thank you for your comment!
This comment was minimized by the moderator on the site
Simple and brilliant, thank you!
This comment was minimized by the moderator on the site
This worked perfectly, thank you!!! :D :lol:
This comment was minimized by the moderator on the site
I presume that column A is the reference Column with Bold cells. I create a Name "Bold?" with the refer to as below =GET.CELL(20,OFFSET(INDIRECT("A1"),ROW()-1,0)) In column B, I type: =Bold? Copy down the formula and then use autofilter to filter the value TRUE. DONE
This comment was minimized by the moderator on the site
@cadafi ur formula works fine but it is not the optimised or efficient use of it. Rather we should use direct reference of the range or a cell in place of that complete offset command. Like the one as follows: =GET.CELL(20,'Sheet1'!A1) Copy down the formula and then use autofilter to filter the value TRUE. DONE
This comment was minimized by the moderator on the site
Thanks Mohamand Faizan. You are entirely correct.
This comment was minimized by the moderator on the site
@Mohammad Faizan You are entirely correct. Thanks.
This comment was minimized by the moderator on the site
@Cadafi.... thats brilliant... wondering how it works though!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations