Galera sou iniciante em vba e preciso da ajuda de vocês

eu tenho uma planilha simples onde tenho vários dados para preencher via userform

eu tenho minha celula A19 que quando dou um CTRL+ seta para baixo ele vai para A22, só que preciso que ele vá para A20 e comece a inserir linhas conforme vou colocando os dados
por exemplo

A19 = PRODUTO VALOR QUANTIDADE
A20 = FEIJAO 123 456
A21 = Item1 29 60

e assim em diante, não posso deixar linhas em branco então estou com dificuldade para isso

estava fazendo assim só que não vai certo

Sheets("Plan1").Select
Range("A19").Select
Selection.End(xlDown).Select
Lin = ActiveCell.Row + 1