WORD NO VB COM WINDOWS 10

VPVJUNIOR 06/02/2017 18:01:10
#471430
Boa tarde galera! a anos que não tiro mais dúvidas no fórum, mas com essa evolução dos windows, apareceu uma que está me deixando doido, o problema está relacionado a criação de um novo documento no word com o VB6, usando o windows 10 e word 2103. Ele está travando quando executo a linha de comando [b]ObjWORD.Documents.Add[

OBS: isso só acontece quando estou debugando, mas quando crio o executável ele roda beleza sem problemas

Set ObjWORD = New Word.Application <-- aqui ele passa beleza
ObjWORD.Documents.Add <-- mas aqui ele trava

Agradeço ajuda um abraço
TUNUSAT 16/02/2017 15:15:21
#471713
VPVJUNIOR,

Eu estava fuçando o Macoratti e vi este exemplo:

http://www.macoratti.net/vba_ofce.htm

Private Sub criarDocumentoWord()

[ô]cria documento no word baseado em um modelo extrato.dot
Set oWordDoc = oWordApp.Documents.Add(Template:=gcaminho & [Ô]\extrato.dot[Ô], newtemplate:=False)

End Sub


... tipo .... é obrigatório indicar o caminho?

Não, espere!

Segundo a Microsoft:

https://msdn.microsoft.com/en-us/library/office/ff845011.aspx
https://msdn.microsoft.com/pt-br/library/office/ff845011.aspx

Este exemplo cria um novo documento baseado no modelo Normal.

Documents.Add


Este exemplo cria um novo documento baseado no modelo Professional Memo.

Documents.Add Template:=[Ô]C:\Program Files\Microsoft Office[Ô] & [Ô]\Templates\Memos\Professional Memo.dot[Ô]


Este exemplo cria e abre um novo modelo, usando o modelo anexado ao documento ativo como ponto de partida.

tmpName = ActiveDocument.AttachedTemplate.FullName 
Documents.Add Template:=tmpName, NewTemplate:=True


Talvez você esteja com problemas de permissão para abrir o documento em determinada pasta. Experimente apontar par outro lugar o [Ô]Normal.dot[Ô].


[][ô]s,
Tunusat.
VPVJUNIOR 06/03/2017 10:19:35
#472203
Bom Dia TUNUSAT!

Tentei seu exemplos da maneira que entendo sobre o objeto word, mas não fui muito feliz não!!, continua na mesma
Faça seu login para responder