IF(COUNTIF) en VBA

Y compris Power BI, Power Query et toute autre question en lien avec Excel
C
Clingn
Nouveau venu
Nouveau venu
Messages : 5
Inscrit le : 21 septembre 2018
Version d'Excel : 2013 EN

Message par Clingn » 24 septembre 2018, 21:09

Bonjour,


Sauriez-vous traduire cette formule en vba ? Ce sont des formules countif (NB.SI en francais) concatenees.
J'ai 75 valeurs dans le tableau initial (colonne B) et je ne peux que concatener 64 fois les countif.

=IF(COUNTIF(H671,"*"&$B$3&"*")=1,$B$3,IF(COUNTIF(H671,"*"&$B$4&"*")=1,$B$4,IF(COUNTIF(H671,"*"&$B$5&"*")=1,$B$5,IF(COUNTIF(H671,"*"&$B$6&"*")=1,$B$6,IF(COUNTIF(H671,"*"&$B$7&"*")=1,$B$7,IF(COUNTIF(H671,"*"&$B$8&"*")=1,$B$8,IF(COUNTIF(H671,"*"&$B$9&"*")=1,$B$9,IF(COUNTIF(H671,"*"&$B$10&"*")=1,$B$10,IF(COUNTIF(H671,"*"&$B$11&"*")=1,$B$11,IF(COUNTIF(H671,"*"&$B$12&"*")=1,$B$12,IF(COUNTIF(H671,"*"&$B$13&"*")=1,$B$13,IF(COUNTIF(H671,"*"&$B$14&"*")=1,$B$14,IF(COUNTIF(H671,"*"&$B$15&"*")=1,$B$15,IF(COUNTIF(H671,"*"&$B$16&"*")=1,$B$16,IF(COUNTIF(H671,"*"&$B$17&"*")=1,$B$17,IF(COUNTIF(H671,"*"&$B$18&"*")=1,$B$18,IF(COUNTIF(H671,"*"&$B$19&"*")=1,$B$19,IF(COUNTIF(H671,"*"&$B$20&"*")=1,$B$20,IF(COUNTIF(H671,"*"&$B$21&"*")=1,$B$21,IF(COUNTIF(H671,"*"&$B$22&"*")=1,$B$22,""))))))))))))))))))))

Cette formule sert a m'extraire une valeur d'un texte d'une cellule.

Merci beaucoup d'avance
Avatar du membre
LouReeD
Contributeur
Contributeur
Messages : 5'838
Appréciations reçues : 240
Inscrit le : 14 octobre 2014
Version d'Excel : 2013 FR, 2016 FR
Contact :
Téléchargements : Mes applications

Message par LouReeD » 24 septembre 2018, 21:59

Bonsoir,

si vous mettiez le fichier d'origine qui nous a value votre belle formule, alors peut-être qu'en prenant un autre chemin nous arriverions à destination sans passer par le VBA...
En effet, essayer de mettre une rustine sur un code pour arriver à un résultat est certainement plus compliquer que de changer la roue entière, non ?

@ bientôt

LouReeD
Contributeur depuis peu ! 8-)
Quelques règles à lire ICI ;;)
______________________________________________________Vous pouvez allez faire un tour sur : Index de "Mes applications" ;;)
M
MFerrand
Fanatique d'Excel
Fanatique d'Excel
Messages : 17'201
Appréciations reçues : 444
Inscrit le : 20 juillet 2015
Version d'Excel : 2010 FR

Message par MFerrand » 25 septembre 2018, 00:20

Bonsoir, Salut LouReed !

Déjà quand on peut prévoir qu'une formule va dépasser 3 lignes, je ne commence même pas à l'écrire ! :lole: je cherche une autre voie (comme le dit LouReed).

En corollaire, je ne la lis pas non plus ! :-))) J'attends qu'on m'explique en termes rationnels ce qu'elle est censée produire (et à partir de quoi), ce qui me permet de refléchir à une solution possible. Ça, je peux toujours faire... :D

Ecrire une formule en VBA ? En général je refuse, considérant qu'il est plus facile d'insérer une formule manuellement que la coder, et que si l'on a recours à VBA c'est plutôt pour se passer de formule qu'en mettre..., sauf cas particuliers (mais ils sont rares).
Faire le calcul en VBA au moyen de la formule ? Si elle coince dans Excel, il en sera de même en VBA (puisque c'est les fonctions d'Excel que l'on utilise). ::(

Et le survol de ta formule (même sans la lire, on voit quelques éléments) montre qu'il convenait de chercher la solution ailleurs qu'en se lançant dans cette formulation absurde ! :mrgreen:

Donc, le mieux que tu aies à faire est de ranger ta formule aux oubliettes et exposer les données du problème, puis fournir un fichier adéquat afin d'obtenir une ou plusieurs réponses viables et adaptées.

Cordialement.
Avatar du membre
LouReeD
Contributeur
Contributeur
Messages : 5'838
Appréciations reçues : 240
Inscrit le : 14 octobre 2014
Version d'Excel : 2013 FR, 2016 FR
Contact :
Téléchargements : Mes applications

Message par LouReeD » 25 septembre 2018, 18:45

Bonjour Maréchal ! :-)

Une fois de plus c'est exactement ce que je voulais dire, mais je l'ai dis en moins bien ! ;-)
Comment allez vous ?
Moi ça va le déménagement c'est bien passé, un peu long (certain dirait très long, n'Est-ce pas dhany ? ;-)) et maintenant un peu moins de temps à consacrer aux fils...

@ bientôt

LouReeD
Contributeur depuis peu ! 8-)
Quelques règles à lire ICI ;;)
______________________________________________________Vous pouvez allez faire un tour sur : Index de "Mes applications" ;;)
M
MFerrand
Fanatique d'Excel
Fanatique d'Excel
Messages : 17'201
Appréciations reçues : 444
Inscrit le : 20 juillet 2015
Version d'Excel : 2010 FR

Message par MFerrand » 25 septembre 2018, 23:31

Salut LouReed !

Je vois en effet que ton image s'est modifiée ! ;;)
Tu as fini le déménagement, mais l'emménagement ?
J'essaie d'aller et ça a l'air de fonctionner à peu près, donc tout va bien ! :mrgreen:
@+
Avatar du membre
LouReeD
Contributeur
Contributeur
Messages : 5'838
Appréciations reçues : 240
Inscrit le : 14 octobre 2014
Version d'Excel : 2013 FR, 2016 FR
Contact :
Téléchargements : Mes applications

Message par LouReeD » 26 septembre 2018, 22:01

Maréchal, vous me voyez là ravis pour vous ! :-)
Une pause fait toujours du bien.

Pour l'emménagement je dirais que ça va... Mais toujours ce manque de temps... :-(
Heureusement que le temps est de la partie avec ce beau soleil ! :-)

@ bientôt

LouReeD
Contributeur depuis peu ! 8-)
Quelques règles à lire ICI ;;)
______________________________________________________Vous pouvez allez faire un tour sur : Index de "Mes applications" ;;)
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message