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.
Fijate con ADOX, esta es una forma otra es con sentencias SQL DML (DROP COLUMN) pero creo que es más complejo. Esta es una forma:
Dim objCatalog As Catalog, objTable As Table Set objCatalog = New Catalog Set objCatalog.ActiveConnection=TuObjetoConnection Set objTable = objCatalog.Tables.Item("MiTabla") objTable.Columns.Delete "MiColumna"