OVH Cloud OVH Cloud

encore un tri...!!

19 réponses
Avatar
Yvan
Bonjour à tous
J'ai un pb de tri sur 3 colonnes liées avec des groupés différents...
J'aimerais en faire une macro sans "toucher à la feuille".
Je m'explique. (les - sont des cellules vides). J'ai en
A B C
Polo - -
Marie - -
- vtt -
- - derailleur
- - cliquet
- micro -
- - pc
Ali - -
- tricycle -
- bmx -
J'aimerais avoir le tri suivant :
A B C
Ali - -
- bmx
- tricycle -
Marie - -
- micro -
- - pc
- vtt -
- - cliquet
- - derailleur
Polo - -
Est-ce quelqu'un veut bien avoir la gentillesse de m'aider.
Merci
Yvan

10 réponses

1 2
Avatar
Starwing
Bonjour,

Faudrait comprendre quel est l'ordre de tri auquel tu fais allusion...
Si on a pas plus d'explication, les réponses ne viendront pas.

Starwing
"Yvan" a écrit dans le message de
news:
Bonjour à tous
J'ai un pb de tri sur 3 colonnes liées avec des groupés différents...
J'aimerais en faire une macro sans "toucher à la feuille".
Je m'explique. (les - sont des cellules vides). J'ai en
A B C
Polo - -
Marie - -
- vtt -
- - derailleur
- - cliquet
- micro -
- - pc
Ali - -
- tricycle -
- bmx -
J'aimerais avoir le tri suivant :
A B C
Ali - -
- bmx
- tricycle -
Marie - -
- micro -
- - pc
- vtt -
- - cliquet
- - derailleur
Polo - -
Est-ce quelqu'un veut bien avoir la gentillesse de m'aider.
Merci
Yvan







Avatar
Yvan
Bonjour,
Je croyais que c'était visible avec la deuxième partie.
Il s'agit d'un tri alphabétique.
Merci
Yvan
"Starwing" a écrit dans le message de news:

Bonjour,

Faudrait comprendre quel est l'ordre de tri auquel tu fais allusion...
Si on a pas plus d'explication, les réponses ne viendront pas.

Starwing
"Yvan" a écrit dans le message de
news:
Bonjour à tous
J'ai un pb de tri sur 3 colonnes liées avec des groupés différents...
J'aimerais en faire une macro sans "toucher à la feuille".
Je m'explique. (les - sont des cellules vides). J'ai en
A B C
Polo - -
Marie - -
- vtt -
- - derailleur
- - cliquet
- micro -
- - pc
Ali - -
- tricycle -
- bmx -
J'aimerais avoir le tri suivant :
A B C
Ali - -
- bmx
- tricycle -
Marie - -
- micro -
- - pc
- vtt -
- - cliquet
- - derailleur
Polo - -
Est-ce quelqu'un veut bien avoir la gentillesse de m'aider.
Merci
Yvan











Avatar
Starwing
Bonjour,

Hum!!! Drôle de tri alphabétique...
J'aimerais avoir le tri suivant :
Colonne B:

bmx
tricycle
micro
vtt

Starwing

Avatar
Yvan
Les tirets sont des cells vides.
Partie à trier :

A B C
Polo - -
Marie - -
- vtt -
- - derailleur
- - cliquet
- micro -
- - pc
Ali - -
- tricycle -
- bmx -

Partie triée alphabétiquement

A B C
Ali - -
- bmx
- tricycle -
Marie - -
- micro -
- - pc
- vtt -
- - cliquet
- - derailleur
Polo - -
Tu vois ce que je veux dire ?


"Starwing" a écrit dans le message de news:

Bonjour,

Hum!!! Drôle de tri alphabétique...
J'aimerais avoir le tri suivant :
Colonne B:

bmx
tricycle
micro
vtt

Starwing





Avatar
Patrick Bastard
Bonjour à toi aussi, *Yvan*.
*Pour reprendre les termes de ton intervention* -voir en fin de message :
Moi, moi, je vois !!!

Trier d'abord col A (en considérant que les tirets sont la recopie du nom
qui les précède verticalement, même chose pour tous les B correspondant aux
A, et pour les C correspondant à chaque B dans chaque A.
Sans modifier le fichier, je ne sais pas faire.
Peut-être avec une feuille sup, et en remplaçant les tirets par les textes
qui les précèdent verticalement:, et en triant sur les 3 colonnes ?


--
Bien cordialement,
==================================== P. Bastard.
Pour me contacter, remplacez "Chez" par @ dans l'adresse

Une foule de conseils utiles sur le site de Misange :
http://www.excelabo.net


Les tirets sont des cells vides.
Partie à trier :

A B C
Polo - -
Marie - -
- vtt -
- - derailleur
- - cliquet
- micro -
- - pc
Ali - -
- tricycle -
- bmx -

Partie triée alphabétiquement

A B C
Ali - -
- bmx
- tricycle -
Marie - -
- micro -
- - pc
- vtt -
- - cliquet
- - derailleur
Polo - -
Tu vois ce que je veux dire ?


"Starwing" a écrit dans le message de news:

Bonjour,

Hum!!! Drôle de tri alphabétique...
J'aimerais avoir le tri suivant :
Colonne B:

bmx
tricycle
micro
vtt

Starwing





Avatar
Jean-Claude
Salut,

Sub essai()
NbLgn = ActiveSheet.UsedRange.Rows.Count

For i = 1 To NbLgn
If Cells(i, 1) <> "" Then James = Cells(i, 1).Value
Cells(i, 4) = James & Cells(i, 2).Value & Cells(i, 3).Value
Next i
End Sub

et après tu tries sur la colonne 4
et tu l'effaces
A adapter selon la structure et automatiser
A+
Jc
Avatar
Yvan
Bonsoir,
J'aimerais ne pas avoir à recopier les noms... il faudra les effacer
après...
Une macro serait la bienvenue.
Merci

"Patrick Bastard" <bastardp"chez"free.fr> a écrit dans le message de news:

Bonjour à toi aussi, *Yvan*.
*Pour reprendre les termes de ton intervention* -voir en fin de message :
Moi, moi, je vois !!!

Trier d'abord col A (en considérant que les tirets sont la recopie du nom
qui les précède verticalement, même chose pour tous les B correspondant
aux

A, et pour les C correspondant à chaque B dans chaque A.
Sans modifier le fichier, je ne sais pas faire.
Peut-être avec une feuille sup, et en remplaçant les tirets par les textes
qui les précèdent verticalement:, et en triant sur les 3 colonnes ?


--
Bien cordialement,
==================================== > P. Bastard.
Pour me contacter, remplacez "Chez" par @ dans l'adresse

Une foule de conseils utiles sur le site de Misange :
http://www.excelabo.net


Les tirets sont des cells vides.
Partie à trier :

A B C
Polo - -
Marie - -
- vtt -
- - derailleur
- - cliquet
- micro -
- - pc
Ali - -
- tricycle -
- bmx -

Partie triée alphabétiquement

A B C
Ali - -
- bmx
- tricycle -
Marie - -
- micro -
- - pc
- vtt -
- - cliquet
- - derailleur
Polo - -
Tu vois ce que je veux dire ?


"Starwing" a écrit dans le message de news:

Bonjour,

Hum!!! Drôle de tri alphabétique...
J'aimerais avoir le tri suivant :
Colonne B:

bmx
tricycle
micro
vtt

Starwing










Avatar
Yvan
Salut Jean-Claude
J'ai essayé. Mais j'aimerais ne pas créer de 4e colonne et coller
directement
les plages triées à la bonne place...
qu'en penses-tu ?
Sinon le code est bon.
yvan


"Jean-Claude" a écrit dans le message de news:
#
Salut,

Sub essai()
NbLgn = ActiveSheet.UsedRange.Rows.Count

For i = 1 To NbLgn
If Cells(i, 1) <> "" Then James = Cells(i, 1).Value
Cells(i, 4) = James & Cells(i, 2).Value & Cells(i, 3).Value
Next i
End Sub

et après tu tries sur la colonne 4
et tu l'effaces
A adapter selon la structure et automatiser
A+
Jc




Avatar
Yvan
Correction.
"Cells(i, 4) = James & Cells(i, 2).Value & Cells(i, 3).Value"
n'affiche pas la deuxieme colonne quand j'ai 3 niveaux...
j'obtiens en D
A B C D
oi - - oi (ok)
- gfd - oigfd (ok)
- - aze oiaze (au lieu de oigfdaze)
Tu vois ce que je veux dire ?
@+
yvan


"Jean-Claude" a écrit dans le message de news:
#
Salut,

Sub essai()
NbLgn = ActiveSheet.UsedRange.Rows.Count

For i = 1 To NbLgn
If Cells(i, 1) <> "" Then James = Cells(i, 1).Value
Cells(i, 4) = James & Cells(i, 2).Value & Cells(i, 3).Value
Next i
End Sub

et après tu tries sur la colonne 4
et tu l'effaces
A adapter selon la structure et automatiser
A+
Jc




Avatar
Jean-Claude
Et en mettant
Cells(i, 4) = James & "/" & Cells(i, 2).Value & "/" & Cells(i, 3).Value

A+
Jc
1 2