Problème de copier coller

[laurano]

bonjour, ma macro a un comportement que je n'arrive pas à m'expliquer. A partir d'une feuille nommé "BASE", je fais un filtre automatique sur le critère "#N/A" et je copie le résultat. Je veux ensuite coller ce résultat à la suite d'un tableau qui se trouve dans la feuille "STATS" soit sur la cellule (6+lignesuivi,1).

J'ai donc tapé le code suivant :
....
Selection.AutoFilter field:=1, Criteria1:="#N/A"
Selection.Copy
Sheets("STATS").Select
Sheets("STATS").Cells(6 + lignesuivi, 1).Select
ActiveSheet.Paste

et en fait il colle le résultat du filtre à l'endroit attendu... mais aussi en début de page en écrasant donc le tableau qui s'y trouve😕. Je n'arrive pas à comprendre pourquoi la macro réagit comme ça. Si quelqu'un peut m'éclairer...

Merci

Gilles

 

[skoobi]

Re : Problème de copier coller

Bonjour laurano,

sans utiliser Select, test ceci:

Selection.AutoFilter field:=1, Criteria1:="#N/A"
Selection.Copy Sheets("STATS").Cells(6 + lignesuivi, 1)

 

[laurano]

Re : Problème de copier coller

super ça marche ! je me demande quand même bien pourquoi dans l'autre cas ça ne marchait pas alors que c'était grosso modo ce que me donnait une macro en mode enregistré... les voies du VBA sont décicément impénétrables...

 

[skoobi]

Re : Problème de copier coller

Re,

c'était grosso modo ce que me donnait une macro en mode enregistré

Donc pas exactement la même chose...

 

[laurano]

Re : Problème de copier coller

Re,


Donc pas exactement la même chose...

of course c'était pas la même chose 😱) mais comme une macro enregistrée c'est totalement incapable de gérer des plages ou des cellules variables, il a bien fallu que je la modifie et je l'ai fait en respectant l'écriture... c'est en tout cas ce que je crois