Try this

Sub test()
Dim cell As Range
For Each cell In Range("A1:A10")
If cell.EntireRow.Hidden = True Then
MsgBox "Hidden"
Else
MsgBox "not Hidden"
End If
Next
End Sub


--
Regards Ron de Bruin
http://www.rondebruin.nl


"Wandering Mage" <Wandering wrote in message
...
I am in a for loop and want to do this
For Each Cell In Target
If (the current cell in this for loop is hidden) Then
true part
Else
not tru part
End If
Next
how do I write (the current cell in this for loop is hidden) conditional. I
want to find out if Cell, or Cell.Column is hidden, either one will work. As
always thank you in advance for the help, it is appreciated!