Este fórum está sendo desativado

Depois de 9 anos, este fórum será desativado. Mas calma.... estamos migrando para uma comunidade no DISCORD. Junte-se a nós.

ENTRAR PARA DISCORD

Tópicos relacionados a códigos VBA, gravação de macros, etc.
  • Avatar do usuário
#22152
Bom dia gente!

Estou precisando que determinadas informaçoes da tabela sejam copiadas pra outra ABA sempre que eu clicar em salvar dados, porém preciso que os dados não se sobrescrevam por exemplo:

ESSA SERIA A PARTE DE INFORMAÇOES QUE SERÃO SALVAS
Imagem

ASSIM FICARIA AS INFORMAÇOES DEPOIS DE SALVAS.
Imagem

O que eu quero é que sempre que eu salvar as INFORMAÇOES da aba DIGIGITAÇÃO, a aba DADOS seja alimentada com essas informaçoes sem que uma dado de uma nota fiscal sobrescreva a outra.

Segue a planilha para melhor entendimento.
Você não está autorizado a ver ou baixar esse anexo.
#22173
Experimente:

Código: Selecionar todos
Sub ReplicaDados()
 Dim LRo As Long, LRd As Long
  LRo = Cells(Rows.Count, 1).End(3).Row
   With Sheets("Dados")
    LRd = .Cells(Rows.Count, 1).End(3).Row
    .Cells(LRd + 1, 4).Resize(LRo - 7, 13).Value = Range("A8:M" & LRo).Value
    .Cells(LRd + 1, 1).Resize(LRo - 7, 2).Value = Application.Transpose(Range("C5:C6").Value)
    .Cells(LRd + 1, 3).Resize(LRo - 7).Value = Range("E5").Value
   End With
 'Range("C4:C6,E5,A8:M" & LRo) = ""
End Sub
obs. se você quiser limpar a planilha "Digitação" após replicar os dados, remova o apóstrofo do início da penúltima linha do código
long long title how many chars? lets see 123 ok more? yes 60

We have created lots of YouTube videos just so you can achieve [...]

Another post test yes yes yes or no, maybe ni? :-/

The best flat phpBB theme around. Period. Fine craftmanship and [...]

Do you need a super MOD? Well here it is. chew on this

All you need is right here. Content tag, SEO, listing, Pizza and spaghetti [...]

Lasagna on me this time ok? I got plenty of cash

this should be fantastic. but what about links,images, bbcodes etc etc? [...]

Estamos migrando para uma comunidade no Discord