Aktuelles Datenfeld der aktuellen Tabelle ermitteln

29/04/2008 - 16:11 von Stefan Donath | Report spam
Hallo,

ich möchte per VBA-Code folgendes erreichen:

1 - Abfrage, ob aktuelles Objekt eine Tabelle ist (If
Application.CurrentObjectType = acTable Then ... funktioniert)

2 - wenn ja: Abfrage: ist aktuelles Datenfeld vom Typ Memo ist

3 - wenn ja: Formular EditMemo öffnen

4 - Daten des Memofeldes in Textbox anzeigen

kann mir zu den Punkten 2 - 4 jemand helfen??

Hinweis: Ich habe mir ein Macro "EditMemo" erstellt und es in die
Access-Menüleiste gezogen. Dieses Macro ruft eine Funktion in einem
Modul auf, die den ganzen Kram bewerkstelligen soll.

Vielen Dank für Hinweise, ich sitze seit geraumer Zeit daran und
offenbar auch auf dem Schlauch!

Gruß - Stefan.
 

Lesen sie die antworten

#1 Thomas Kühn
29/04/2008 - 16:28 | Warnen spam
Hallo Stefan,


ich möchte per VBA-Code folgendes erreichen:

1 - Abfrage, ob aktuelles Objekt eine Tabelle ist (If
Application.CurrentObjectType = acTable Then ... funktioniert)

2 - wenn ja: Abfrage: ist aktuelles Datenfeld vom Typ Memo ist



If Currentdb.TableDef("Tabelle").Fields("Feldname").Type = dbMemo Then
' Feld vom Typ Memo
End If



3 - wenn ja: Formular EditMemo öffnen



DoCmd.OpenForm "EditMemo"




4 - Daten des Memofeldes in Textbox anzeigen




Da übergibt Du am besten in der OpenForm Methode die ID der Tabelle
über Filter oder Where Bedingung
RecordSource der Form ist dann die Tabelle, in der du das Feld
editieren
möchtest.



Gruß Thomas

http://www.thomas-kuehn.de

Ähnliche fragen