report des lignes après un tri sur liste déroulante

A

averty

XLDnaute Junior

• 10 Février 2010

• #2

Re : report des lignes après un tri sur liste déroulante

J'ai oublié de préciser que j'ai essayé de faire des macros indépendantes en copiant et ne ne collant que les valeurs sur la deuxième feuille, mais il me faut plus de 30 macros donc 30 boutons et je pense vraiment qu'on doit pouvoir simplifier la procédure, mais je suis vraiment trop débutant pour ça.
merci

 

Vote positif 0 Vote négatif

Excel-lent

XLDnaute Barbatruc

• 10 Février 2010

• #3

Re : report des lignes après un tri sur liste déroulante

Bonjour Averty,

La solution la plus simple, utiliser le filtre élaboré.

"Données"/"Filtrer"/"Filtre élaboré..."

Ou sinon : mettre une liste de validation dans la cellule de ton choix, et faire une petite macro.

(pour les listes de validation, si tu retiens cette solution, regarde sur le forum, il y a déjà pleins d'explications bien faite).

Si tu utilise la seconde méthode, prépare le fichier et nous t'aiderons pour le code si tu n'y arrives pas.

Bonne journée

 

Vote positif 0 Vote négatif

Papou-net

XLDnaute Barbatruc

• 10 Février 2010

• #4

Re : report des lignes après un tri sur liste déroulante

Bonjour averty, Excel-lent,

Ci-joint une solution avec macros, et liste triée.

Espérant avoir répondu.

Cordialement.

Cijoint.fr - Service gratuit de dépôt de fichiers

 

Vote positif 0 Vote négatif

A

averty

XLDnaute Junior

• 10 Février 2010

• #5

Re : report des lignes après un tri sur liste déroulante

Merci à vous deux.
C'est vraiment le principe que je souhaitais développer.
J'ai encore une petite question mais celle-là je suis peut-être capable d'y répondre seul:
peut-on prendre la précaution d'effacer les lignes de la deuxième feuille avant d'y "coller" les lignes resultant du tri selectif?
Je pense y arriver en collant dans la procédure une commande pour vider les lignes de 1 à 100. Qu'en pensez-vous?
(je joins le fichier repris par Papou et dans lequel j'indique tout ça)
merci encore vous m'aidez vraiement à essayer de comprendre.

 

Pièces jointes

• tri des lignes.zip

  24 KB · Affichages: 37

Vote positif 0 Vote négatif

Papou-net

XLDnaute Barbatruc

• 10 Février 2010

• #6

Re : report des lignes après un tri sur liste déroulante

averty à dit:

Merci à vous deux.
C'est vraiment le principe que je souhaitais développer.
J'ai encore une petite question mais celle-là je suis peut-être capable d'y répondre seul:
peut-on prendre la précaution d'effacer les lignes de la deuxième feuille avant d'y "coller" les lignes resultant du tri selectif?
Je pense y arriver en collant dans la procédure une commande pour vider les lignes de 1 à 100. Qu'en pensez-vous?
(je joins le fichier repris par Papou et dans lequel j'indique tout ça)
merci encore vous m'aidez vraiement à essayer de comprendre.

Cliquez pour agrandir...

Oui bien sûr !
Ajoute la ligne en rouge :

Code:

Private Sub CommandButton1_Click()
[COLOR="Red"]Feuil2.Range("A2:E100").ClearContents[/COLOR]
With Feuil1
  lg = 2
  For Each cel In .Range("B2:B" & .Range("B65536").End(xlUp).Row)
    If cel.Value = .ComboBox1.Value Then
      For c = 1 To 5
        Feuil2.Cells(lg, c) = .Cells(cel.Row, c)
      Next
      lg = lg + 1
    End If
  Next
End With
End Sub

Cordialement.

 

Vote positif 0 Vote négatif

A

averty

XLDnaute Junior

• 10 Février 2010

• #7

Re : report des lignes après un tri sur liste déroulante

Super TOP
ça marche!
j'ai tout bien fait ce que tu m'as conseillé et en plus j'en ai compris une partie
encore merci
cordialement

 

Vote positif 0 Vote négatif

Excel-lent

XLDnaute Barbatruc

• 10 Février 2010

• #8

Re : report des lignes après un tri sur liste déroulante

Bonsoir à vous deux,

Ou si le nombre de ligne et/ou de colonne de la feuille 2 varie, tu peux remplacer :

Code:

[COLOR="Red"]Feuil2.Range("A2:E100").ClearContents[/COLOR]

Par ceci

Code:

[COLOR="Red"]Feuil2.Cells.ClearContents[/COLOR]

Que signifie .Cells?

Cela veut dire : sélectionner TOUTES les cellules de la feuille 2. Bref c'est la même chose que .Range("A1:IV65536")

Bonne soirée à tous

 

Vote positif 0 Vote négatif

A

averty

XLDnaute Junior

• 10 Février 2010

• #9

Re : report des lignes après un tri sur liste déroulante

Bonsoir
c'est vrai, ça marche aussi et je prends ce code comme ça ça marchera avec mon fichier qui a beaucoup plus de lignes que le fichier exemple
merci encore

 

Vote positif 0 Vote négatif