Qué sucedió con la web de Nickkito ?

¿Alguien sabe que sucedió con la página web de Nickkito?, estaba buscando uno de sus ejemplos y ya no encuentro su web

1 Respuesta

Respuesta

¿Qué ejemplo necesita?

¡Gracias dom Eduardo!

Hace un tiempo había descargado el ejemplo que se llama: CartasWordAccess, pero no descargue el PDF en el que normalmente se explicaba las partes del código y sus diferentes partes.

Estoy tratando ver modificar ese ejemplo, pero no entiendo cómo conecto el formulario del access al Word 

Lo que necesito es tomar los datos de un formulario access y que se muestren en un Word 

Ejemplo de Código VBA en Access

Supongamos que tienes un formulario de Access llamado frmDatos con algunos campos como txtNombre, txtApellido, y txtDireccion. Este código exportará los datos de estos campos a un documento de Word.

Sub ExportarDatosAWord()
    Dim objWord As Object
    Dim objDoc As Object
    Dim objRng As Object
    Dim strNombre As String
    Dim strApellido As String
    Dim strDireccion As String
    ' Crear una instancia de Microsoft Word
    Set objWord = CreateObject("Word.Application")
    Set objDoc = objWord.Documents.Add
    objWord.Visible = True
    ' Obtener los valores de los campos del formulario
    strNombre = Forms!frmDatos!txtNombre.Value
    strApellido = Forms!frmDatos!txtApellido.Value
    strDireccion = Forms!frmDatos!txtDireccion.Value
    ' Escribir los datos en el documento de Word
    Set objRng = objDoc.Range
    objRng.Text = "Nombre: " & strNombre & vbCrLf & _
                  "Apellido: " & strApellido & vbCrLf & _
                  "Dirección: " & strDireccion
    ' Liberar los objetos
    Set objRng = Nothing
    Set objDoc = Nothing
    Set objWord = Nothing
End Sub

Esta es una forma, trate de adaptar el código a su formulario

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas