Ajout après Filtrage

[eric57]

Bonsoir le Forum

Je viens vers vous pour un nouveau souci.

Je "fabrique" une liste à Partir de la sélection de début des caractères issus d'une "Liste Entête" depuis un UserForm

Pour le moment j'appelle mon UserForm par la "tête jaune"

Puis, je sélectionne (Partie Rose) et je trie ma colonne " Modèle" par le bouton "Création Liste" qui me colle le résultat dans une nouvelle colonne ( L et M)

Le problème c'est les 2 premières rangées qui sont à chaque fois copiés avec , et je ne sais pas comment l'éviter.

Je ne sais pas si mes explications sont des plus claires. Je penses que Ce sera plus parlant avec le tableau joint .

Merci a ceux qui pourront m'aider

 

[Chris401]

Bonsoir

Modifie la partie

With Sheets("Base").Columns(1)
    .AutoFilter Field:=1, Criteria1:="=" & X & "*", Operator:=xlAnd
    .Range("A:B").Copy Destination:=Sheets("Depart").Range("L" & Count)

par une plage déterminée débutant par A2 comme

With Sheets("Base").Columns(1)
    .AutoFilter Field:=1, Criteria1:="=" & X & "*", Operator:=xlAnd
    .Range("A2:B1000").Copy Destination:=Sheets("Depart").Range("L" & Count)

 

[eric57]

Merci Chris 401

Cela fonctionne effectivement.

 

[eric57]

Désolé je revient sur ce problème,

Cette méthode Range("A2:B1000") pose un souci

Si dans ma liste "entête" j'ai une donné (comme par ex II) et que je n'ai pas de cellules "commençant par II" j'ai la liste compléte ( colonne A) qui se copie

 

[Chris401]

Bonjour

Et si le Combobox2 se remplissait automatiquement selon les valeurs de la colonne A (plus besoin de la colonne N Liste des Entêtes ) ?
Tu ne pourrais choisir que les items qui existent.

Voir fichier

 

[eric57]

Merci pour ton retour, Chris, cela ne fonctionne pas dans mon cas, car j'ai mis le commencement à 2 lettres dans l'exemple, mais la liste finale sera bien différente. On aura une colonne "A" Modèle de 1500 à 2000 lignes, et les "tête de listes" ont parfois 3 - 4 voir 5 ou 6 caractères .

Par contre je retiens ta macro pour un autre projet . Elle me servira bien .

Après, en théorie ma liste a entête dans "N" devrait forcement avoir une correspondance dans la colonne "A" mais je préfère prévoir toutes les possibilités .

 

[Chris401]

Re

Nouveau fichier

 

[eric57]

Alors ce coup-ci je te confirme que c'est opérationnel avec mes premiers essais .

Test grandeur nature dès lundi, je reviendrai confirmer pour te tenir au courant

Merci pour ton aide

Eric