Discussion :

[lmb19]

Bonjour,

Je cherche à réaliser une macro pour classer un tableau comme suit :

Code :

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

1
2
3
4
5
    c1        c2
l1 Nom     Nombre
l2 Paul        2
l3 Jacques   3
l4 Henry      7

mais en utilisant les coordonnées des cellules,

c.a.d

Code :

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

Range(cells(l1,c1),cells(l4,c2))

et pas

Code :

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

Range("A1:B4")

Pouvez-vous m'indiquer la macro qui permet de classer un tableau en selectionnat celui avec un :

Code :

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

Range(cells(l1,c1),cells(l4,c2))

merci

[PPz78]

Bonsoir,

en adaptant ceci tu devrais trouver ton bonheur :

Code :

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

1
2
3
4
    Range(Cells(4, 6), Cells(6, 7)).Select
    Selection.Sort Key1:=Cells(4, 6), Order1:=xlAscending, Header:=xlNo, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal

PPz

[lmb19]

Merci, Merci, Merci beaucoup !

[fring]

Bonjour,

Code qui peut se résumer par (sans passer par un Select inutile)

Code :

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

Range(Cells(4, 6), Cells(6, 7)).Sort Key1:=Cells(4, 6)

les autres arguments de la méthode "Sort" (Order, Matchcase, Orientation, etc...), étant les arguments par défaut, sont facultatifs et ne doivent pas obligatoirement être spécifiés.

[PPz78]

Bonjour,

Je ne suis pas d'accord avec la manie d'un certain nombre d'intervenants sur ce forum qui cherchent systématiquement à faire du code compact.

Nous sommes dans un forum d'entraide, beaucoup de questions proviennent de débutants pour lesquels la décomposition des actions facilite la compréhension.

Le découpage simplifie aussi le debug, par exemple dans le cas présent, le .Select va permettre de bien vérifier que le tri s'effectue sur la zone souhaitée.



PPz

[babaothe]

Salut

la recommandation de fring concerne un aspect essentiel car les Select, Activate, etc... ont pour résultat un ralentissement inévitable de l'application.

Ce fait est rappelé plusieurs fois par semaine sur ce forum.


Bonne journée

[PPz78]

bonjour,

C'est la différence entre les débutants qui souhaitent faire fonctionner leur code et les professionnels optimisent leur code.

Ce n'est pas une catastrophe si le temps d'exécution d'un petit programme d'un débutant s'exécute en 500 ms au lieu de 250. Mais cela le devient si la procédure pro nécessite 4 heures au lieu de deux.

Bon week-end

PPz

[fring]

Re,



Supprimer les "Select" inutiles n'est pas seulement pour une question d'optimisation de code mais d'une part ça transforme ton classeur en sapin de Noel et d'autre part cela peut être une source de plantage et je pourrais même dire sera une source de plantage parce que tôt ou tard tu n'auras pas sélectionné la bonne cellule ou la bonne feuille.

C'est certain que tu peux, en partant de Paris, arriver à Marseille en passant par Strasbourg, ça fonctionnera. Mais mon modeste rôle ici est d'essayer de vous mettre sur le bon chemin et d'optimiser vos temps de parcours et j'y attache la même importance que ce soit un code de 5 lignes ou de 500 lignes.

[Pierre Fauconnier]

Salut.

Je pense également qu'il faut supprimer les select autant que possible. Le fait d'être débutant n'enlève rien au fait qu'il est préférable de coder correctement, et autant prendre les bonnes habitudes dès le début.

Outre le fait que cela ralentit le code et que, sans gel de l'affichage, Excel clignote, les Select au sein d'une macro modifient l'aspect du classeur, ce qui fait que l'utilisateur qui lance une macro avec telle cellule de telle feuille sélectionnée va peut-être se retrouver avec une autre cellule d'une autre feuille activée, voire d'un autre classeur en sortie de macro.

C'est absurde sur le plan ergonomique, source d'erreurs, source d'inquiétudes pour l'utilisateur qui pousse sur un bouton "boite noire" et qui se demande s'il a fait une erreur de manip.

Donc oui, il faut supprimer les SELECT.

Et si l'on doit passer par des Select (certaines manipulations l'imposent), on veillera à rendre Excel dans l'état dans lequel on l'a trouvé (même classeur, même feuille et même plage activés) sauf besoin spécifique, bien entendu.

[Pierre Fauconnier]

Salut Fred,

...
les autres arguments de la méthode "Sort" (Order, Matchcase, Orientation, etc...), étant les arguments par défaut, sont facultatifs et ne doivent pas obligatoirement être spécifiés.

Pas d'accord avec toi. Si on ne les spécifie pas, les arguments de SORT sont les derniers qui ont été utilisés, par VBA ou en Excel. Pour être certain d'utiliser les bons, il faut donc les préciser à chaque fois.

[fring]

les arguments de SORT sont les derniers qui ont été utilisés

aah bin...merci pour la correction, j'ignorais cette subtilité, c'est en effet expliqué dans l'aide VBA .