Copie d'une formule dans une macro

  • Initiateur de la discussion Initiateur de la discussion VaderPhil
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

VaderPhil

XLDnaute Nouveau
Bonjour à tous,

J'en suis à ma deuxième utilisation du forum, la première ayant été très fructueuse. Voici mon problème.

Dans une macro, j'ai besoin qu'on recopie une formule se trouvant en T242 dans la cellule T2 puis la copier sur l'intervalle T2:T200.
Ce n'est pas une petite formule !! la voici :

=CHOISIR(RECHERCHEV(A242,$AC$2:$AD$18,2,FAUX),A242&"_"&S242&"_"&N242,A242&"_"&S242&"_"&N242,A242&"_"&S242&"_"&N242,A242&"_"&S242&"_"&N242,A242&"_"&S242&"_"&N242,A242&"_"&S242&"_"&N242,A242&"_"&S242&"_"&N242,A242&"_"&S242&"_"&N242,A242&"_"&S242&"_"&N242,A242&"_"&S242&"_"&N242,A242&"_"&S242&"_"&N242,A242&"_"&S242&"_"&N242,A242&"_"&S242&"_"&N242,"BA"&RECHERCHEV(M242,$Z$2:$AA$13,2,FAUX)&DROITE(N242,1),"OU"&RECHERCHEV(M242,$Z$2:$AA$13,2,FAUX)&DROITE(N242,1),"FF"&RECHERCHEV(M242,$Z$2:$AA$13,2,FAUX)&DROITE(N242,1),"ED"&RECHERCHEV(M242,$Z$2:$AA$13,2,FAUX)&DROITE(N242,1))

Le code de macro utilisé est le suivant :

Range("T2:T200").Select
Selection.ClearContents
Range("T242").Select
Selection.Copy
Range("T2").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Selection.AutoFill Destination:=Range("T2:T200")

Le problème maintenant !!! Après quelques utilisation de la macro, la formule se "décale" de façon aléatoire... Je m'explique : Toute les références se font sur la même ligne (i.e. ligne 2 une fois recopié) mais certaines cellules se changent pour A3 alors que d'autres restes sur A2.
Voici un bref exemple de ce que ca me donne une fois recopié en T2:

=CHOISIR(RECHERCHEV(A3,$AC$2:$AD$18,2,FAUX),A3&"_"&S2&"_"&N3,A2&"_"&S2&"_"&N3,A3&"_"&S2&"_"&N3,A3&"_"&S2&"_"&N3, etc...

Je ne comprends pas ce qui se passe ! C'est très bizzare car quelque fois ma formule reste intacte, et d'autres fois une cellule sur 2 dans la formule décale vers le bas !!

merci d'avance
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
1
Affichages
1 K
Réponses
58
Affichages
5 K
Retour