Imprimindo um documento do Word

Imprimindo um documento do Word via Visual Basic

Vamos mostrar como imprimir um arquivo no padrão Word (*.doc) via código VBA (Leia artigo - Usando VBA).

É simples , rápido e indolor.... Vamos lá... (eu já disse isto antes...)

Inicie o VB e crie um novo projeto padrão EXE.
No Menu Projects| References selecione a opção : Microsoft Word 9.0 Object Library e clique no botão OK.

No formulário padrão insira um botão de comando(cmdimprimir) e a seguir digite o código abaixo no evento click do mesmo

Private Sub cmdimprimir_Click()

Dim word As New word.Application
With word
.Documents.Open "c:\teste\teste.doc"
.Visible = False
.PrintOut
.Quit wdDoNotSaveChanges
End With
Set word = Nothing

End Sub

No código criamos uma instância do objeto Word , abrimos o documento teste.doc , não permitimos a visualização do Word(.Visible = False) , começamos a impressão(.PrintOut) e saímos sem salvar(.Quit wdDoNotSaveChanges)

Pronto, até a próxima dica...