Filter only bold text

[yoelpa]

Hi Good morning
Do anyone know if I can filter only bold text

 

[dk]

Not directly, you'd need to use a little bit of VBA.

Paste this code into a standard VBA module:-

Public Function Isbold(AnyCell As Range) As Boolean
If AnyCell.Font.Bold = True Then Isbold = True
End Function

Then use it like this:-

Book2
	A	B	C	D
1	Field1	Field2	Field3	Isbold
2	2	4	9	FALSE
3	4	8	5	FALSE
4	8	7	5	FALSE
5	8	0	7	FALSE
6	3	4	3	TRUE
7	2	0	7	FALSE
8	2	1	5	FALSE
9	3	6	2	FALSE
10	0	3	2	TRUE
11	8	2	8	FALSE
12	9	8	2	FALSE
13	2	8	1	TRUE
14	9	7	6	FALSE
15	5	8	7	FALSE
16	9	7	6	TRUE
17	3	8	9	FALSE
18	7	0	1	FALSE
19	9	3	6	FALSE
20	7	8	1	FALSE
Sheet1

You can filter bold text by filtering where Isbold is true or false.

 

[Juan Pablo González]

Just out of *safety*, I'd change a bit dk's function, like this:

<font face=Courier New>
<SPAN style="color:#00007F">Public</SPAN> <SPAN style="color:#00007F">Function</SPAN> Isbold(AnyCell <SPAN style="color:#00007F">As</SPAN> Range) <SPAN style="color:#00007F">As</SPAN> <SPAN style="color:#00007F">Boolean</SPAN>
    Isbold = AnyCell.Range("A1").Font.Bold
<SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Function</SPAN>

</FONT>

 

[dk]

Just out of *safety*, I'd change a bit dk's function, like this:

<font face=Courier New>
<SPAN style="color:#00007F">Public</SPAN> <SPAN style="color:#00007F">Function</SPAN> Isbold(AnyCell <SPAN style="color:#00007F">As</SPAN> Range) <SPAN style="color:#00007F">As</SPAN> <SPAN style="color:#00007F">Boolean</SPAN>
    Isbold = AnyCell.Range("A1").Font.Bold
<SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Function</SPAN>

</FONT>

OK Juan, that's fair enough! I'm relying on the fact that a boolean function will return false unless explicitly set to true. Not being argumentative, but what is safer with what you proposed?

BTW, like the flags amendment...

 

[yoelpa]

I am amaster in excel most of my dreams in excel came true but anything about vba's
I would apreciate if someone can teach me a little bit about it
I am a quick learner you'l be suprized what spreadsheets I made already without vba's.
You can have alot of fun
Thank You

 

[Juan Pablo González]

...Not being argumentative, but what is safer with what you proposed? ...

I should have used another word... what I was thinking is that if you pass something like

=isBold(A2:D2)

and the bold property is "mixed" in there, some true and some false, the

anyRange.Font.Bold

will return Null. Altough your function WOULD work.. because you're first comparing it with True... I just like making fast assignments...

And glad you like it ! I want to see how varied is our community...