Discussion :

[nexbw]

Bonjour à tous,

Je suis vraiment bloqué. Je dois écrire dans une cellule des multi-conditions. Je viens de démarrer en VBA et je ne comprends pas tout. J'arrive a Faire A1+A2 mais pas plus

Pour info j'ai une feuille qui contient des colonnes et des lignes, pour le moment tout va bien. En colonne L j'aimerai de L2 à L71630 mettre une formule plutôt complexe :

Mettre dans la cellule 0,00 si la Date (données d'une colonne ) et le numéro des ventes (données d'une colonne ) sont les mêmes que ceux de l'enregistrement précédent et que Mode de Règlement (données d'une colonne ) commence par "COMPOSE";
A défaut
Mettre dans la cellule les données de la cellule Prix de Vente (données d'une colonne ) si Mode de Reglement (données d'une colonne )="AVOIR";
A défaut
Mettre dans la cellule le montant mit après "AVOIR" du champ Mode de Reglement si Mode de Reglement commence par "COMPOSE" et contient "AVOIR";
A défaut
Mettre dans la cellule 0,00

Vous trouverez un extrait en PJ. Si vous aviez une solution type VBA ça me sauverai la vie je dois le rendre assez rapidement.
Classeur2.xlsx

Merci

[Invité]

Bonjour,

Es-tu vraiment obliger de passer par VBA ? Je pense que des formules Excel seraient largement suffisantes (et plus efficace).

[nexbw]

Bonjour,

Es-tu vraiment obliger de passer par VBA ? Je pense que des formules Excel seraient largement suffisantes (et plus efficace).

Merci pour ton retour rapide. Le souci c'est qu'en formule je m'embrouille facilement avec les SI imbriqués, tu penses que c'est vraiment plus simple ?

[Invité]

Merci pour ton retour rapide. Le souci c'est qu'en formule je m'embrouille facilement avec les SI imbriqués, tu penses que c'est vraiment plus simple ?

Il est vrai que l'écriture de SI imbriqués est pas simple car on s'y perd vite. Cependant, vu le nombre de ligne que tu veux traiter, le code VBA qui me vient à l'esprit mettrait plusieurs minutes à s'exécuter, après je ne suis pas un pro donc il n'est pas impossible qu'il existe une solution rapide en VBA.

Que veux-tu dire aussi par enregistrement précédent ?

[nexbw]

Il est vrai que l'écriture de SI imbriqués est pas simple car on s'y perd vite. Cependant, vu le nombre de ligne que tu veux traiter, le code VBA qui me vient à l'esprit mettrait plusieurs minutes à s'exécuter, après je ne suis pas un pro donc il n'est pas impossible qu'il existe une solution rapide en VBA.

Que veux-tu dire aussi par enregistrement précédent ?

Je vais voir en Si imbriqués alors.
L'enregistrement précédant signifie la cellule du dessus.

[riaolle]

Bonjour,
Je ne sais pas trop ce qui est plus rapide, mais si tu préfères passer par VBA parce que c'est un peu plus clair que des SI imbriqué, tu peux créer une fonction personnalisée.

Code :

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

1
2
3
4
5
6
7
8
9
Function conditions()As Double
    If ... And ...And ... Then 
        conditions = 0
    ElseIf ...
        conditions = ...
    ElseIf ....
        conditions = ...
    End If
End Function

Tu peux travailler avec ActiveCell et Offset pour passer de la cellule active vers les autres cellules qu'il faut comparer.

[Invité]

Bonjour à tous,
Mettre dans la cellule le montant mit après "AVOIR" du champ Mode de Reglement si Mode de Reglement commence par "COMPOSE" et contient "AVOIR";
Merci

Je ne comprend pas aussi ce que tu veux dire par "le montant mit après"

Je vais essayer en VBA et en SI imbriqué de mon côté.

[nexbw]

Je ne comprend pas aussi ce que tu veux dire par "le montant mit après"

Je vais essayer en VBA et en SI imbriqué de mon côté.

Pour le moment j'ai réussi à faire ça. Mais ca me met Faux... et pour certaines ca fonctionne.

SI(ET(B2=B1;C2=C1);SI(STXT(K2;1;7)="COMPOSE";"0,00";SI(K2="AVOIR";J2;SI(STXT(K2;1;7)="COMPOSE";SI(K2="*AVOIR*";=STXT(K1;14;7));"0,00"))))

[Invité]

Pour le moment j'ai réussi à faire ça. Mais ca me met Faux... et pour certaines ca fonctionne.

SI(ET(B2=B1;C2=C1);SI(STXT(K2;1;7)="COMPOSE";"0,00";SI(K2="AVOIR";J2;SI(STXT(K2;1;7)="COMPOSE";SI(K2="*AVOIR*";=STXT(K1;14;7));"0,00"))))

Essaye ceci :

SI(ET(B2=B1;C2=C1;STXT(K2;1;7)="COMPOSE");"0,00";SI(K2="AVOIR";J2;SI(ET(STXT(K2;1;7)="COMPOSE";K2="*AVOIR*");STXT(K1;14;7);"0,00")))

[nexbw]

Essaye ceci :

SI(ET(B2=B1;C2=C1;STXT(K2;1;7)="COMPOSE");"0,00";SI(K2="AVOIR";J2;SI(ET(STXT(K2;1;7)="COMPOSE";K2="*AVOIR*");STXT(K1;14;7);"0,00")))

Merci Beaucoup !! Ca fonctionne

[Invité]

Merci Beaucoup !! Ca fonctionne

J'ai essayé un code VBA, au final il s'exécute en 4-5s mais je pense qu'il faut mieux rester sur une solution purement Excel.