Cara, creio que esta dúvida esteja no fórum errado, porém tentei resolver aqui pra você.

Boa noite esta planilha esta com alguns problemas, os quais não consigo resolver, segue a planilha anexa.
1)Planilha Cadastro:
-Opção consulta não funciona e não consigo identificar o erro;
2) Planilha Produtos:
- O primeiro produto não é acrescentado na linha 2, mas sim na linha 3;
- Novos produto acrescentados são inseridas na ordem errada, são acrescentados na linha 2 ao invés de ser na linha 3 assim por diante.
Desde já agradeço o apoio!!!!

Na sua primeira dúvida, a opção consulta está linkada a uma sheet não existente na sua pasta de trabalho, essa consulta é para consultar o que necessariamente?

E já na segunda dúvida, eu fiz este código:

Sub CadastroItem()

    Range("F3:F6").Select
    Selection.Copy
    'Localiza a próxima célula vazia da coluna A
    Sheets("Produtos").Select
    Range("A65536").Select
    Selection.End(xlUp).Offset(1, 0).Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=True
    
    Range("A1").Select
    Sheets("Cadastro").Select
    
End Sub

Onde este range F3:F6 é um resumo dos itens que você cadastrou para que seja habilitado o código para copiar.

Qualquer dúvida, só avisar!

Me dê um joinha caso a resposta o convenceu, abraços!

Amigo muito obrigado pela força, mas não resolveu meu problema não!!

Fabricio,

tá anexado a planilha arrumada conforme te falei. Apenas o botão cadastro está funcionando, pois não entendi o que você gostaria com os outros botões.

Abrs