Utilizamos cookies propias y de terceros para mejorar la experiencia de navegación, y ofrecer contenidos y publicidad de interés. Al continuar con la navegación entendemos que se acepta nuestra política de cookies.
Dim objCatalog As Catalog, objTable As Table
Set objCatalog = New Catalog
Set objCatalog.ActiveConnection = TuObjetoConnectionADO
For Each objTable In objCatalog.Tables
Debug.Print objTable.Name
Next
Con OpenSchema de ADO:
Set objRecordset = TuObjetoConnection.OpenSchema(adSchemaTables)
en internet hay un archivo que se llama auto97 (creo que tiene extensión ZIP), tiene una serie de ayudas para manejar objetos desde visual basic,
si no lo encuentras avísame para mandartelo.
suerte