Visual Basic - abrir plantilla word desde VB

Life is soft - evento anual de software empresarial
 
Vista:

abrir plantilla word desde VB

Publicado por Francisco Martin (3 intervenciones) el 14/10/2005 16:23:20
Alguien me puede proporcionar un ejemplo de como abrir (crear) un documento de word basado en una plantilla

Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil

RE:abrir plantilla word desde VB

Publicado por christian rodriguez (54 intervenciones) el 14/10/2005 17:11:54
Disculpa la respuesta pero....

eso viene en la ayuda de VB

Busca un poco, por ejemplo si buscas la instruccion SET
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:abrir plantilla word desde VB

Publicado por Pere (54 intervenciones) el 15/10/2005 23:57:48
Hola.
Abres un documento nuevo y cuando acabes, lo grabas con extensión .dot
En ese documento puedes poner, por ejemplo:

Don %%nombre%% %%apellido1%% %%apellido2%%
donde
%%nombre%% %%apellido1%% %%apellido2%%

son marcadores en los cuales se colocaran el texto que le envies desde VB

En tu proyecto añade en referencias:
Microsoft Word 10.0 Objet Library (MSWORD.OLB)

y en un formulario:

Dim xWord As Word.Application ' Instancia a Word
Dim xRange As Range ' Rango del objeto
Dim xSelection As Find ' Búsqueda del objeto

Dim destino$
destino = "C:\MiPlantilla.dot"
xWord.Documents.Add destino

Set xRange = xWord.ActiveDocument.Range
xRange.Find.Execute "%%apellido1%%", , , , , , , , , Text1.text, True

Set xRange = xWord.ActiveDocument.Range
xRange.Find.Execute "%%apellido2%%", , , , , , , , , Text2.text, True

Set xRange = xWord.ActiveDocument.Range
xRange.Find.Execute "%%nombre%%", , , , , , , , , Text3.text, True

'Se puede guardar el documento, o plantilla
'xWord.ActiveDocument.SaveAs “C:\MiPlantilla.dot "

' Si queremos visualizarlo en pantalla
xWord.Visible = trae

' 'Maximizarlo
xWord.WindowState = wdWindowStateMaximize

' 'Tenerlo activo, visible en pantalla
xWord.Application.Activate

' No preguntar si queremos guardar el documento
' xWord.DisplayAlerts = wdAlertsNone

‘ Imprimir
xWord.ActiveDocument.PrintOut

' Para evitar la pregunta: ¿Desea guardar el documento….?
xWord.ActiveDocument.Close False

'Cerramos word
xWord.Quit

'Liberamos el objeto
Set xWord = Nothing

En la plantilla puedes seleccionar todo el marcador y darle el formato que quieras (color, negrita, etc.)

Espero que te sirva.

P.D. ¿Eres el mismo que escribió en Programación.com? Lo digo para no repetir la respuesta.
Un saludo.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:abrir plantilla word desde VB

Publicado por Francisco Martin (9 intervenciones) el 19/10/2005 10:28:13
Si fui yo el q escribió en Programación.com
pero en esta web tengo dificultades de novato.
Te puedes creer q no encuentro la opcinón de buscar un mensaje
ni los articulos escritos por un determinado usuario (por ejemplo,los mios)

Si existe esta opción por favor dime donde esta

Gracias
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:abrir plantilla word desde VB

Publicado por Pere (17 intervenciones) el 19/10/2005 22:43:19
Justo arriba donde pone "Notas Anteriores" tienes un recuadro y al lado un botón de "Buscar"

Tecleas el texto y listo. Eso sí, te aparecerán los mensajes que contenga todo o parte de lo que escribas. Si pones tu nombre, verás los tuyos y otros que incluyan parte de la cadena.

Un saludo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:abrir plantilla word desde VB

Publicado por ZEQUET (17 intervenciones) el 20/10/2005 06:58:45
Me esta tirando run time error 91 variable not set , porque puede ser??
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:abrir plantilla word desde VB

Publicado por CARLOS (1 intervención) el 02/10/2015 05:24:03
pero si tengo microsoft office 2013
cual es la referencia
gracias
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar