Copier une cellule en fonction d'autres cellules
Résolu/Fermé
siamens_duj
Messages postés
192
Date d'inscription
vendredi 20 juin 2014
Statut
Membre
Dernière intervention
14 février 2019
-
Modifié par siamens_duj le 20/06/2016 à 14:37
siamens_duj Messages postés 192 Date d'inscription vendredi 20 juin 2014 Statut Membre Dernière intervention 14 février 2019 - 23 juin 2016 à 08:44
siamens_duj Messages postés 192 Date d'inscription vendredi 20 juin 2014 Statut Membre Dernière intervention 14 février 2019 - 23 juin 2016 à 08:44
A voir également:
- Copier une cellule en fonction d'autres cellules
- Formule excel pour additionner plusieurs cellules - Guide
- Fonction si et - Guide
- Aller à la ligne dans une cellule excel - Guide
- Excel cellule couleur si condition texte - Guide
- Comment copier une vidéo youtube - Guide
2 réponses
Frenchie83
Messages postés
2240
Date d'inscription
lundi 6 mai 2013
Statut
Membre
Dernière intervention
11 août 2023
338
20 juin 2016 à 15:22
20 juin 2016 à 15:22
Bonjour
Essayez ceci
Cdlt
Essayez ceci
Sub Corres() Application.ScreenUpdating = False Sheets("COR").Select Range("H2:H" & [A100000].End(xlUp).Row).FormulaR1C1 = "=IFERROR(INDIRECT(""TXT!E"" & MATCH(RC[5],TXT!C26,0)),"""")" Range("H2:H" & [A100000].End(xlUp).Row).Value = Range("H2:H" & [A100000].End(xlUp).Row).Value End Sub
Cdlt
Frenchie83
Messages postés
2240
Date d'inscription
lundi 6 mai 2013
Statut
Membre
Dernière intervention
11 août 2023
338
20 juin 2016 à 15:49
20 juin 2016 à 15:49
Voici un exemple du fichier, effacer la colonne H et cliquez sur le bouton
https://www.cjoint.com/c/FFunWaPrD6w
Si ça ne convient pas, mettez un extrait de votre fichier (sans données confidentielles) sur cjoint.com.
https://www.cjoint.com/c/FFunWaPrD6w
Si ça ne convient pas, mettez un extrait de votre fichier (sans données confidentielles) sur cjoint.com.
siamens_duj
Messages postés
192
Date d'inscription
vendredi 20 juin 2014
Statut
Membre
Dernière intervention
14 février 2019
7
Modifié par siamens_duj le 20/06/2016 à 16:01
Modifié par siamens_duj le 20/06/2016 à 16:01
J'ai testé votre fichier et il fonctionne parfaitement, je ne comprends pas pourquoi cela ne fonctionne pas sur mon fichier ... Es ce parce que j'ai une version office 2007 ?
Aussi, devrais-je vous préciser qu'il arrive que des cellule de la colonne E de TXT soit vide ?
Je suis désolé je ne peux vraiment pas vous joindre mon fichier, tout son contenu est confidentiel. Cependant je vous remercie tout de même pour votre aide.
Aussi, devrais-je vous préciser qu'il arrive que des cellule de la colonne E de TXT soit vide ?
Je suis désolé je ne peux vraiment pas vous joindre mon fichier, tout son contenu est confidentiel. Cependant je vous remercie tout de même pour votre aide.
Frenchie83
Messages postés
2240
Date d'inscription
lundi 6 mai 2013
Statut
Membre
Dernière intervention
11 août 2023
338
20 juin 2016 à 16:38
20 juin 2016 à 16:38
J'ai aussi excel 2007,
Même si des cellules de la colonnes E de TXT sont vides, ça fonctionne aussi, faites l'essai en effaçant des cellules de la colonne E.
Je suis désolé je ne peux vraiment pas vous joindre mon fichier, tout son contenu est confidentiel. Même en remplaçant les données confidentielles par des valeurs bidons? Dommage.
Cdlt
Même si des cellules de la colonnes E de TXT sont vides, ça fonctionne aussi, faites l'essai en effaçant des cellules de la colonne E.
Je suis désolé je ne peux vraiment pas vous joindre mon fichier, tout son contenu est confidentiel. Même en remplaçant les données confidentielles par des valeurs bidons? Dommage.
Cdlt
siamens_duj
Messages postés
192
Date d'inscription
vendredi 20 juin 2014
Statut
Membre
Dernière intervention
14 février 2019
7
23 juin 2016 à 08:44
23 juin 2016 à 08:44
Bonjour,
C'est bon j'ai réussi !
Merci beaucoup pour votre aide.
C'est bon j'ai réussi !
Merci beaucoup pour votre aide.
20 juin 2016 à 15:34
J'ai appliqué votre code, seulement, j'ai ceci dans les cellules de la colonne H de "COR" :
=IFERROR(INDIRECT("TXT!E" & MATCH(RC[5],TXT!C26,0)),"")
20 juin 2016 à 15:41
20 juin 2016 à 15:46