| |
New user
Beiträge: 3
| Hallo zusammen,
( Access 2010 VBA )
hab folgendes Problem:
Ich möchte bestimmte Felder eines Formulars enabeln bzw. Disabeln.
Wenn ich jedes Control mit den Namen anspreche funktioniert es. Wie kann ich aber den Contol Name an die ME Funktion übergeben?
Hier mein Code:
Dim ctl As Control
For Each ctl In Me.Controls
Select Case ctl.Name
Case "SuchtextName"
Me.SuchtextName.Enabled = True
Case "SuchTelNr"
Me.SuchTelNr.Enabled = True
Case Else
Me.(Ctl.Name).Enabled = False !!!!!! Hier erhalte ich eine Feldermeldung
End Select
Next
Selbst wenn ich die Methode aus vielen anderen Foren anwende klappt es nicht:
Dim ctl As Control
Dim frm As Form
Set frm = Forms(strFormular)
For Each ctl In frm.Controls
If ctl.Tag = "deaktivieren" Then ctl.enabled = false
Next
Hier erhalte ich bei ctl.enable schon eine Fehlermeldung.
Grüße Mozi | |
|
