En esta página encontrarán algunos ejemplo de trucos de VBA (Visual Basic for Applications) que puedes utilizar en aplicaciones desarrolladas con la base de datos Microsoft Access.

Contenidos de Office

-Todos- Office (1)
Excel desde Access -

Excel desde Access

Manejo básico de un libro de Excel desde una base de datos de Microsoft Access...
Es necesario antes marcar la referencia a la biblioteca de Excel.
Sub Ejemplo()
    On Error GoTo ErrorSub
    Dim app As Excel.Application
    Dim wkb As Excel.Workbook
    Dim wks As Excel.Worksheet
    Dim row As Excel.Range
    Dim cel As Excel.Range
    Set app = New Excel.Application
    Set wkb = app.Workbooks.Open("D:\alexborras\Downloads\Municipales_201905_1\04_201905_1.xlsx")
    ' Ver todas las hojas del libro abierto (el index empieza en 1)
    For Each wks In wkb.Sheets
        Debug.Print wks.Index & "." & wks.Name
    Next
    ' Seleccionar una hoja
    Set wks = wkb.Sheets(1)
    For Each row In wks.Rows
        Debug.Print wks.Name & ":" & wks.Rows.CountLarge
        For Each cel In row.Cells
            Debug.Print cel.Column & ":" & cel.Value
        Next
    Next
    Debug.Print wks.Name
    Set wks = Nothing
    Set wkb = Nothing
    Set app = Nothing
    Exit Sub
ErrorSub:
    MsgBox Err.Description
End Sub

Deja una respuesta

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *

Uso de cookies

Este sitio web utiliza cookies para que usted tenga la mejor experiencia de usuario. Si continúa navegando está dando su consentimiento para la aceptación de las mencionadas cookies y la aceptación de nuestra política de cookies, pinche el enlace para mayor información.plugin cookies

ACEPTAR
Aviso de cookies