Índice

Solución 21.5 Crear una consulta Power Query sobre una base de datos Access

Sub Consulta_Access()  
    Dim qtCliente As QueryTable  
    Dim strFormula As String  
    Call borraConsultas  
      
    strFormula = "let" & vbCrLf & _  
    "    Source = Access.Database(File.Contents(""" & ThisWorkbook.Path &   
"\Recursos\Northwind 2007.accdb""))," & vbCrLf _  
    & "    _Customers ...