|
|
|
|
 |
Título da Dica: Imprimir um arquivo do word direto do vb
|
 |
|
|
|
Postada em 4/12/2002 por DTLucchesi
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)
|
|
|
|
|
