Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Vba Selection / Copie de plages

2 réponses
Avatar
Domi
Bonsoir à tous,

petite question toute bête,

Range("L3", Range("A65000").End(xlUp)).AdvancedFilter
Action:=xlFilterInPlace, CriteriaRange:= _
Range("M2:M3"), Unique:=False

Avec ce petit bout de code je filtre (elaboré) mes données... comment copier
les lignes filtrées de la feuille active sur la feuille "toto" d'un autre
classeur "Classeur2" à partir de la cellule G5 par exemple (G5 sera la
cellule en haut à gauche de la plage copiée) ?.

Merci
Domi

2 réponses

Avatar
isabelle
bonjour Domi,

ajoute les lignes suivantes à ta macro,

Range("A1:L" & Range("A65536").End(xlUp).Row).Copy _
Destination:=Workbooks("Classeur2").Sheets("toto").Range("G5")
Application.CutCopyMode = False

isabelle


Bonsoir à tous,

petite question toute bête,

Range("L3", Range("A65000").End(xlUp)).AdvancedFilter
Action:=xlFilterInPlace, CriteriaRange:= _
Range("M2:M3"), Unique:úlse

Avec ce petit bout de code je filtre (elaboré) mes données... comment copier
les lignes filtrées de la feuille active sur la feuille "toto" d'un autre
classeur "Classeur2" à partir de la cellule G5 par exemple (G5 sera la
cellule en haut à gauche de la plage copiée) ?.

Merci
Domi


Avatar
Domi
Merci beaucoup ;o)
Domi
"isabelle" a écrit dans le message de news:

bonjour Domi,

ajoute les lignes suivantes à ta macro,

Range("A1:L" & Range("A65536").End(xlUp).Row).Copy _
Destination:=Workbooks("Classeur2").Sheets("toto").Range("G5")
Application.CutCopyMode = False

isabelle


Bonsoir à tous,

petite question toute bête,

Range("L3", Range("A65000").End(xlUp)).AdvancedFilter
Action:=xlFilterInPlace, CriteriaRange:= _
Range("M2:M3"), Unique:úlse

Avec ce petit bout de code je filtre (elaboré) mes données... comment
copier


les lignes filtrées de la feuille active sur la feuille "toto" d'un
autre


classeur "Classeur2" à partir de la cellule G5 par exemple (G5 sera la
cellule en haut à gauche de la plage copiée) ?.

Merci
Domi