Saberexcel - o site de quem precisa Aprender Macros Microsoft Excel VBA.

Excel planilha vba copiar para outra planilha sel linha
Esse procedimento do Aplicativo Microsoft Excel VBA(Visual Basic Application), copia células de determinada linha para outra folha de planilha, neste caso copia os dados de determinada células para a  folha de planilha Auxiliar. Aproveitei e fiz uma soma de determinada coluna, no visual basic Apllication com intenção didática para ajudar quem precisar aprender a fazer uma soma no excel através do VBA. Fiquem com Deus, Expedito Marcondes.
'evento SelectionChange
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Target.Address <> ActiveCell.EntireRow.Address Then Exit Sub
  Intersect(Target, Range("B:C,G:G")).Copy Sheets("Auxiliar").Range("A65536").End(xlUp)(2)
  somar_valores
  MsgBox ("dados copiados ..Total: " & Format(Saber2.Range("D1").Value, "R$ ##,###.00")), vbInformation, "Saberexcel - site das macros"
 End Sub
'-----'
Fiz esse macro com objetivo didático, aqui você poderá aprender como fazer uma soma de uma determinada coluna em uma qualquer folha de planilha e retornar  a soma para uma célula, esse retorno poderia ser, para um label, uma textbox, combobox, frame, enfim para onde desejar.

Sub Somar_valores()
Dim vContador As Long
Dim vTotal As Currency

For vContador = 2 To Saber2.Range("C65000").End(xlUp).Row
    vTotal = vTotal + Saber2.Range("C" & vContador).Value
Next vContador
Saber2.[D1].Value = vTotal
End Sub
'Macro auxliar para
ajudar no teste...
Sub limpar_teste()
Cells(1, 4).ClearContents  'celula(d1)
End Sub



Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel



        Acesso Livre - Registrados (REGISTRE-SE!) 
   Baixe o exemplo de planilha contendo os procedimento e macro acima
   Excel planilha vba copiar para outra planilha sel linha (114.65 KB)

Publicidade
Compre com segurança, garantia e ótimos preços