Activar Word abierto desde VBA Excel con nombre de ruta.

Tengo un word ABIERTO, pero MINIMIZADO o NO ACTIVO cuya ruta es:

ruta = ThisWorkbook.Path & "/Importado de Excel.dotx"

Ahora, necesito activarlo desde una macro en VBA Excel, he intentado las siguientes maneras pero no me ha funcionado:

sub ActivarWord()

Dim ruta As String

Dim appword As Word.Application
ruta = ThisWorkbook.Path & "/Importado de Excel.dotx"

(->)appword.Documents(ruta).Activate

end sub

(Sale el error en esta línea ->)

sub ActivarWord()

Dim ruta As String

ruta = ThisWorkbook.Path & "/Importado de Excel.dotx"

Set MiHoja = CreateObject("Word.Application")
MiHoja. Documents. Open (ruta) 'No debería abrir si ya está abierto, pero solo quería intentarlo
MiHoja. Activate

end sub

(Se queda cargando y no responde)

He intentado varias maneras similares a las mostradas pero no me resultado, agradecería mucho su ayuda, pues es muy importante para mi proyecto.

1 respuesta

Respuesta
-1

[Hola

Debes usar "GetObject":

Dim appword As Object
Set appword = GetObject(, "Word.Application")
Appword. Activate

Intenta y comentas

Abraham Valencia

Sin ofender amigo, prefiriría que no me responda ud., pues parece que su versión de excel, sistema operativo u otra cosa es diferente a la mía. Hice unas 5 preguntas en este foro, de las cuales ninguna de sus respuestas me ha funcionado. De los que si me han funcionado es de Elsa Matilde, Dante Amor, Antony y otros más, pero no de usted.

No es mi culpa si no te gusta leer y te gusta que te hagan todo. Mi recomendación es que le pagues a alguien para que te haga las cosas, no que busques aprovecharte de los demás para obtener cosas gratis. No te molestes en responder, acabas de ser bloqueado.

Abraham Valencia

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas