une deuxieme condition à une formule

[fr832]

Bonsoir, j'utilise cette formule,

=SI(S5="";"";DATE(ANNEE(S5)+1;MOIS(S5);JOUR(S5)))

et je voudrais rajouter a cette formule si en S5 il y a "NC" alors afficher "Non conforme"

Par avance merci pour votre aide

 

[Compte Supprimé 979]

Re : une deuxieme condition à une formule

Salut fr832

=SI(S5="";"";SI(S5="NC";Non conforme";DATE(ANNEE(S5)+1;MOIS(S5);JOUR(S5))))

A+

 

[fr832]

Re : une deuxieme condition à une formule

bonsoir brunom45 super merci😎

 

[fr832]

Re : une deuxieme condition à une formule

re bonsoir bruno m 45
j'utiliser ce code qui me donner les date et du fait d'avoir mis du texte ce code plante puis je le modifier afin de pouvoir mettre format date et afficher non conforme ?
voici le code merci par aavance

Compteur = 0
      For I = 1 To 28 'à 25 si tu ne prends pas en compte TB_26, TB_27 et TB_28
        Dat = Me.Controls("TB_" & I)
            If Dat <> "" Then Dat = CDate(Dat)
                If Dat <= Date Then
                    Me.Controls("TB_" & I).BackColor = &HFF& 'ici
                    Compteur = Compteur + 1
                    Me.TB_29 = Compteur
                End If
        Next
End With
End Sub

 

[fr832]

Re : une deuxieme condition à une formule

bonsoir à tous comment puis je mofidier ce code afin que les textbox affiche soit un format date soit "non conforme"?

Par avance merci, car actuellement il y a ereur si il y a affiché non conform?

cordialement 😎

Compteur = 0
      For I = 1 To 28 'à 25 si tu ne prends pas en compte TB_26, TB_27 et TB_28
        Dat = Me.Controls("TB_" & I)
            If Dat <> "" Then Dat = [COLOR="RoyalBlue"]CDate(Dat)[/COLOR]               
                    If Dat <= Date Then
                    Me.Controls("TB_" & I).BackColor = &HFF& 'ici
                    Compteur = Compteur + 1
                    Me.TB_29 = Compteur
                End If
        Next
End With
End Sub