XL 2010 Tri automatisé en VBA

_Thierry

XLDnaute Barbatruc

Repose en paix

• 15 Mai 2020

• #2

jojodu42 à dit:

......trier de manière automatique ......... lorsque 5 d'elles [Cellules] sont modifiées...........

Cliquez pour agrandir...

Bonjour @jojodu42 , le Forum
Je pense que cette automation bizarre, est la cause que tu n'aies pas encore de réponse...
Perso je ne comprends pas, 5 cellules modifiées ? où dans la même colonne ? dans le même tableau ? ... en combien de temps ? déjà que ca va être "coton" à détécter... je ne vois même pas l'utilité ?

Pourquoi pas un simple bouton de tri ? qui placerait le curseur en fin de traitement sur la prochaine cellule vide ?

Bien à toi, à vous
@+Thierry

 

Vote positif 0 Vote négatif

J

jojodu42

XLDnaute Nouveau

• 16 Mai 2020

• #3

Bonjour, je vous remrcie de m'avoir répondu.
Les 5 cellules modifiées, je me suis mal exprimé. Mon tableau, pour avoir une ligne valide en plus doit avoir au moins 5 colonnes de remplies.
Je veux trier si ces 5 colonnes sont remplies.
Pour l'instant j'ai un bouton de tri mais il n'est pas pratique.

 

Vote positif 0 Vote négatif

_Thierry

XLDnaute Barbatruc

Repose en paix

• 16 Mai 2020

• #4

Bonjour @jojodu42 , le Forum

Voici mon interprétation c'était plus simple avec tes dernières explications 😉

Bien @ Toi, @ Vous
@+Thierry

 

Pièces jointes

• XLD_jojodu42_Sort_Auto_5_Cells_Remplies.xlsm

  17.2 KB · Affichages: 6

Vote positif 0 Vote négatif

J

jojodu42

XLDnaute Nouveau

• 16 Mai 2020

• #5

Bonjour,
Voici un extrait du tableau que je voudrais trier.

Je veux trier les 50 dernières lignes de ma feuille.
1- Colonne H de Z à A
2- Colonne A de plus ancien au plus récent
3- Colonne B de A à Z

De manière automatique dès lors que la ligne contient au moins 5 valeurs (ABCD E ou F)

Je vous remercie pour votre aide.
Serait-il possible dans le code VBA de me dire en gros à quelle partie de la commande ça correspond svp ? Merci

A	B	C	D	E	F	G	H
16/05/2020	D1	Essai 1	15		15,00	-15

15/05/2020

C8

Essai 2

15

15

+15

 

Vote positif 0 Vote négatif

_Thierry

XLDnaute Barbatruc

Repose en paix

• 17 Mai 2020

• #6

Bonjour @jojodu42 , le Forum

Pour moi c'est un non-sense de faire ce genre de tri, tu vas détruire ton tableau (à moins que ce ne soit délibérément le but ?) plus rien se sera réellement face à face dans la ligne que tu viens de saisir :

jojodu42 à dit:

1- Colonne H de Z à A
2- Colonne A de plus ancien au plus récent
3- Colonne B de A à Z

Cliquez pour agrandir...

Ci-joint un autre exemple.

Bonne journée
@+Thierry

 

Pièces jointes

• XLD_jojodu42_Sort_Auto_5_Cells_Remplies_v01.xlsm

  18.6 KB · Affichages: 7

Vote positif 0 Vote négatif

J

jojodu42

XLDnaute Nouveau

• 17 Mai 2020

• #7

Bonjour @_Thierry
Le fichier correspond à mes attentes. Une dernière question, mes données à trier commencent à la ligne 28 (ou 27 si on prend l'en-tête). Pouvez-vous me dire ou le régler?
Merci.

 

Vote positif 0 Vote négatif

_Thierry

XLDnaute Barbatruc

Repose en paix

• 17 Mai 2020

• #8

Bonsoir Jojodu42

Pour régler, ca se passe ici :
Set Plage = Range("A2:H" & Range("A5000").End(xlUp).Row)

Tu peux changer :
Set Plage = Range("A28:H" & Range("A5000").End(xlUp).Row)

Bonne soirée
@+Thierry

 

Vote positif 0 Vote négatif

J

jojodu42

XLDnaute Nouveau

• 18 Mai 2020

• #9

Bonjour Thierry,
Lon fichier fonctione très bien, j'ai modifié la valeur comme convenu mais je me suis aperçu d'un bug. Ma colonne H ne se trie pas. Elle désynchronise le tableau.
On s'est peut-être ma; compris. Je veux trier les ligne 28 à 1267 d'un ficher par 3 critères
1- Colonne H de Z à A
2- Colonne A de plus ancien au plus récent
3- Colonne B de A à Z

Mais que les données d'une même ligne restent sur la même ligne.

L'automatisation du tri fonctionne parfaitement.

Jordan

 

Vote positif 0 Vote négatif

_Thierry

XLDnaute Barbatruc

Repose en paix

• 18 Mai 2020

• #10

Bonjour @jojodu42

Ce n'est pas un Bug, j'avais prévenu que je ne suivais pas vraiment ce que tu voulais faire :

_Thierry à dit:

Pour moi c'est un non-sense de faire ce genre de tri, tu vas détruire ton tableau (à moins que ce ne soit délibérément le but ?) plus rien se sera réellement face à face dans la ligne que tu viens de saisir

Cliquez pour agrandir...

Bon maintenant je crois avoir compris cette fois ! 😉

Bonne journée
@+Thierry

 

Pièces jointes

• XLD_jojodu42_Sort_Auto_5_Cells_Remplies_v02.xlsm

  20.8 KB · Affichages: 7

Vote positif 0 Vote négatif

J

jojodu42

XLDnaute Nouveau

• 18 Mai 2020

• #11

Merci beaucoup

 

Vote positif 0 Vote négatif