Copier la formule jusq'en bas deux fois dans la meme macro [Résolu/Fermé]

Signaler
Messages postés
78
Date d'inscription
lundi 24 mars 2014
Statut
Membre
Dernière intervention
18 mai 2017
-
Messages postés
78
Date d'inscription
lundi 24 mars 2014
Statut
Membre
Dernière intervention
18 mai 2017
-
Bonjour,

Que dois-je inscrire pour que ma formule se fasse jusqu'en bas une nouvelle fois dans la meme macro? Qu'est-ce qui remplace le double-clique que l'on fait manuellement dans une macro?


Range("P2").Select
ActiveCell.FormulaR1C1 = _
"=VLOOKUP(RC[-1],'Matrice Catégorie'!C[-14]:C[-13],2,FALSE)"
Range("P2").Select
Dim DernLigne As Long
DernLigne = Range("A" & Rows.Count).End(xlUp).Row
Range("P2").AutoFill Destination:=Range("P2:P" & DernLigne)

Je voudrais faire de meme sur la colonne O mais je ne peux inscrire de nouveau Dim DernLigne As Long
DernLigne = Range("A" & Rows.Count).End(xlUp).Row
Range("P2").AutoFill Destination:=Range("P2:P" & DernLigne)
dans la meme macro

Merci beaucoup de votre aide




3 réponses

Messages postés
2966
Date d'inscription
mardi 20 janvier 2009
Statut
Contributeur
Dernière intervention
20 décembre 2016
804
Salut le Forum

Si il y a le même nombre de lignes ajoute :
Range("O2").AutoFill Destination:=Range("O2:O" & DernLigne) 

Mytå
Messages postés
78
Date d'inscription
lundi 24 mars 2014
Statut
Membre
Dernière intervention
18 mai 2017

Merci beaucoup Mytå cela fonctionne très bien. C'est très gentil de votre part de m'avoir répondu j'apprécie énormement. Je vous souhaite une très belle journée!
Messages postés
23506
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
29 septembre 2020
6 373
Bonjour,

Et tu ne dois pas déclarer 2 fois la même variable dans une procédure (Dim...).

eric
Messages postés
78
Date d'inscription
lundi 24 mars 2014
Statut
Membre
Dernière intervention
18 mai 2017

Merci eriiic Bonne journée!
Messages postés
39096
Date d'inscription
mercredi 11 avril 2007
Statut
Modérateur
Dernière intervention
30 septembre 2020
8 607