Bold and formated cell wnat to delete in one stroke

G

Guest

I want to select all high lighted cells (with Bold font or cell formatted
with any color) in selected range. With one stroke. Becuase i want to delete
all Bold and formatted cells.
 
G

Gord Dibben

Sub Cleanup()
Dim rng As Range
For Each rng In Selection
If rng.Font.Bold = True Or rng.Interior.ColorIndex _
<> xlNone Then
rng.ClearContents
rng.ClearFormats
End If
Next rng
End Sub


Gord Dibben MS Excel MVP
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top