Putz, olha o romulo ai, fmz cara?
Então, o db é um acess, mas tb pode ser um excell (haha, exato, os bancos chegam...
Hehehe... :mrgreen:
Cara, eu nunca tentei excluir colunas no Excel, mas no Access dá pra fazer usando o DAO e o objeto Tabledef. Olha um exemplo:
Dim DB As DAO.Database
Dim TD As DAO.TableDef
Set DB = DBEngine.OpenDatabase(App.Path & "\bd1.mdb"
Set TD = DB.TableDefs("Tabela1"
TD.Fields.Delete "campo1"
Set TD = Nothing
DB.Close
Set DB = Nothing
Se o campo fizer parte de um índice, o índice tem que ser excluído antes (usando-se o método "Indexes.Delete"). Detalhe: o Access permite que você exclua todos os campos da tabela, mas se você fizer isso não vai poder abrí-la de novo até criar pelo menos 1 campo novo (curiosamente a quantidade de registros fica a mesma de antes, mas todos vazios).
Fazer pergunta