Este fórum está sendo desativado

[jeacks]

Olá, estou tentando montar uma planilha de cadastro de Clientes, consegui fazer com que envie, mas não sei conseguir fazer com o que foi digitado antes sumir para poder ser digitado um novo cadastro.

Deixarei a planilha em anexo, nela explico melhor.




Desde já grato, meu muito obrigado a todos.

[osvaldomp]

Experimente:

Código: Selecionar todos

Sub ReplicaDados()
 Range("C6:F6").Copy Sheets("History_Cliente").Cells(Rows.Count, 2).End(3)(2)
 [C6:F6] = "": [C6].Activate
End Sub

[jeacks]

Perfeito, Funciono direitinho, parabéns pela simplicidade e criatividade. simplifico bastante.