Starting from the actual activecell, go to the next empty visible row

Hi AlphaFrog!

It worked perfectly! Thank you so much!

Now I'm curious... how exactly works the part of "xlValues, , , 1)"? what is the meaning of each comma and the number?

I'm asking because I have a keypad in this Excel, and when pressing the arrow "up" runs this code:

ActiveCell.Offset(-1, 0).Select
Do Until ActiveCell.EntireRow.Hidden = False
ActiveCell.Offset(-1, 0).Select
Loop

So, is there a way to use the same code you sent me, but instead of going to the next down cell, going to the upper next cell?

OK, in order to go up, I just did it my way and it works :D

On Error Resume Next
ActiveCell.Offset(0, 0).Select
ActiveCell.Offset(-1, 0).Select
If ActiveCell.EntireRow.Hidden = True Then ActiveCell.End(xlUp).Select
If ActiveCell.EntireRow.Hidden = False Then ActiveCell.Offset(0, 0).Select
If ActiveCell.Row <= 5 Then ActiveCell.Offset(1, 0).Select
Do Until ActiveCell.EntireRow.Hidden = False
Loop

Thanks you all!

Hi, try this one (column E); a is a variable.

a=Activesheet.Cells(1, "E").End(xlDown).Row + 1

Hi hhhle, I just have used the AlphaFrog code and it was perfect! Thanks anyway for your proposal!

Thanks AlphaFrog!

I even now have found another method that better covers my needs. I just leave it here in case could help somebody:

GO DOWN

Sub down ()
Dim startTime As Date

        startTime = Now

        
            ActiveCell.Offset(1, 0).Select
Do Until ActiveCell.EntireRow.Hidden = False
ActiveCell.Offset(1, 0).Select


            If DateDiff("s", startTime, Now) > 0.5 Then
ActiveCell.End(xlDown).Select
                Exit Do
            End If

 Loop

End sub

GO UP:

Sub Up ()
Dim startTime As Date

        startTime = Now

        
            ActiveCell.Offset(-1, 0).Select
Do Until ActiveCell.EntireRow.Hidden = False
ActiveCell.Offset(-1, 0).Select


            If DateDiff("s", startTime, Now) > 0.5 Then
ActiveCell.End(xlup).Select
                Exit Do
            End If

 Loop

End sub

Is basically the same code I had, but now I have added a condition that when the loop takes more than 0.5 seconds, stops the loop and goes directly to the next empty visible row