Sujet Précédent Sujet Suivant

Créer tableau de données avec condition

Résolu/Fermé
Ricky38 Messages postés 4347 Date d'inscription samedi 15 mars 2008 Statut Contributeur Dernière intervention 2 novembre 2013 - 3 juin 2012 à 16:08
Ricky38 Messages postés 4347 Date d'inscription samedi 15 mars 2008 Statut Contributeur Dernière intervention 2 novembre 2013 - 3 juin 2012 à 19:31
Bonjour,

j'ai un petit problème. J'ai un fichier avec 2 feuilles: Commandes et Achats.

Sur la feuilles Achats j'aimerais faire apparaître dynamiquement seulement les données qui sont notées "Payé" en colonne D de la feuille Commandes.

Ceci peut être fait via une formule ou bien en VBA.

Mon fichier: https://www.cjoint.com/?BFdqdKwZxPK

Merci d'avance pour votre aide.



A voir également:

2 réponses

Réponse 1 / 2
m@rina Messages postés 20027 Date d'inscription mardi 12 juin 2007 Statut Contributeur Dernière intervention 18 avril 2024 11 269
3 juin 2012 à 18:07
Bonjour,

Essaie ça : 

Sub payés()
Dim commandes As Worksheet
Dim achats As Worksheet
Dim DL As Long, tablo As Range

Set commandes = ActiveWorkbook.Sheets("commandes")
Set achats = ActiveWorkbook.Sheets("achats")

DL = commandes.Range("A" & Rows.Count).End(xlUp).Row
Set tablo = commandes.Range("A2:D" & DL)

With tablo
.AutoFilter Field:=4, Criteria1:="Payé"
.Copy Destination:=achats.Range("A1")
End With
commandes.ShowAllData

End Sub

m@rina
0
Réponse 2 / 2
Ricky38 Messages postés 4347 Date d'inscription samedi 15 mars 2008 Statut Contributeur Dernière intervention 2 novembre 2013 1 458
3 juin 2012 à 19:31
Allo m@rina,

merci beaucoup, ça fonctionne à merveille.
0

Discussions similaires

ou sont les bananes ?
Liline -
Le Pro -

2 réponses
créer une adresse gmail pour une autre personne
Emma33000 -
Emma33000 -

2 réponses