FormatConditions aus vba funktioniert nicht

Question

Hallo,

ich benötige nach langer Suche im Internet H I L F E:

Ich versuche aus VBA heraus FormatConditions.
mein CODE:
Dim ctl As Control
.....
dblWert1 = 5.5
dblWert2 = 6.49
.....
With ctl.FormatConditions.Add(acFieldValue,acBetween,dblWert1,dblWert2)

Führe ich nun den CODE aus, wird er einwandfrei in die Zellen geschrieben. Doch beim Aufruf des Formulars und der Eingabe der entsprechenden Wert passiert nichts.
Gehe ich nun in der Entwurfsansicht in die entsprechenden Zellen, ändere die eingetragenen Zahlen, manuell durch die gleichen Zahlen, funktioniert alles einwandfrei.

Wer kann mir sagen warum

mfG
guckers

Answer 1

na ja, wenn der Code funktioniert, dann hast Du ihn eben nicht an der richtigen Stelle aufgerufen, falls ich Dich richtig verstanden habe. Ich habe aber leider nicht verstanden wann der Code funktionieren soll, da Du schreibst .

Doch beim Aufruf des Formulars und der Eingabe der entsprechenden Wert passiert nichts.

Soll der Code beim Aufruf des Formulars ausgeführt werden, dann musst Du schreiben

Private Sub Form_Open(Cancel As Integer)

Dein Code

End Sub

Soll jedoch der Code nach Eingabe in das Feld BlaBla aufgerufen werden, dann muss es lauten

Private Sub BlaBla_AfterUpdate()

Dein Code

End Sub

Gruß Marie

Answer 2

Hallo guckers,

du benutzt eine Funktion, die ich nicht kenne (gibt es das in Access 2007?), aber mit Folgendem müsste es klappen (Access 2003):

....
dblWert1 = "5.5"
dblWert2 = "6.49"

Me!Feld.ValidationRule = "between " & dblWert1 & " and " & dblWert2
Me!Feld.ValidationText = "The Value has to be between " & dblWert1 & " and " & dblWert2 & "!"
....

Ich hoffe, wir reden überhaupt von Access, wir sind ja hier im Forum Datenbanken....

Gruß
Ralf