L
laurano
Guest
bonjour,
mon petit problème du jour lors de la construction de ma macro. Un truc tout bête, mais je vois pas comment m'en sortir : J'ai une liste, je fais un filtre et je ne filtre que les valeurs qui sont à 0. Alors je copie cette liste (qui ne contient que les valeurs 0). Je sélectionne toutes les valeurs à nouveau dans la liste (sans inactiver le filtre) puis je colle ce que j'ai copié à côté. Ainsi j'ai collé à côté de ma première liste une liste qui n'a que les valeurs 0.
Je veux faire la même chose via VBA et j'ai donc écrit les 4 lignes suivantes :
Range("A4").CurrentRegion.AutoFilter field:=2, Criteria1:=0
Range("A4").CurrentRegion.Copy
Range("A4").CurrentRegion.AutoFilter field:=2
Range("D4").PasteSpecial Paste:=xlPasteValues
Cette macro fait exactement la même chose, hormis que quand elle resélectionne tous les éléments de la liste (ligne 3), elle perd le collage et donc la dernière étape plante. quelqu'un saurait me dire pourquoi ?
Merci
mon petit problème du jour lors de la construction de ma macro. Un truc tout bête, mais je vois pas comment m'en sortir : J'ai une liste, je fais un filtre et je ne filtre que les valeurs qui sont à 0. Alors je copie cette liste (qui ne contient que les valeurs 0). Je sélectionne toutes les valeurs à nouveau dans la liste (sans inactiver le filtre) puis je colle ce que j'ai copié à côté. Ainsi j'ai collé à côté de ma première liste une liste qui n'a que les valeurs 0.
Je veux faire la même chose via VBA et j'ai donc écrit les 4 lignes suivantes :
Range("A4").CurrentRegion.AutoFilter field:=2, Criteria1:=0
Range("A4").CurrentRegion.Copy
Range("A4").CurrentRegion.AutoFilter field:=2
Range("D4").PasteSpecial Paste:=xlPasteValues
Cette macro fait exactement la même chose, hormis que quand elle resélectionne tous les éléments de la liste (ligne 3), elle perd le collage et donc la dernière étape plante. quelqu'un saurait me dire pourquoi ?
Merci