Macro qui modifie formule sans que je le veuille

Bonjour,

Je m'explique j'ai la macro ci-dessous qui je ne sais pas pour quoi modifie une formule que j'ai en 1ère col

A chaque fois que je lance la Macro les formules de la colonne A sont modifiées

ex. Au départ : =SI($G11="";"";SI(GAUCHE($G11;7)<>"Réunion";"";STXT($G11;TROUVE("Réunion";$G11)+8;NBCAR($M11))))

devient : =SI($H11="";"";SI(GAUCHE($H11;7)<>"Réunion";"";STXT($H11;TROUVE("Réunion";$H11)+8;NBCAR($M11))))

puis le G devient H puis J, et K .... ça se modifie et s'incrémente à chaque lancement de la Macro.

j'ai remarqué aussi que ma Cell fusionnée A1 changeait aussi.

Surement un pb dans le code mais ou et quoi ??? je ne trouve pas !

Du coût mon calcul en cell A est faux dès que je relance la Macro

Help, une âme charitable

Voir mon fichier joint

Merci

Laurent

Bonjour

ll30 a écrit :

j'ai la macro ci-dessous

Laquelle ?

Dans ton fichier tu as 36 000 macros

ll30 a écrit :

je lance la Macro

Même question

ll30 a écrit :

j'ai remarqué aussi que ma Cell fusionnée A1 changeait aussi.

Ta cellule A1 n'est pas fusionnée

Bonjour

En effet, l'import insére une nouvelle colonne avant la colonne G et déplace donc les champs des formules.

De même, ta cellule fusionnée B1 et ton bouton augmentent d'une cellule à chaque appel de la Macro

Sans intervenir sur le Code

1) remplacer en A9 et incrémenter vers le bas ta formule par

=SI(DECALER($A9;;6)="";"";SI(GAUCHE(DECALER($A9;;6);7)<>"Réunion";"";STXT(DECALER($A9;;6);TROUVE("Réunion";DECALER($A9;;6))+8;NBCAR(DECALER($A9;;6)))))

2) remplacer ta cellule fusionnée A1 par une Zone de texte reprenant sa couleur et son contenu

3) Dans les propriétés de la Zone de Texte et du Bouton Macro, cocher "Ne pas déplacer ou dimensionner avec les cellules"

Exemple sur le fichier joint

Cordialement

PROBLÈME RÉSOLU

Merci Infiniment, pour ta réactivité et ta compétence.

Je ne connaissais pas cette fonction "Décaler"

Merci encore

Cordialement

Laurent

Rechercher des sujets similaires à "macro qui modifie formule que veuille"