Hallo Leute,
ich suche einen Code, mit dem ich den Standardwert in einer Tabelle ändern kann. Ist z. B. für ein Tabellenfeld der Standardwert 1 eingestellt, möchte ich ihn per „Knopfdruck“ auf 2 ändern.
Danke im voraus
Dylan
Hi, Dylan!
ich suche einen Code, mit dem ich den Standardwert in einer
Tabelle ändern kann. Ist z. B. für ein Tabellenfeld der
Standardwert 1 eingestellt, möchte ich ihn per „Knopfdruck“
auf 2 ändern.
Dim dbMdb as Database
dim tdfTab as TableDef
dim fldFeld as Field
Set dbMdb=CurrentDb
Set tdfTab=dbMdb.TableDefs("DeineTabelle")
Set fldFeld=tdfTab.Fields("DeinFeld")
fldFeld.DefaultValue=2
Gruß, Manfred
Supi, danke