Home Excel - Dicas Microsoft Excel VBA Excel VBA - Copiar Excel planiha vba copiar dados planilha outro wkb

Excel planiha vba copiar dados planilha outro wkb

E-mail Imprimir PDF

Saberexcel - o site de quem precisa aprender Micros Microsoft Excel VBA

Estes macro do aplicativo Microsoft Excel VBA, copia os dados da célula Plan2(I7) para as células F7 e I5 da Plan1, também fiz um macro que copia
dados de outro livro ativo para uma determinada folha planilha. Espero que os exemplos possam lhe ser útil. fique com Deus, Expedito Marcondes
'- - - - - - - - - -
Sub sbx_copia_Dados()
Saber1.Range("F7") = Saber2.Range("I5").Value
Saber1.Range("F7").Copy Saber1.Range("I5")
Application.CutCopyMode = False
MsgBox ("Dados copiados com o macro 'sbx_copia_dados'"), vbInformation, "Saberexcel - o site das macros"
End Sub
'- - - - - - - - - -
Sub sbx_copiar_saberexcel()
Saber1.[F7] = Saber2.[I5]
Saber1.[F7].Copy Saber1.[I5]
MsgBox ("Dados copiados com o macro 'sbx_copiar_saberexcel'"), vbInformation, "Saberexcel - o site das macros"
End Sub

'reproduza  o exemplo deste macro para teste, pois não fiz neste livro exemplo. (por precisar de 2) ok...
Sub sbx_copiando_dados_outro_livro()
Dim wkb1 As Workbook, wkb2 As Workbook
Dim vRange1 As Range, vRange2 As Range

Set wkb1 = Workbooks("wkb1")  'nome do primeiro livro
Set wkb2 = Workbooks("wkb2")  'nome do segundo livro

Set vRange1 = wkb1.Worksheets("Plan1").Range("A1")
Set vRange2 = wkb2.Worksheets("Plan1").Range("A1")

    [vRange1].Copy [vRange2].PasteSpecial 'xlPasteValues

End Sub

'- - - - - - - - - -
Sub sbx_limpar_teste()
Saber1.[F7,I5].ClearContents
End Sub


Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Escola Saberexcel VBA Estudos® - Treinamentos com Macros, Fórmulas e Funções
.



  Baixe o exemplo de planilha contendo os macros acima
Excel planiha vba copiar dados planilha outro wkb (87.69 KB)

Última atualização em Seg, 31 de Outubro de 2011 10:56  

Adicionar comentário

"Jamais considere seus estudos como uma obrigação, mas como uma oportunidade invejável para aprender a conhecer a influência libertadora da beleza do reino do espírito, para seu próprio prazer pessoal e para proveito da comunidade." Albert Einstein


Código de segurança
Atualizar

PROMOÇÃO DIDÁTICOS SABEREXCEL



Adquira já o Acesso Imediato
à Area de Membros

Compra Grantida --- Entrega Imediata

Aprenda Excel VBA com Simplicidade de 
códigos e Eficácia, Escrevendo Menos e
Fazendo Mais.

'-------------------------------------'
Entrega Imediata:
+  500 Video Aulas MS Excel VBA
+  35.000 Planilhas Excel e VBA
+  Coleção 25.000 Macros MS Excel VBA
+  141 Planilhas Instruções Loops
+  341 Planilhas WorksheetFunctions(VBA)
+    04 Módulos Como Fazer Excel VBA
+  Curso Completo MS Excel VBA
+  Planilhas Inteligentes


Pesquisa Google SaberExcel

Publicidade Google

<script type="text/javascript"><!--

google_ad_client = "ca-pub-2317234650173689";

/* retangulo 336 x 280 */

google_ad_slot = "0315083363";

google_ad_width = 336;

google_ad_height = 280;

//-->

</script>

<script type="text/javascript"

src="http://pagead2.googlesyndication.com/pagead/show_ads.js">

</script>

Publicidade

RSFirewallProtected


Google Associados

Depoimentos

Adicione Saberexcel Favoritos

 
 

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA

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


   Sobre as WorksheetFunctions Funções de Planilhas que retornam valores do VBA