Pessoal estou com um probleminha.
Sou iniciante em vba por este motivo não sei como resolver meu erro.
Tenho uma botão no excel que ao ser clicado precisa abrir um documento word (.doc)
Segue abaixo o codigo que me passaram, porem a unica coisa que consegui abrir é pasta:
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private Sub Relatorio_Click()
ShellExecute hwnd, "open", textbox1, "C:\Temp\relatorio.doc", "C:\Temp\relatorio.doc", 4
End Sub
Alguem pode me ajudar ou passar algum codigo que funcione?
Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
Abrir arquivo do word atraves do excel vba [RESOLVIDO]
-
- Colaborador
- Mensagens: 31
- Registrado em: Qua Mai 11, 2011 9:02 pm
Abrir arquivo do word atraves do excel vba [RESOLVIDO]
Editado pela última vez por thiago.padial em Ter Ago 30, 2011 10:49 pm, em um total de 1 vez.
Re: Abrir arquivo do word atraves do excel vba
Boa tarde,
Veja se este código ajuda:
Fonte: http://www.mrexcel.com/archive/Office/19023.html
Abraço
Veja se este código ajuda:
Código: Selecionar todos
Sub OpenWordDoc()
'Habilitar Microsoft Word n.n Object Library em Ferramentas\Referências
Dim wdApp As Word.Application, wdDoc As Word.Document
On Error Resume Next
Set wdApp = GetObject(, "Word.Application")
If Err.Number <> 0 Then 'Word isn't already running
Set wdApp = CreateObject("Word.Application")
End If
On Error GoTo 0
Set wdDoc = wdApp.Documents.Open("C:\Temp\relatorio.doc")
wdApp.Visible = True
End Sub
Abraço
-
- Colaborador
- Mensagens: 31
- Registrado em: Qua Mai 11, 2011 9:02 pm
Re: Abrir arquivo do word atraves do excel vba
Nossa esta foi em cima do pedido..
O que eu precisava...
Tem como abrir o arquivo word em 1° plano? ou seja ao clicar eu aparecer diretamente na tela? sem eu ter que clicar nele barra de tarefas?
Outra duvida há possibilidades de quando abrir o documento ja abrir com a tela de impressão, ou seja eu só escolho quntas copias eu quero e aperto imprimir,
Muito obrigado....
O que eu precisava...
Tem como abrir o arquivo word em 1° plano? ou seja ao clicar eu aparecer diretamente na tela? sem eu ter que clicar nele barra de tarefas?
Outra duvida há possibilidades de quando abrir o documento ja abrir com a tela de impressão, ou seja eu só escolho quntas copias eu quero e aperto imprimir,
Muito obrigado....