• Hi All

    Please note that at the Chandoo.org Forums there is Zero Tolerance to Spam

    Post Spam and you Will Be Deleted as a User

    Hui...

  • When starting a new post, to receive a quicker and more targeted answer, Please include a sample file in the initial post.

Move Row down automatic if above cell is filled with data

You mean when you enter a data into a cell and press enter, it should move down to a lower row?
 
Hi,

You can do it two ways
Option 1

Dim I as Integer
i = .Cells(.Rows.Count, "A").End(xlUp).Row + 1

Option 2

Dim emptyRow As Long
'Determine emptyRow
emptyRow = WorksheetFunction.CountA(Range("A:A")) + 1
 
Back
Top