Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 Copie avec filtre

L

Le Rouky

XLDnaute Nouveau
Le forum,

Je suis coincé sur un problème de copier-coller avec un filtre.
Je joints un fichier avec ce qu'il devrait se passer, j'ai un soucis avec le copier-coller il m'en fait que 4 et non 5.sur la page "data" et me crée 5 lignes dans la page "Traitement"

si vous avez une proposition pour simplifier le code, cela m'intéresse aussi.

Cordialement
 

Pièces jointes

  • Data .xlsm
    31.3 KB · Affichages: 9
Trier par date Trier par votes
L

Le Rouky

XLDnaute Nouveau
Le forum,

Je reviens sur ce Post, car au vu du nombre d'affichage, les gens ne doivent pas être intéressés pour répondre à une si banal requête ou me suis je mal expliqué.

le but étant de :

- dans l'onglet "Data"
- filtrer les cellules vide de la Colonne "E"
- de selectionner les 5 premières cellules visibles des colonnes "A" et "B"
- de coller ces données dans la feuille "Traitement" en bas du tableau, dans les colonnes "B" et "C"
- de mettre en au bout des lignes copiées colonne "E", le contenu de la "TextBox1"
- de mettre en couleur les cellules des lignes copiées de la Colonne "A" à "E"
- retirer le filtre

- dans l'onglet "Traitement"
- Mettre au bout des lignes coller
colonne "D" => le contenu de la "TextBox2"
colonne "E" => le contenu de la "TextBox1"

voila, pensant être plus claire, merci d'avance.

Cordialement
 
Vote positif 0 Vote négatif
L

Le Rouky

XLDnaute Nouveau
Le forum, @Phil69970,

c'etait mieux avant, l'utilisateur reste en feuille "Traitement", par contre c'est dans la colonne "saisie" en feuille "Data" que cela va.

j'avais modifié ton script en ajoutant
WsSrc.Range("E" & i) = "Lion"


Cordialement
 
Vote positif 0 Vote négatif
L

Le Rouky

XLDnaute Nouveau
Le forum, @Phil69970,

merci, j'avais déjà corrigé, tu est partie sur le tableau

VB: 
        With WsDst.ListObjects("Tableau17069").ListRows.Add

est il possible de le remplacer par de la cellule A1 à la dernière cellule de la dernière colonne ?

Cordialement
 
Vote positif 0 Vote négatif

Phil69970

XLDnaute Barbatruc
Re

Tu as un tableau structuré donc la gestion du tableau est faite par excel et tu n'as pas besoin de t'en occupé.
Maintenant si tu n'as pas de tableau structuré post le fichier que je fasse les adaptations

*Si c'est pas cela désolé mais je n'ai pas compris ce que tu veux faire.

@Phil69970
 
Vote positif 0 Vote négatif
L

Le Rouky

XLDnaute Nouveau

dans mon fichier original le tableau n'est pas structuré, c'est pour cela que je pose la question.
peut-on faire la même chose sans ce tableau structuré ?

cordialement
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.

Discussions similaires

H
  • Question
XL 2016 fonction FILTRE sur Excel 2016
Réponses
9
Affichages
632
Hynnuh
H
P
  • Question
Microsoft 365 Fonction filtre avec si
2 3
Réponses
40
Affichages
1 K
Pulpito
P
P
  • Question
Microsoft 365 Filtre listview comboBox en cascades avec tableau structuré
5 6 7
Réponses
103
Affichages
3 K
Dranreb
E
  • Résolu(e)
Microsoft 365 Filtre multi critères
2 3
Réponses
31
Affichages
719
TooFatBoy
F
  • Question
Microsoft 365 Copie de couleur de cellules
Réponses
3
Affichages
223
gbinforme
G
C
  • Question
XL 2021 Créer une vue filtrée sur plusieurs lignes
Réponses
1
Affichages
202
djidji59430
B
  • Résolu(e)
Microsoft 365 Recherche dans tableaux suivant 4 critères
2
Réponses
15
Affichages
594
Blf57
B
R
  • Question
Autres INDEX EQUIV avec plusieurs lignes de résultats
Réponses
8
Affichages
564
ratsizaha
R
X
  • Question
XL 2016 Souci copier/coller avec un filtre.
2 3 4
Réponses
55
Affichages
3 K
Xender
X
F
  • Question
XL 2013 Tri d'une listbox sur 2 combobox en cascade
2
Réponses
25
Affichages
787
franxy
F
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…