Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

tri de colonne en VBA

1 réponse
Avatar
victor
Bonjour,
J'ai besoin de trier un tableau. Etant d=E9butant je=20
m'inspire des macros cr=E9es automatiquement par excel.

Pour cela je commence par trier une colonne, j'obtiens=20
alors la macro suivante:

*************
Sub Macro3()Columns("D:D").Select
Selection.Sort Key1:=3DRange("D1"), Order1:=3DxlAscending, =20
Header:=3DxlGuess, OrderCustom:=3D1, MatchCase:=3DFalse,=20
Orientation:=3DxlTopToBottom
End Sub
**************

Le probl=E8me c'est que cette macro tri la colonne en=20
question sans tenir compte des autres colonnes, mes=20
donn=E9es se retrouvent alors m=E9langes.

Comment faire en VBA pour =E9tendre le tri, de sorte a trier=20
la colonne en question, et que les donn=E9es voisines=20
suivent?

Merci d'avance.

Amicalement Victor

1 réponse

Avatar
AV
Est-ce que tes données ont des étiquettes en ligne 1 ?
Si non, il serait bon d'en mettre, c'est une bonne habitude à prendre !
Ensuite :
Range("D1").Sort Key1:=Range("D2"), ....etc....

AV

"victor" a écrit dans le message news:
080901c35514$08a2a6d0$
Bonjour,
J'ai besoin de trier un tableau. Etant débutant je
m'inspire des macros crées automatiquement par excel.

Pour cela je commence par trier une colonne, j'obtiens
alors la macro suivante:

*************
Sub Macro3()Columns("D:D").Select
Selection.Sort Key1:=Range("D1"), Order1:=xlAscending,
Header:=xlGuess, OrderCustom:=1, MatchCase:úlse,
Orientation:=xlTopToBottom
End Sub
**************

Le problème c'est que cette macro tri la colonne en
question sans tenir compte des autres colonnes, mes
données se retrouvent alors mélanges.

Comment faire en VBA pour étendre le tri, de sorte a trier
la colonne en question, et que les données voisines
suivent?

Merci d'avance.

Amicalement Victor