exportar campos de access a word 2003

21/02/2011 - 12:51 por franjoslp | Informe spam
¡ Hola !
Estoy creando una base de datos en access 2003 y quiero crear un plantilla de word llamada caratula.dot y que me exporte los campos [referencia], [tramitador], a dicha plantilla. la tabla se llama campos_gestiones

Me interesaría crear, así mismo, un botón en access que me genere la plantilla del registro activo.

Ah! debo informaros que es la primera vez que intento esto, ya que soy muy novato en estas cosas.

gracias de antemano.
 

Leer las respuestas

#1 José Mª Fueyo
21/02/2011 - 13:58 | Informe spam
Hola
Crea una plantilla en la cual ubicas los marcadores donde quieres que
vayan los datos que quieras.
Inserta un código parecido al que viene a continuación:
<pego>
Public Sub CreaNuevo(sPlantilla As String)

Dim wordApp As Word.Application
Dim wordDoc As Word.Document
Dim wordRange As Word.Range

Set wordApp = CreateObject("Word.Application")
Set wordDoc = wordApp.Documents.Add(sPlantilla)

wordApp.Visible = True

' Go to the bookmark named "City".
Set wordRange = wordDoc.Goto(What:=wdGoToBookmark, Name:="City")
wordRange.InsertAfter "Los Angeles"

' Print the document.
wordDoc.PrintOut Background:=False

' Save the modified document.
sNombre = "c:\" & Format(Now, "yyyyMMddHHnn") & ".doc"
wordDoc.SaveAs wordApp.Document

' Quit Word without saving changes to the document.
wordApp.Quit

Set wordApp = Nothing

End Sub
</pego>

Salu2,

Preguntas similares