Elite Veteran
Beiträge: 876
Ort: Wien | marusek1 - 31.01.12
Danke für Deine Mühe. Leider kommt in der Zeile 7 eine Fehlermeldung: "unzulässige Verwendung des Schlüsselwortes Me". Ich habe versucht, es zu ändern, um meinen Bedürfnissen anzupassen, aber ohne Erfolg. "Datum" ist die 2-te Spalte. Insgesamt 43 Spalten.
" ....For i = 2 To 43
If Me("Datum" & i) & i.Value = strCtlVal Then
j = j + 1
End If
Next i
...
Es geht nicht darum, ob das die 2. Spalte ist sondern wie deine Felder oder Steuerelemente heißen. So wie du das geändert hast, müssen sie heißen:
Datum2
Datum3
...
Datum43
Zur Erläuterung s.a. http://www.donkarl.com?FAQ6.5 .
Die Fehlermeldung wegen "Me" kommt, wenn du den Code nicht - wie von mir angegeben - ins Formularmodul sondern irgendwo anders hin kopiert hast. Dann müsstest du statt Me das Formular angeben:
If Forms!DeinFormular("DatumOderDochAP?" & i).Value = strCtlVal Then
----- Servus
Karl
*********
Access-Entwickler-Konferenz: https://www.donkarl.com/?aek
Access DevCon Vienna: https://www.donkarl.com/devcon
Access Forever: https://www.accessforever.org
Access News: https://www.youtube.com/playlist?list=PLVCeBbJIMDvdJ8ghMbEakJ6_EQyvy... |