Ir para conteúdo

A partir do dia 19/11/2018, o foco do Fórum do BABOO é apenas Windows e Segurança Digital conforme informado no início de 2018.
As áreas que não têm relação com esses dois assuntos foram arquivadas e seus tópicos estão disponíveis para consulta na área Tópicos Antigos.

Fabio Junior

EXCEL - Macro para copiar dados e preencher data e forma de pagamento

Mensagem Recomendada

Boa tarde!

Amigos,

Gostaria de pedir a ajuda de vocês para  uma Macro que pegue os dados de uma venda e copie e cole em outra aba "DADOS" continuando na ultima linha, preenchendo a data e hora e colocando a forma de pagamento de acordo com o escolhido e salvar em seguida.

Seria um controle de vendas diárias.

Em anexo exemplo.

Obrigado!

 

Controle Vendas.xlsm

Compartilhar este post


Link para o post
Compartilhar em outros sites

Prezados,

 

Tentei fazer uma VBA aqui, só que nao esta saindo como esperado poderiam dar um help? Abaixo o código.

Sub Macro2()
' Macro2 Macro
    'SELECIONA OS DADOS EM CODIGO  E QUANTIDADE E COPIA E COLA ESPECIAL VALORES NA ABA DADOS
    Range("B7:E10").Select
    Selection.Copy
 
    'IR NA ULTIMA LINHA VAZIA COLUNA B E COLAR OS DADOS
    Sheets("DADOS").Select
    Range("A1048576").End(xlUp).Offset(0, 2).Select
       Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
        
    'COPIA A DATA E COLA NA ABA DADOS NA COLUNA A NA ULTIMA LINHA VAZIA REPETINDO PARA OS DADOS COPIADOS
    Sheets("VENDA").Select
    Range("E4").Select
    Application.CutCopyMode = False
    Selection.Copy
    Sheets("DADOS").Select
    Range("A1048576").End(xlUp).Offset(0, 1).Select
    'Range("A8:A11").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Sheets("VENDA").Select
    Range("B7:C18").Select
    Application.CutCopyMode = False
    Selection.ClearContents
    Range("B7").Select
End Sub

Obrigado

Compartilhar este post


Link para o post
Compartilhar em outros sites

@osvaldomp boa noite!

Sem palavras para descrever, muitíssimo obrigado! Osvaldo, você indica algo para poder aprender a programar em VBA? Um ótimo final de semana e gratidão pela ajuda!

Compartilhar este post


Link para o post
Compartilhar em outros sites

Veja se o link abaixo ajuda.

Outras formas são o sábio Google e os fóruns, além de cursos.

Para saber sobre determinado comando, no editor de VBA clique sobre o comando e aperte F1 para acessar a ajuda.

http://www.bertolo.pro.br/FinEst/SemanaContabeis2007/MacroExcel.pdf


 

Osvaldo

 

Compartilhar este post


Link para o post
Compartilhar em outros sites

×