lscarano
-
Posts
2 -
Cadastrado em
-
Última visita
Tipo de conteúdo
Artigos
Selos
Fabricantes
Livros
Cursos
Análises
Fórum
posts postados por lscarano
-
-
Prezados,
estou criando um pequeno programa no Excel que realiza vendas de livros. Uma das planilhas contém uma espécie de Nota fiscal. Estou querendo criar uma rotina em que quando o vendedor clicar no botão "Registrar venda", registre Nome, CPF, CNPJ, Data e Valor total da venda, mas não estou conseguindo fazer a cópia, pois está dando problema na linha abaixo:
Private Sub Botao_RegistroVenda_Click()'Variável para contat a quantidade de registros armazenados +1'Registro = Sheets("Registro de venda").UsedRange.Rows.Count + 1Sheets("Venda").Select 'Seleciona a planilha "Venda"Cells(7, 2).SelectSelection.CopySheets("Registro de venda").SelectCells(Registro, 1).SelectActivesheets.Paste ' Cola os valores selecionados da outra planilhaApplication.CutCopyMode = False ' Desativa a seleção.End SubEstou tentando copiar célula por célula, já que são células separadas, mas se possível queria saber se há como copiar várias células de uma vez. Segue abaixo as imagens das planilhas.Planilha "Venda"Planilha "Registro de venda"Aguardo qualquer dúvida sobre o post.
Sobre o Clube do Hardware
No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais
Direitos autorais
Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais
Copiar valores de células para outra planilha em VBA
em Microsoft Office e similares
Postado
Eu sei, mas queria saber como faz no Excel, pois tenho mais facilidade em utilizá-lo em uma série de coisas.