AC97 Option Compare Database

Hallo!

ich möchte, dass Minuszahlen in einem Formular rot angezeigt werden. Dazu habe ich wie folgt eingegebenPrivate Sub Form_Current()

If Wertdiff >= 0 Then
Me![Wertdiff].ForeColor = 0 'schwarz
Else
Me![Wertdiff].ForeColor = 255 'rot
End If

End Sub

soweit so gut allerdings muss ich noch

Option Compare Database

irgenwo eingeben. Wer kann mir sagen wo und wie?
Bitte leicht verständlich, da ich ACCESS und VBA kaum beherrsche.
Danke im voraus an die Helfer!

Martin

Hallo Martin,
füge diesen Text ÜBER „Private Sub Form_Current()“ ein:

Option Compare Database
Option Explicit

Nachdem Du dann ENTER gedrückt hast, müsste das funzen …

gruss Andreas

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

Hallo Andreas,

vielen Dank für Deine Lösung. Habe mich gefreut.

Gruss Martin

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]