Access - traspasar datos de un formulario a un doc de Word

 
Vista:

traspasar datos de un formulario a un doc de Word

Publicado por bernat (17 intervenciones) el 20/04/2001 17:48:36
Hola amigos,
necesito saber como traspasar (desde código) valores de cuadros de texto de un forulario a un documento de word que he abierto des de código tb con una variable tipo Object.
A ver si me ayudáis!! 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
Imágen de perfil de Alejandro

traspasar datos de un formulario a un doc de Word

Publicado por Alejandro (4142 intervenciones) el 14/04/2023 20:26:10
Para traspasar valores desde cuadros de texto de un formulario de Access a un documento de Word, puedes utilizar la automatización de Word y la propiedad 'Bookmark' de Word. La propiedad 'Bookmark' le permite a Word ubicar y actualizar el valor de un campo o cuadro de texto en un documento.

A continuación te proporciono un ejemplo de código que te puede servir de guía:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Dim objWord As Object
Dim objDoc As Object
Dim txtValor As String
 
' Crear objeto Word y abrir el documento
Set objWord = CreateObject("Word.Application")
Set objDoc = objWord.Documents.Open("C:\ruta\al\documento.docx")
 
' Asignar valor del cuadro de texto del formulario a la variable txtValor
txtValor = Me!NombreCuadroDeTexto.Value
 
' Actualizar el valor del campo o cuadro de texto en el documento de Word
objDoc.Bookmarks("BookmarkNombre").Range.Text = txtValor
 
' Guardar y cerrar el documento de Word
objDoc.Save
objDoc.Close
 
' Cerrar objeto Word
objWord.Quit
Set objDoc = Nothing
Set objWord = Nothing

En este ejemplo, 'NombreCuadroDeTexto' es el nombre del cuadro de texto en el formulario de Access que contiene el valor que deseas transferir, y 'BookmarkNombre' es el nombre del marcador de posición en el documento de Word donde se colocará el valor.

Espero que esto te ayude.
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