Word nao abre

Caros amigos quanto tempo não ? rs

Vamos la estou com probleminha !


coloquei um código somente pra executar de abrir o word... Codigo simples!

Código:

Private Sub GeradorContrato_Click()

On Error GoTo TrataErro
Dim oApp As Object

' Inicia o MS Word
    Set oApp = CreateObject("Word.Application")
    With oApp
' Torna o MS Word visível
        Visible = True
        
        
TrataErro:
'Se um campo do formulário estiver vazio, remove o texto do Indicador e continua
    If Err.Number = 94 Then
        oApp.Selection.Text = ""
        Resume Next
    End If


End With

End Sub

Porem ele não abre e fica executado no gerenciador de tarefas já aconteceu com alguém ?
winword.exe fica aberto la NÃO APARECE ERRO ALGUM.


abraços

Boa tarde,
Estará instanciado? Vá ao gestor de tarefas e cancele e termine a tarefa

Sobre o código, experimente
Private Sub GeradorContrato_Click()

On Error GoTo TrataErro
Dim oApp As Object

' Inicia o MS Word
Set oApp = CreateObject("Word.Application")
With oApp
' Torna o MS Word visível
.Visible = True
End With
Exit Sub
TrataErro:
'Se um campo do formulário estiver vazio, remove o texto do Indicador e continua
If Err.Number = 94 Then
oApp.Selection.Text = ""
Resume Next
End If

End Sub

Poxa deu certo, que magica é essa? HAHAHAHa

porem ele nao abre a folha pra inserção de dados.

Porque não lhe deu instrução para abrir qualquer ficheiro

poderia me passa o parâmetro por favor!


a ideia é fazer um gerador de contrato atraves do formulario com os dados passar por indicadores do word entendeu ?


Eu peguei o exemplo o Avelino, porem estou tentando editar para meu app.



abraços

Procure no fórum, não sei como se chama o ficheiro, mas será do tipo Application.Documents.Open
Já podia acompanhar muitas dúvidas semelhantes

tudo bem!

Eu já consegui por o exemplo do avenilo em pratica, porem ele não abre a aplicação do word só quando click varias vezes no botton.


ai aparece uma informação no windows "arquivo em uso"


bookmarkmodelo.dotx esta bloqueado para edição

voce deseja:

Abrir uma copia somente leitura
etc
etc
etc


entendeu ?

Tantos exemplos,
Se estiver só à espera que lhe entreguem tudo pronto, não aprende nem chega a ajudar outros um dia
Veja esta dúvida recente
https://www.maximoaccess.com/t34089-relatorio-do-access-usando-postgres?highlight=word+abrir#233739

Alexandre, boa noite amigo.

Na vdd eu ando prosseguindo com os estudos, não fico esperando não, pode apostar.

Obrigado pela informação do post.

Na vdd eu consegui fazer rodar o do Avelino, porem ele esta dando problema hiperlink tendencioso. eu pois um código do próprio Avelino, porem não funcionou.

Código:

Application.FollowHyperlink strLocal


você teria algum critério para tirar esse problema de hiperlink de confiabilidade?


abraços