VBA for hiding unbolded rows

[artemis1975]

Hello,

Every week I have to go through a generated report and physically hide all the rows with unbolded text.

Is it possible to write a macro that will automatically hide all rows with unbolded text in a worksheet?

Thank you.

 

[Ruddles]

Hide rows which are completely bold, which have any bold in them anywhere, or which are bold in a specific column?

 

[jim may]

You might be able to use something like this -- Select/Highlight the Sheet Range to be included in the search before running Macro

In a Standard Module paste this code in:

Sub Foo()
On Error Resume Next
Set Rng = Selection
For Each c In Rng
    If c <> "" Then
        If Not c.Font.Bold Then
        c.EntireRow.Hidden = True
        End If
    End If
Next c
End Sub

 

[artemis1975]

It's a budget report. It's set up like this:

Bolded Text: Category Number and name
Several rolls of unbolded text that are the individual entries into that category
Bolded Text: Subtotal of that Category


We are only interested in looking at the bolded rows (the category name and the category subtotal) and hiding all the information between.

This is done manually, I am hoping there is a macro that would automatically hide all unbolded rows.

Hope that explains it.

 

[artemis1975]

Jim! Thank you thank you thank you! That worked! You just saved us hours of tedium!

 

[jim may]

My #3 statement is Incorrect; Don't bother getting into...