Discussion :

[512banque]

Bonjour,

Je suis en train de faire mes factures à l'aide d'un état.

Je veux faire apparaître "Remise" uniquement lorsqu'il y a effectivement une remise (càd lorsque la remise n'est pas égale à 0%).

Dois-je faire deux états différents et choisir manuellement lorsqu'il y a remise ou non ? Ou puis-je automatiser cela et faire apparaître la remise et son montant seulement lorsqu'elle est strictement positive ?

Si oui, comment ?

Merci

[cafeine]

Hello,

ton cas peut se rapprocher de celui évoqué dans la FAQ en jouant sur la propriété .Visible
http://access.developpez.com/faq/?pa...ort#FormatCond

[512banque]

Bonjour,

Alors, concrètement je fais comment ?

Je vais dans mon pied d'état (le contrôle en question se trouve là), et je vais dans les propriétés, et je clique sur format et dans "formatage" je mets procédure évenementielle.

Ensuite je rentre ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub PiedÉtat_Format(Cancel As Integer, FormatCount As Integer)
    If Me![Total remise] = "0" Then
        Me![Total remise].ForeColor = 16777215
    Else
        Me![Total remise].ForeColor = 0
    End If
End Sub

(mon contrôle s'appelle Total remise. Je veux que son étiquette non plus n'apparaisse pas).

Rien ne se passe.

Je suis débutant, au secours !

[cafeine]

Hello,

2 erreurs m'apparaissent

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

    If Me![Total remise] = "0" Then

ce n'est pas du texte, donc pas de double quotes (")

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
        Me![Total remise].ForeColor = 16777215
    Else
        Me![Total remise].ForeColor = 0

ce n'est pas la couleur que tu veux changer mais la visibilité

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Me.Controls("MonControle").Visible = True

pour faire apparaître

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Me.Controls("MonControle").Visible = False

pour faire disparaître

[Mahefasoa]

Salut 512banque,

J'aivais une situation comparable à la tienne pour nos factures de manutention. Dans l'état, il y le contrôle TauxRemise (sans étiquette ou libellé) et MontantRemise avec son étiquette nommée MontantRemise_Étiquette.

Si TauxRemise=0 alors ne pas afficher les contrôles TauxRemise, MontantRemise et MontantRemise_Étiquette
Sinon les afficher

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
   If Me.TauxRemise=0 Then
      Me.TauxRemise.Visible=False
      Me.MontantRemise.Visible=False
      Me.MontantRemise_Étiquette.Visible=False
   Else
      Me.TauxRemise.Visible=True
      Me.MontantRemise.Visible=True
      Me.MontantRemise_Étiquette.Visible=True
   End If

[gomi]

pourquoi pas une simple zone de texte avec dans la zone source de controle la formule suivante

=vraifaux(TauxRemise>0;MontantRemise;"")

[vador972]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
If Isnull(NomChamps) or NomChamps=0 then
   NomEtiquetteACacher.visible=False
else
   NomEtiquetteACacher.visible=True
End If

[512banque]

Merci beaucoup. J'ai essayé la macro du dessus (de Mahefasoa) qui a marché.

Je n'ai donc pas essayé les autres. Je vous remercie malgré tout.