Saberexcel - o Site das Macros
![](/images/stories/excel/linazul.jpg) Essa macro do Aplicativo Microsoft Excel VBA(Visual Basic Application), copia dados de determinado intervalo de células para o Aplicativo Word.
Private Sub CommandButton1_Click()
Dim MSWord As Object
Worksheets("Plan1").Range("A1:B3").Copy
Set MSWord = CreateObject("Word.Application") MSWord.Visible = True MSWord.ScreenUpdating = True
With MSWord
With .Documents.Add .Range.Paste End With
.WindowState = wdWindowStateMaximize End With
End Sub
![](/images/stories/excel/linazul.jpg) Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel
![](/images/stories/jm_produtos.jpg)
Publicidade Compre com segurança, garantia e ótimos preços
![Eletrônicos - Submarino.com.br](http://i.s8.com.br/images/afiliados/banner/468x60_eletronicos.jpg) |