Entrar com dados através de um formulário
Senhores desculpe minha leiguise, mas sou iniciante no VBA.
Estou criando um sistema ´para controle de avarias.

Então, Criei um formulário, e a partir do preenchimento dele, queria inputar dados na planilha, acontece que eu só consigo inserir dados no meu primeiro intervalo de células vazias que são do "A12:M12", depois tudo que eu inserir no formulário sobescreve o que eu tinha entrada antes.

de uma olhada no meu código e ve se consegue me ajudar

Private Sub CommandButton1_Click()
Application.Goto reference:=("ini")
'Ini = celula A12 renomeada.
ActiveCell.Value = Me.TextBox_data
ActiveCell.Offset(0, 1).Activate
ActiveCell.Value = Me.TextBox_produto
ActiveCell.Offset(0, 1).Activate
ActiveCell.Value = Me.TextBox_código
ActiveCell.Offset(0, 1).Activate
ActiveCell.Value = Me.TextBox_lote
ActiveCell.Offset(0, 1).Activate
ActiveCell.Value = Me.TextBox_quantidade
ActiveCell.Offset(0, 1).Activate
ActiveCell.Value = Me.TextBox_pallete
ActiveCell.Offset(0, 1).Activate
ActiveCell.Value = Me.TextBox_tipodeavaria
ActiveCell.Offset(0, 1).Activate
ActiveCell.Value = Me.TexBox_causadaavaria
ActiveCell.Offset(0, 1).Activate
ActiveCell.Value = Me.TextBox_resppelaavaria
ActiveCell.Offset(0, 1).Activate
ActiveCell.Value = Me.TexBox_causadaavaria
ActiveCell.Offset(0, 1).Activate
ActiveCell.Value = Me.TextBox_dataemissão
ActiveCell.Offset(0, 1).Activate
ActiveCell.Value = Me.TextBox_emissor
ActiveCell.Offset(0, 1).Activate
ActiveCell.Value = Me.TextBox_status
ActiveCell.Offset(0, 1).Activate
ActiveCell.Value = Me.TextBox_observação
ActiveCell.Offset(1, -13).Activate
End Sub