|
Member
Beiträge: 9
| Hallo,
folgendes Problem: Ich habe in meiner Tabelle ca 30 Felder, welche weder einen Namen, noch einen Typ haben - demzufolge selbstverständlich keinen Inhalt.
In der Datenansicht sehe ich die Felder auch nicht. In der Entwurfsansicht sind sie jedoch am Ende der Tabelle zu sehen.
Da ich aber die Datenbank schon mehrfach und seit vielen Jahren weitergegeben habe, nützt es mir nichts, wenn ich bei mir die Felder lösche, da sie ja überall anders existent bleiben.
Warum muss ich das machen? Weil ich neue Felder hinzufügen muss (mache ich per VBA, kein Problem) aber ich jetzt an das Limit von 255 Feldern komme und wenn ich diese "leeren Zeilen" nicht rausbringe kann ich nicht genug neue Felder anlegen.
Dim DB As Database
Dim TD As TableDef
Set DB = OpenDatabase(GlbPfadAdressDAT)
'Parameter Tabelle von leeren Zellen befreien
Set TD = DB.TableDefs("PARAMETER")
TD.Fields.Delete ""
So gehts leider nicht 
Die Frage ist nun: Wie greife ich einen nicht vorhandenen Feldnamen?
Danke für eure Hilfe, Thomas
PS: Bitte jetzt nicht sagen: Ist ein Designfehler, wenn eine Tabelle soviele Felder enthält; weil erstens ist das die Parametertabelle (die nur einen Datensatz enthält und das komplette Programm steuert) und zweitens ist das Ding seit 2002 gewachsen  | |
|
Tabellenfelder ohne Namen löschen?