Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Mettre une condition dans la propriété Format

3 réponses
Avatar
Sophie
Bonjour,

J'utilise déjà un format dans une zone de texte, mais j'aimerais savoir s'il
est possible d'ajouter une condition.

Le format que j'utilise présentement (nom du champ: Prix):
# ##0.00[Noir];(# ##0.00)[Rouge]
ceci représente. mettre le montant en noir s'il est positif ou si le montant
est négatif le mettre en rouge et entre parenthèse.

J'aimerais ajouter une condition tel que :
Si le champ Solde = 0
Mettre le Montant du champ Prix en noir qu'il soit positif ou négatif,
entre parenthèse s'il est négatif
Sinon
# ##0.00[Noir];(# ##0.00)[Rouge]

Est-ce possible...

Merci d'avance,

Sophie

3 réponses

Avatar
Evaro
Bonjour,

"Sophie" a écrit dans le message de news:

Bonjour,

J'utilise déjà un format dans une zone de texte, mais j'aimerais savoir
s'il
est possible d'ajouter une condition.

Le format que j'utilise présentement (nom du champ: Prix):
# ##0.00[Noir];(# ##0.00)[Rouge]
ceci représente. mettre le montant en noir s'il est positif ou si le
montant
est négatif le mettre en rouge et entre parenthèse.

J'aimerais ajouter une condition tel que :
Si le champ Solde = 0
Mettre le Montant du champ Prix en noir qu'il soit positif ou négatif,
entre parenthèse s'il est négatif
Sinon
# ##0.00[Noir];(# ##0.00)[Rouge]


Access 2000 et +, Essaye :
Format/mise en forme conditionnelle sur le Contrôle "Prix"
Sous Condition 1, remplacer Valeur du champ par Expression.
Expression : [Solde] = 0
Choisir la couleur de police noire.
(jamais testé avec un format # ##0.00[Noir];(# ##0.00)[Rouge])

@+

Etienne

Avatar
Sophie
Merci pour votre aide. Sa fonctionne avec la solution ci-dessous:

Dim lngRouge, lngNoir As Long

lngRouge = RGB(255, 0, 0)
lngNoir = RGB(0, 0, 0)

If Me.BUD <> 0 Then
Me.SOLDE_DISPONIBLE.Format = "# ##0.00 ;(# ##0.00)"
If Me.SOLDE_DISPONIBLE < 0 Then
Me.SOLDE_DISPONIBLE.ForeColor = lngRouge
Else
Me.SOLDE_DISPONIBLE.ForeColor = lngNoir
End If
Else
Me.SOLDE_DISPONIBLE.Format = "# ##0.00; (# ##0.00)"
Me.SOLDE_DISPONIBLE.ForeColor = lngNoir
End If

Sophie


"Evaro" a écrit dans le message de
news:%
Bonjour,

"Sophie" a écrit dans le message de news:

Bonjour,

J'utilise déjà un format dans une zone de texte, mais j'aimerais savoir
s'il
est possible d'ajouter une condition.

Le format que j'utilise présentement (nom du champ: Prix):
# ##0.00[Noir];(# ##0.00)[Rouge]
ceci représente. mettre le montant en noir s'il est positif ou si le
montant
est négatif le mettre en rouge et entre parenthèse.

J'aimerais ajouter une condition tel que :
Si le champ Solde = 0
Mettre le Montant du champ Prix en noir qu'il soit positif ou
négatif,


entre parenthèse s'il est négatif
Sinon
# ##0.00[Noir];(# ##0.00)[Rouge]


Access 2000 et +, Essaye :
Format/mise en forme conditionnelle sur le Contrôle "Prix"
Sous Condition 1, remplacer Valeur du champ par Expression.
Expression : [Solde] = 0
Choisir la couleur de police noire.
(jamais testé avec un format # ##0.00[Noir];(# ##0.00)[Rouge])

@+

Etienne





Avatar
3stone
Salut,

"Sophie"

Dim lngRouge, lngNoir As Long



Ici, lngRouge est déclarer Variant, par défaut !
Préfixer une variable (bonne habitude) ne la type pas...

Dim lngRouge As Long, lngNoir As Long



--
A+
Pierre (3stone) Access MVP
~~~~~~~~~~~~~~~~~~~~~~~
http://users.skynet.be/mpfa
http://users.skynet.be/accesshome