Discussion :

[sweetty]

Bonjour,

Je tourne un peu en rond alors je viens chercher un peu d'aide.

J'ai mon onglet"VE" ou j'ai toutes mes données que je voudrai copier en "Feuil5" selon condition (la valeur recherché est "ESP" dans la colonne 50.

Si en "VE" (les données commencent en ligne 3 (ligne1= totaux et ligne2 =titres)) la cellule de la colonne 50 à la valeur "ESP" alors copie la ligne de la colonne 1 à 5 sur la feuille "Feuil5"

Le tableau en "VE" est saisi toutes les semaines et comporte pour le moment 326 lignes.

Je voudrai une copie (sans effacement) des 5 premières colonnes de "VE" dans "Feuil5" au fur et à mesure de la saisie, et surtout sans doublon.

J'ai ce début de code mais je bloque:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Sub TriESP()
 
Sheets("VE").Select
FinalRow = Cells(Rows.Count, 1).End(xlUp).Row
 
For x = 1 To FinalRow
 
    ThisValue = Cells(x, 50).Value
    If ThisValue = "ESP" Then
        Cells(x, 1).Resize(1, 5).Copy
        Sheets("Feuil5").Select
        NextRow = Cells(Rows.Count, 1).End(x1Up).Row + 1
        Cells(NextRow, 1).Select
        ActiveSheet.Paste
        Sheets("VE").Select
     End If
Next x
 
End Sub

Merci pour votre aide

[Philippe Tulliez]

Bonjour,
Outre PowerQuery il est possible d'exporter selon condition avec la méthode AdvancedFilter de l'objet Range qui permet d'exporter avec ou sans conditions partiellement ou pas les colonnes et avec ou sans doublon. Avec des plages nommées ou tables structurées c'est quelques lignes de code

Lire éventuellement les tutoriels suivant

• Les filtres avancés ou élaborés dans Excel
• Apprendre à utiliser les tableaux structurés Excel : création, manipulations et avantages(1)
• Excel: Les tables de données en VBA

Quelques exemples dans ces contributions et billets

• VBA pour Excel - Copier une table structurée sur une autre à l’aide de la méthode Copy
• La méthode AdvancedFilter et l'objet ListObject
• Excel - VBA Exporter des lignes suivant critères avec la méthode AdvancedFilter

[EDIT]
Quelques exemples en plus dans ces discussions

• Filtre avancé;Copier dans
• Alimenter un tableau excel a partir d'autres classeurs
• Afficher des lignes comprises entre 2 dates
• Rechercher une plage de données