unhidden row
 

May I know how to number unhidden rows only

unhidden row
 

I never felt a need to do this but this should do it.

Sub numbervisiblerows()
mc = 2'column number to check 2 is column B
For i = 1 To Cells(Rows.Count, mc).End(xlUp).Row
If Rows(i).Hidden = False Then Cells(i, mc -1) = j
j = j + 1
Next i
End Sub
--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Nahc" wrote in message
...
May I know how to number unhidden rows only

unhidden row
 

sorry sir, is there a simpler explanation ?

"Don Guillett" wrote:

I never felt a need to do this but this should do it.

Sub numbervisiblerows()
mc = 2'column number to check 2 is column B
For i = 1 To Cells(Rows.Count, mc).End(xlUp).Row
If Rows(i).Hidden = False Then Cells(i, mc -1) = j
j = j + 1
Next i
End Sub
--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Nahc" wrote in message
...
May I know how to number unhidden rows only