Bonsoir le Forum,
Voici un fichier dans lequel j'ai essayé une macro qui tourne en rond (il faut faire Echap pour en sortir).
Je sollicite votre aide.
Comment reproduire par macro la phrase ci-dessous placée en cellule AP5 pour ‘sommer’ les valeurs données en ligne 5 du contenu des cellules B5:AG5 (colonne 2 à colonne 33) ?
Cette formule complétée serait ensuite reproduite verticalement en AP5 à AP42.
L'objectif est de trouver le résultat dans les cellules colonne AP et non plus la formule elle-même.
Voici pour le moment ce qui est reproduit en AP5, ne tenant compte que du calcul sur B5 :
FORMULE PARTIELLE :
J'ai essayé en plaçant la suite de formule pour la case AG5 : l'étendre entièrement aux autres cases entre B et AG la rend trop longue, et ce n'est pas accepté.
Vous trouverez le détail expliqué dans le fichier en feuille1 (macro commencée ne fonctionnant pas).
Merci pour votre aide.
Webperegrino
Voici un fichier dans lequel j'ai essayé une macro qui tourne en rond (il faut faire Echap pour en sortir).
Je sollicite votre aide.
Comment reproduire par macro la phrase ci-dessous placée en cellule AP5 pour ‘sommer’ les valeurs données en ligne 5 du contenu des cellules B5:AG5 (colonne 2 à colonne 33) ?
Cette formule complétée serait ensuite reproduite verticalement en AP5 à AP42.
L'objectif est de trouver le résultat dans les cellules colonne AP et non plus la formule elle-même.
Voici pour le moment ce qui est reproduit en AP5, ne tenant compte que du calcul sur B5 :
FORMULE PARTIELLE :
VB:
=SI(OU(B5="";B5="NON DISPONIBLE");"";MOD(SI(DROITE(B5;8)="- BADGES";GAUCHE(DROITE(B5;22);5)-GAUCHE(DROITE(B5;30);5);SI(DROITE(B5;2)="TS";GAUCHE(DROITE(B5;13);5)-GAUCHE(DROITE(B5;21);5);SI(DROITE(B5;2)="ES";GAUCHE(DROITE(B5;12);5)-GAUCHE(DROITE(B5;20);5);" ?")));1))
J'ai essayé en plaçant la suite de formule pour la case AG5 : l'étendre entièrement aux autres cases entre B et AG la rend trop longue, et ce n'est pas accepté.
Vous trouverez le détail expliqué dans le fichier en feuille1 (macro commencée ne fonctionnant pas).
Merci pour votre aide.
Webperegrino
Pièces jointes
Dernière édition: