Página 1 de 1

Salvar e limpar celula

Enviado: 11 Mai 2020 às 17:45
por carlospenacio
Ola boa tarde, estou tentando criar uma planilha para acompanhar as vendas de uma casa de carne, mas estou esbarrando em algumas dificuldades:
gostaria de apos o cadastramento do que se tem pra vender 'planilha1", quando o cliente for retirar e pagar o produto, ficara em aberto para alteração apenas o campo desconto "planilha3" e quando eu desse o comando no campo salvar "sim" ele jogasse na "planilha4" o que esta descrito em toda a linha da planilha3 e limpasse os campos para nova consulta, e na planilha4 ficaria em ordem todos os pedidos que foram confirmados na planilha 3.
segue planilha em anexo

Salvar e limpar celula

Enviado: 11 Mai 2020 às 20:32
por osvaldomp
Se você quiser experimentar uma solução via macro então instale uma cópia do código abaixo em um módulo comum, assim:
1. copie o código daqui
2. a partir da planilha em que estão os dados tecle 'Alt+F11' para acessar o editor de VBA
3. no menu do editor / Inserir / Módulo
4. cole o código na janela em branco que vai se abrir
5. feito! 'Alt+Q' para retornar para a planilha e testar

para rodar o código:
6. tecle 'Alt+F8' / selecione a macro correspondente / Executar, ou insira um botão na planilha e vincule-o à macro ou vincule-a a um atalho de teclado (Alt+F8 / Opções).
Essas três opções para rodar o código podem ser implantadas isoladamente ou em conjunto.
Código: Selecionar todos
Sub ReplicaDados()
 Sheets("Planilha4").Cells(Rows.Count, 1).End(3)(2).Resize(, 7) = [A3:G3].Value
 [B1,E3,G3] = ""
End Sub

Re: Salvar e limpar celula

Enviado: 12 Mai 2020 às 10:47
por carlospenacio
Valeu amigo. muito obrigado..