Xl2010 VBA Avis sur début de code

Bonjour à tous

Si j'écris

dim combobox1 as string

Dim combobox2 as string

D1D=combobox1. Value

D1F=combobox2. Value

Puis le reste du code

Pour me permettre de faire un tri sur 2 critères sur une colonne.

dans cette colonne le format est : S1 ou S2 ou S..

S1 étant semaine 1 Donc de S1 à S52.

Pouvez vous me dire si je suis dans la bonne direction svp

Merci

Ledzep

Bonjour,

Tu ne peux pas :

Dim ComboBox1 as String... car ComboBox est un contrôle

D1D est la variable à typer

Soit :

Dim D1D as String

puis

D1D = ComboBox1.Value '...

Si tu veux faire un tri correct, il faut nommer tes semaines :

S01, S02,...

A+

Bonsoir à tous

@ Galopin01

Merci pour ces précisions.

Il faut que j'apprenne à réfléchir d'une autre façon

Je vais écrire mon code pour dans un premier tps faire le filtre sur la base de données.

Après le filtre en place ,j'aimerais copier la partie filtrée pour la mettre ds un nouvelle onglet.

Si je n'y arrive pas j'espère te retrouver pour la suite.

Bonne soirée

Ledzep

Bonsoir à Tous

@Galopin

Bon je n'y arrive pas, j'ai beau essayé de rechercher des explications je bute

Donc voici mon fichier.

L'explication est ds la feuille Tableau de bord de ce que je souhaite faire.

Si vous avez une autre solution!

Merci de votre aide

Bonne soirée

Ledzep

Oups j'avais fait une erreur Fichier corrigé

bonjour,

Je ne répond que parce que tu m'as nommé explicitement aussi tu risques de ne pas avoir d'autre réponse.

A l'avenir essaie de ne pas t'adresser à un interlocuteur particulier sinon en l'absence de l'intéressé tu n'auras pas de réponse...

Voir en pièce jointe.

A+

Bonjour à tous

Désolé, je ne voulais pas cela.

Maintenant je comprends pourquoi un autre poste est sans réponse.

Merci de ton retour

je teste le fichier ce week

Encore désolé

Bonne fin de journée à tous

Bonsoir à tous

J'ai essayé le code, il fonctionne.

Mais en relisant ma demande, je me suis très mal exprimé, en fait la feuille listing est déjà triée automatiquement.

Par contre si je sélectionne dans CboNsem_Deb= S1 et CboNsem_Fin S3, j'aimerais avoir la S1 la S2 et S3 copié vers la feuille tableau de bord.

Ce n'est pas un tri mais des butée début S1 fin S3.

Excuser moi de mon erreur

Private Sub BtnValid_ExtracSDO_Click()
Dim D1$, D2$
Dim WsS As Worksheet
Set WsS = Worksheets("LISTING")
    WsS.ListObjects("TListing").Range.AutoFilter Field:=10, Criteria1:=CboNsem_Deb, Operator:=xlOr, Criteria2:=CboNsem_Fin
    WsS.ListObjects("TListing").DataBodyRange.Copy [B8]
End Sub

Si vous pouvez me donner une solution

Merci

Bonne soirée

Ledzep

Bonjour,

Tu mélanges tout ! Tri, Filtre et maintenant Butée...

Ce format de semaine rend les choses très compliquées : Je suggère tout simplement de noter les semaines par leur N° 1, 2, 3... Ça, Excel comprend bien ! Et VBA aussi. comme ça pas de problème de tri ou de filtre, ni de butée.

A+

Bonjour à tous

Bonjour galopin01

Excuse moi, je me suis trompé dans ma demande, cela arrive !

Par contre suite à ta remarque, je comprends mieux

Tu mélanges tout ! Tri, Filtre et maintenant Butée...

Ce format de semaine rend les choses très compliquées : Je suggère tout simplement de noter les semaines par leur N° 1, 2, 3... Ça, Excel comprend bien ! Et VBA aussi. comme ça pas de problème de tri ou de filtre, ni de butée.

Je sais que vous bénévoles de ce forum passer beaucoup de tps , et qu'il est difficile de recommencer un code si le demandeur n'est pas clair ou précis ds sa demande.

Merci pour ton aide et désolé de t’avoir donner autant de soucis

Passe un bon dimanche et à bientôt, en espérant que tu ne mas pas blacklisté

Ledzep

ledzep a écrit :

Excuse moi, je me suis trompé dans ma demande, cela arrive !

(...) à bientôt, en espérant que tu ne mas pas blacklisté

Pas de souci : Yake celui qui ne fait rien qui ne se trompe jamais !

Ma solution te convient-elle ?

A+

Bonjour à tous

Oui cela me convient galopin01, je vais pouvoir continuer mon projet.

est il possible d’effacer dans la feuille tableau de bord l'extraction précédente ?

Connais tu d'autres méthodes pour réaliser ce type extraction ou copie de zone ?

Encore merci pour ta patience et ton aide sur ce sujet.

J'attends début Mars pour fermer ce sujet.

Ledzep

Bonsoir à tous

Je clos le sujet, il ma permis de continuer mon projet.

Merci d'avoir passer du tps dessus pour me donner la solution.

Bon week-end

Ledzep