Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Extraction de données

Extraction de données

3 réponses
Avatar
Valérie
Bonjour à tous,

Grâce à Camille, je peux à l'aide d'une macro extraire des données d'1
feuille Excel vers un autre tableau.
Voici la commande, avec 2 critères sur 1 même colonne :

Sub Macro()
Range("a79:s90").ClearContents
Sheets("Feuil1").Range("A1").AutoFilter Field:=17,
Criteria1:="=Lancement", Operator:=xlOr, _
Criteria2:="=Ciblée"
Sheets("Feuil1").Range("A1").CurrentRegion.Offset(1).Copy
Range("a79").PasteSpecial xlPasteFormulas
Sheets("Feuil1").ShowAllData
End Sub

Comment réaliser la même chose avec toujours 2 critères, l'un sur la colonne
17 et l'autre sur la colonne 9 ?

D'avance merci

Valérie.
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
AV
Quelque chose comme ça :

..........
with [Feuil1!A1]
.AutoFilter Field:, Criteria1:="=Lancement"
.AutoFilter Field:, Criteria1:="=Ciblée"
end with
........

AV
Avatar
Elliac
Bonjour Valérie,

Si Filtre de type Critère1 Et Critère2 :

Sheets("Feuil1").Range("A1").AutoFilter Field:, Criteria1:="Lancement"
Sheets("Feuil1").Range("A1").AutoFilter Field:=9, Criteria1:=3

Camille

"Valérie" wrote:

Bonjour à tous,

Grâce à Camille, je peux à l'aide d'une macro extraire des données d'1
feuille Excel vers un autre tableau.
Voici la commande, avec 2 critères sur 1 même colonne :

Sub Macro()
Range("a79:s90").ClearContents
Sheets("Feuil1").Range("A1").AutoFilter Field:,
Criteria1:="=Lancement", Operator:=xlOr, _
Criteria2:="=Ciblée"
Sheets("Feuil1").Range("A1").CurrentRegion.Offset(1).Copy
Range("a79").PasteSpecial xlPasteFormulas
Sheets("Feuil1").ShowAllData
End Sub

Comment réaliser la même chose avec toujours 2 critères, l'un sur la colonne
17 et l'autre sur la colonne 9 ?

D'avance merci

Valérie.


Avatar
Valérie
Merci à tous les 2.
Ca marche !


Bonjour à tous,

Grâce à Camille, je peux à l'aide d'une macro extraire des données d'1
feuille Excel vers un autre tableau.
Voici la commande, avec 2 critères sur 1 même colonne :

Sub Macro()
Range("a79:s90").ClearContents
Sheets("Feuil1").Range("A1").AutoFilter Field:,
Criteria1:="=Lancement", Operator:=xlOr, _
Criteria2:="=Ciblée"
Sheets("Feuil1").Range("A1").CurrentRegion.Offset(1).Copy
Range("a79").PasteSpecial xlPasteFormulas
Sheets("Feuil1").ShowAllData
End Sub

Comment réaliser la même chose avec toujours 2 critères, l'un sur la colonne
17 et l'autre sur la colonne 9 ?

D'avance merci

Valérie.