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

Macro excel classement

  • Initiateur de la discussion Initiateur de la discussion shoub
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S

shoub

Guest
Bonjour à tous,

Tout d'abord je tiens à dire que je n'y connais rien en macro (je sais ça commence bien...🙄)
Pourtant je dois faire une macro avec la création d'un bouton qui va me permettre de classer le tableau en pièce-jointe!

Je m'explique :

-Il faudrait qu'en appuyant sur ce bouton le tableau ne ressorte QUE les lignes comportant un champ vide dans la colonne P (réponse finale)
-Un petit plus serait qu'un deuxième classement s'effectue après concernant la colonne B (Poste clé) et que les OUI apparaissent en premier

Et enfin il me faudrait un autre bouton qui permettre de rétablir le tableau à la "normal"...

Je ne sais pas du tout si c'est une formule qui prend du temps vu qu'en macro je suis proche du niveau Zéro...🙁

Merci d'avances pour vos réponses

Bonne journée à tous
 

Pièces jointes

Re : Macro excel classement

Bonjour gérard,

Oui c'est exactement ce que j'ai conseillé de faire mais on me demande expressément de faire une macro...(peut être pour me compliquer la tâche!😕)


Cdt
 
Re : Macro excel classement

Re :

mon réseau d'entreprise supprime le VBA
donc ouvrir Visual basic (Alt + F11)
insérer un module et copier le code suivant :

Code:
Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le 02/12/2010 par Lequet17449g
'

'
    Range("A2").Select
    Selection.AutoFilter
    ActiveWindow.SmallScroll ToRight:=7
    Selection.AutoFilter Field:=16, Criteria1:="="
    ActiveWindow.ScrollColumn = 7
    ActiveWindow.ScrollColumn = 6
    ActiveWindow.ScrollColumn = 5
    ActiveWindow.ScrollColumn = 4
    ActiveWindow.ScrollColumn = 3
    ActiveWindow.ScrollColumn = 2
    ActiveWindow.ScrollColumn = 1
    Range("A2:P62").Sort Key1:=Range("B2"), Order1:=xlDescending, Header:= _
        xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal
End Sub
Sub Macro2()
'
' Macro2 Macro
' Macro enregistrée le 02/12/2010 par Lequet17449g
'

'
    ActiveWindow.SmallScroll ToRight:=7
    Selection.AutoFilter Field:=16
    ActiveWindow.ScrollColumn = 7
    ActiveWindow.ScrollColumn = 6
    ActiveWindow.ScrollColumn = 5
    ActiveWindow.ScrollColumn = 4
    ActiveWindow.ScrollColumn = 3
    ActiveWindow.ScrollColumn = 2
    ActiveWindow.ScrollColumn = 1
    Range("A2").Select
    Selection.AutoFilter
End Sub

ensuite affecter la macro1 au bouton "filtre" et la macro2 au bouton "sans filtre"

cordialement, Gérard
 
Re : Macro excel classement

Parfait! ca marche bien dans le fichier !Merci!!!
Par contre si je compte rajouter des colonnes dois-je changer cette ligne de code :

Selection.AutoFilter Field:=16, Criteria1:="=" ?
 
Re : Macro excel classement

Re :

pour être le plus précis possible : si vous insérez des colonnes entre la B et la P il faut changer le chiffre de la ligne que vous avez sélectionnée : Field: = 16 agit sur la colonne P (P étant la seizième lettre de l'alphabet)
Ne pas oublier de le changer aussi dans la macro2

cordialement, Gérard
 
Re : Macro excel classement

Bonjour!

Merci pour les explications c'est déjà un peu plus clair!

Je reviens vers vous pour une nouvelle requête avec cette fois plus d'arguments...

je vais tenter d'être clair!
Cette fois il me faudrait une macro pour classer dans un premier temps
-la colonne K, ("ouvert" doit ressortir) puis classer suivant
-la colonne H (classement par date, les plus anciens en premier...) et enfin
-la colonne F ("Oui" doit ressortir en premier)

J’espère avoir été clair et pouvoir refaire une macro la prochaine fois ...

Merci d'avance
 

Pièces jointes

Re : Macro excel classement

Re,

Effectivement un filtre automatique peut fonctionner

1- mettre un filtre automatique sur la ligne 4
2- sur la petite flèche de la cellule K4 sélectionner ouvert
3- sur la petite flèche de la cellule H4 sélectionner tri croissant
4- sur la petite flèche de la cellule F4 sélectionner tri décroissant

Cordialement, Gérard
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

  • Question Question
Autres MACRO
Réponses
20
Affichages
835
M
Réponses
3
Affichages
471
Réponses
16
Affichages
2 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…