Excel VB 3 conditions tri+creation 3 tables
Delphine
-
zakaria -
zakaria -
Bonjour, j'aurais besoin de votre aide très rapidement si possible.
Voilà j'ai un sheet avec 3 colonnes. Col1:nom client, Col2: nom société, col3: nombre de connection a notre site.
J'aimerais faire 3 tris en fonction du nombre de connections.
0 connections, + de 3 et + de 5.
sélectionner le résultat après chaque tri( les 3 cols) et les copier dans un nouveau sheet.
J'arrive a faire les tris avec:
Mais j'arrive pas a faire la sélection et le copy dans un autre sheet.
Autre question, au lieu de lui dire "Range("C:C")", n'est-il pas possible de lui dire de faire le tri sur la colonne sélectionnée ?
Un tout grand merci pour votre aide, sachez d'avance que vous me serez d'un grand secours !!!!!!! A bientôt
Voilà j'ai un sheet avec 3 colonnes. Col1:nom client, Col2: nom société, col3: nombre de connection a notre site.
J'aimerais faire 3 tris en fonction du nombre de connections.
0 connections, + de 3 et + de 5.
sélectionner le résultat après chaque tri( les 3 cols) et les copier dans un nouveau sheet.
J'arrive a faire les tris avec:
Range("C:C").autofilter field:=1, criteria1:="=0"
Mais j'arrive pas a faire la sélection et le copy dans un autre sheet.
Autre question, au lieu de lui dire "Range("C:C")", n'est-il pas possible de lui dire de faire le tri sur la colonne sélectionnée ?
Un tout grand merci pour votre aide, sachez d'avance que vous me serez d'un grand secours !!!!!!! A bientôt
A voir également:
- Excel VB 3 conditions tri+creation 3 tables
- Ai suite 3 - Télécharger - Optimisation
- Comment faire un tri personnalisé sur excel - Guide
- Picasa 3 - Télécharger - Albums photo
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
3 réponses
Salut,
ColA:nom client, ColB: nom société, colC: nombre de connection
1.
Les colonnes A,B et C de la feuille 1 sont copier dans la feuille 2
2.
je fait le filtre ( plus grand ou egal à 3 et plus petit que 5) ensuite je copie le résultat (y compris les en têtes des colonnes dans la feuill2). A toi d'adapter.
ColA:nom client, ColB: nom société, colC: nombre de connection
1.
Les colonnes A,B et C de la feuille 1 sont copier dans la feuille 2
Sub copiercolonnes()
Sheets("Feuil1").Columns("A:C").Copy Sheets("Feuil2").Range("A1")
End Sub
2.
je fait le filtre ( plus grand ou egal à 3 et plus petit que 5) ensuite je copie le résultat (y compris les en têtes des colonnes dans la feuill2). A toi d'adapter.
Sub copiercolonne()
Dim n As Long
n = Range("c65536").End(xlUp).Row 'nbr lignes y compris le titre de champs
Columns("A:C").Select
Selection.AutoFilter Field:=3, Criteria1:=">=3", Operator:=xlAnd, _ Criteria2:="<5"
Rows("1:" & n).Select
Selection.Copy Sheets("Feuil2").Range("A1")
End Sub