IF(COUNTIF) en VBA

Y compris Power BI, Power Query et toute autre question en lien avec Excel
Répondre
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 : 7'074
Appréciations reçues : 370
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
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'171
Appréciations reçues : 448
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 : 7'074
Appréciations reçues : 370
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
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'171
Appréciations reçues : 448
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 : 7'074
Appréciations reçues : 370
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
Quelques règles à lire ICI ;;)
______________________________________________________Vous pouvez allez faire un tour sur : Index de "Mes applications" ;;)
Répondre
  • Sujets similaires
    Réponses
    Vues
    Dernier message
  • CountIf
    par Adyl2019 » 27 mars 2019, 15:40 » dans Excel - VBA
    5 Réponses
    67 Vues
    Dernier message par h2so4
    27 mars 2019, 17:40
  • Fonction Countif
    par stepel70 » 27 octobre 2015, 22:26 » dans Excel - VBA
    4 Réponses
    495 Vues
    Dernier message par LouReeD
    28 octobre 2015, 19:09
  • Syntaxe CountIF
    par barrym78 » 26 juin 2017, 11:52 » dans Excel - VBA
    16 Réponses
    1135 Vues
    Dernier message par barrym78
    27 juin 2017, 17:17
  • CountIF probleme
    par Spouns » 12 juin 2016, 11:58 » dans Excel - VBA
    5 Réponses
    258 Vues
    Dernier message par Spouns
    12 juin 2016, 21:38
  • Probleme de countif
    par Nieben » 15 avril 2018, 06:31 » dans Excel - VBA
    5 Réponses
    164 Vues
    Dernier message par Theze
    16 avril 2018, 06:38
  • Countif multiples
    par jules_57 » 23 août 2018, 17:19 » dans Excel - VBA
    2 Réponses
    64 Vues
    Dernier message par jules_57
    23 août 2018, 17:24