glabla

asturcon3 respondió: A través de la colección fields. Un ejemplo (crea un nuevo módulo y ponle esto) Sub prueba() Dim db As Database, tdf As TableDef, fld Set db = CurrentDb For Each tdf In db.TableDefs For Each fld In tdf.Fields Debug.Print tdf.Name & "." & fld.Name...