XL 2016 formule SI à plusieurs conditions

vanin · 25 Août 2023

Bonjour, la fonction suivante =SI(P4<AUJOURDHUI();"échouée";"Echoue dans "&P4-AUJOURDHUI()&" jours") permet d'afficher l'alerte pour les dates d'échéances.
"échouée" pour les dates passées et "échoues dans" pour les dates en cours et ça fonctionne bien.
la colonne P contient les dates d'échéance et la colonne N a pour valeur soit OUI soit NON.
est ce qu'il est possible d'ajouter une troisième condition "Reglée" à la formule lorsque la colonne N contient OUI?

du genre: =SI(N4= OUI;"Reglée"; P4<AUJOURDHUI();"échouée";"Echoue dans "&P4-AUJOURDHUI()&" jours")

le but c'est de montrer que la facture a été réglée avant la date d'échéance. lorsque la colonne N10 affiche OUI c'est que la facture est réglé et si elle est réglée avant la date d'échéance la colonne Q10 ne devrait plus afficher échoue dans 31 jours. merci de m'aider

Gégé-45550 · 26 Août 2023

vanin à dit:
Bonjour, merci pour votre réponse mais ca ne fonctionne pas

Bonsoir,
Salut l'ami TooFatBoy

VB:

=SI(N4="OUI";"reglée";SI(P4<AUJOURDHUI();"échouée";"Echoue dans "&P4-AUJOURDHUI()&" jours"))

Cordialement,

vanin · 27 Août 2023

Modeste geedee à dit:
Bonsour
Ne pas confondre échouer
(ne pas atteindre le but)
avec échoir (arriver à échéance)

OK MERCI

vanin · 27 Août 2023

Bonjour, merci à tous pour votre aide. est ce qu'il est possible d'appliquer cette formule à toutes les lignes de la colonne Q à chaque fois que je clique sur un bouton valider.
Etirer la formule située a la colonne Q2 par rapport aux cellules de la colonne P commencant a P2 si elles contiennent du texte.

TooFatBoy · 27 Août 2023

vanin à dit:
est ce qu'il est possible d'appliquer cette formule à toutes les lignes de la colonne Q à chaque fois que je clique sur un bouton valider.

Tu veux appliquer une formule suite à l'appui sur un bouton ???

vanin · 27 Août 2023

TooFatBoy à dit:
Tu veux appliquer une formule suite à l'appui sur un bouton ???

en faite je veux étendre automatiquement la formule à la colonne Q entière via vba si cela est possible.
j'ai essayé ce code

Sub appliquer_formule()
Dim DL As Integer 'déclare al variable DL (Dernière Ligne)

DL = Cells(Application.Rows.Count, "O").End(xlUp).Row 'définit la derniere ligne DL de la colonne E (colonne à adapter à ton cas)
Range("O4").FormulaR1C1 = "=SI(N4="OUI";"reglée";SI(P4<AUJOURDHUI();"échouée";"Echoue dans "&P4-AUJOURDHUI()&" jours"))"
Range("O4").AutoFill Destination:=Range("O4:O" & DL), Type:=xlFillDefault
End Sub

TooFatBoy · 27 Août 2023

vanin à dit:
Range("O4").FormulaR1C1 = "=SI(N4="OUI";"reglée";SI(P4<AUJOURDHUI();"échouée";"Echoue dans "&P4-AUJOURDHUI()&" jours"))"

N4 n'est du type R1C1, donc je ne suis pas certain ça fonctionne tel quel.

Essaye peut-être FormulaLocal.

Sinon, tu sais qu'il existe ce qu'on appelle des Tableaux Structurés ?

Bonne nuit

vanin · 27 Août 2023

TooFatBoy à dit:
N4 n'est du type R1C1, donc je ne suis pas certain ça fonctionne tel quel.

Essaye peut-être FormulaLocal.

Sinon, tu sais qu'il existe ce qu'on appelle des Tableaux Structurés ?

Bonne nuit

ca affiche erreur de syntaxe

vanin · 27 Août 2023

vanin à dit:
ca affiche erreur de syntaxe

avec la formule "=[Total T.T.C]-[AVANCE]" ca marche bien

Sub appliquer_formule()
Dim DL As Integer 'déclare al variable DL (Dernière Ligne)

DL = Cells(Application.Rows.Count, "Q").End(xlUp).Row 'définit la derniere ligne DL de la colonne E (colonne à adapter à ton cas)
Range("Q4").FormulaR1C1 = "=[Total T.T.C]-[AVANCE]"
Range("Q4").AutoFill Destination:=Range("Q4:Q" & DL), Type:=xlFillDefault
End Sub

mais avec la formule "=SI(N4="OUI";"reglée";SI(P4<AUJOURDHUI();"échouée";"Echoue dans "&P4-AUJOURDHUI()&" jours"))" ca ne fonctionne pas

TooFatBoy · 27 Août 2023

C'est normal : il faut doubler les guillemets à l'intérieur d'une chaîne de caractères.

vanin · 27 Août 2023

Bonjour, merci pour votre réponse mais je ne sais comment faire je suis débutant, j’ajoute les guillemets ou

TooFatBoy · 27 Août 2023

Essaye ceci :

VB:

Range("Q4").FormulaLocal = "=SI(N4=""OUI"";""Reglée"";SI(P4<AUJOURDHUI();""échouée"";""Echoue dans "" & P4 - AUJOURDHUI() & "" jours""))"

Modeste geedee · 27 Août 2023

Bonsour

TooFatBoy à dit:

Essaye ceci :

VB:

Range("Q4").FormulaLocal = "=SI(N4=""OUI"" ; ""Reglée"" ; SI(P4<AUJOURDHUI() ; ""Échue""  ; ""Échoira dans "" & P4 - AUJOURDHUI() & "" jours""))"

TooFatBoy · 27 Août 2023

Modeste geedee à dit:
Bonjour

vanin · 27 Août 2023

TooFatBoy à dit:

Essaye ceci :

VB:

Range("Q4").FormulaLocal = "=SI(N4=""OUI"";""Reglée"";SI(P4<AUJOURDHUI();""échouée"";""Echoue dans "" & P4 - AUJOURDHUI() & "" jours""))"

Merci ca marche bien, merci beaucoup

vanin · 27 Août 2023

Modeste geedee à dit:
Bonsour

merci pour votre solution

vanin · 27 Août 2023

OK merci pour vos solution la macro marche bien. au début j'ai parlé d'un bouton valider.

voici le code de la macro qui fonctionne bien
Sub executer_macro_alerteecheance()
Dim DL As Integer 'déclare al variable DL (Dernière Ligne)

DL = Cells(Application.Rows.Count, "Q").End(xlUp).Row 'définit la derniere ligne DL de la colonne E (colonne à adapter à ton cas)
Range("Q4").FormulaLocal = "=SI(N4=""OUI"";""Reglée"";SI(P4<AUJOURDHUI();""échouée"";""Echoue dans "" & P4 - AUJOURDHUI() & "" jours""))"
Range("Q4").AutoFill Destination:=Range("Q4:Q" & DL), Type:=xlFillDefault
End Sub

sur un userform, j'ai un bouton CommandButton1, ce que je veux, c'est de pouvoir exécuter cette macro lorsque je clique sur ce bouton. comment appeler cette macro dans le bouton

Private Sub CommandButton1_Click()

End Sub

XL 2016 formule SI à plusieurs conditions

vanin

XLDnaute Occasionnel

Gégé-45550

vanin

XLDnaute Occasionnel

vanin

XLDnaute Occasionnel

TooFatBoy

XLDnaute Barbatruc

vanin

XLDnaute Occasionnel

TooFatBoy

XLDnaute Barbatruc

vanin

XLDnaute Occasionnel

vanin

XLDnaute Occasionnel

Pièces jointes

TooFatBoy

XLDnaute Barbatruc

vanin

XLDnaute Occasionnel

TooFatBoy

XLDnaute Barbatruc

Modeste geedee

XLDnaute Barbatruc

TooFatBoy

XLDnaute Barbatruc

vanin

XLDnaute Occasionnel

vanin

XLDnaute Occasionnel

vanin

XLDnaute Occasionnel

Discussions similaires