View Single Post
  #5   Report Post  
Nexan
 
Posts: n/a
Default

Could you possibly give me an example of that?

Thanks!

"Nick" wrote:

You could use LCASE or the Like operator.

Nick


"Nexan" wrote in message
...
Okay, I've hit a snag with this. I just realized that this script only
seems
to be finding cells containing nothing but letters in all caps. Is there a
way to find cells containing some words in all caps and some in
upper/lowercase?

"Jason Morin" wrote:

Select your data and run this macro:

Sub OnlyUpper()
Dim cell As Range
For Each cell In Selection
If cell.Value = UCase(cell.Value) Then
cell.Font.ColorIndex = 3 'make font color = red
End If
Next
End Sub

---
HTH
Jason
Atlanta, GA


"Nexan" wrote:

As part of a macro, I'd like to be able to identify and re-format only
cells
containing words in all caps. Is that doable?

Thanks!