Name des aktuelles Textfeldes auslesen

[Michael Wulf]

Hallo zusammen,

ich möchte gerne den namen des aktuellen textfeldes auslesen und einer variablen zuweisen. Kann mir bitte jemand einen Rat geben ?

Vielen Dank
Michael

[MzKlMu]

Hallo,

Code [Auswählen] Erweitern

Dim NameAktTextfeld As String
NameAktTextfeld = Screen.ActiveControl.Name

PS:
Wenn solche Aktionen notwendig sind, deutet das oftmals auf ein falsches Datenmodell hin.
Wozu brauchst Du das ?

[Lachtaube]

Für Code im Formularmodul:

Code [Auswählen] Erweitern

   If Me.ActiveControl.ControlType = acTextBox Then
      MsgBox "Aktives Textfeld: " & Me.ActiveControl.Name
   End If

[Michael Wulf]

Danke,

das Datenmodell stimmt.  Ich baue gerade ein Zugriffsprotokoll. Dieses soll die Logs und  die geänderten Felder aufnehmen.

Gruß Michael