::: Marco de tri avec lignes vides en bas. ::: Sort marco with empty lines at the end.
5 réponses
infojacques
Bonjour, Quelqu'un peux-il m'aider =E0 cr=E9er une macro de tri avec les
lignes vides en bas (voire fichier ci-joint pour les d=E9tails
http://cjoint.com/?hevVdaabOb) ? MERCI Jacques
Hello, I would like to create a marcro that sorts data and keep the
blank lines at the end (please see the attached file for details
http://cjoint.com/?hevVdaabOb)? THANK YOU Jacques
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
JP25
Bonsoir, Ne peux-tu pas ajouter une fonction si =SI('BD or DB'!A23="";"zzzzzzzz";'BD or DB'!A23) (pour toute tes lignes bien sur) c'est une idée !! -- Cordialement JP25
a écrit dans le message de news:
Bonjour, Quelqu'un peux-il m'aider à créer une macro de tri avec les lignes vides en bas (voire fichier ci-joint pour les détails http://cjoint.com/?hevVdaabOb) ? MERCI Jacques
Hello, I would like to create a marcro that sorts data and keep the blank lines at the end (please see the attached file for details http://cjoint.com/?hevVdaabOb)? THANK YOU Jacques
Bonsoir,
Ne peux-tu pas ajouter une fonction si
=SI('BD or DB'!A23="";"zzzzzzzz";'BD or DB'!A23)
(pour toute tes lignes bien sur)
c'est une idée !!
--
Cordialement
JP25 NoSpam-jpmonnier@tele2.fr
<infojacques@gmail.com> a écrit dans le message de news:
1183578539.498546.63600@o61g2000hsh.googlegroups.com...
Bonjour, Quelqu'un peux-il m'aider à créer une macro de tri avec les
lignes vides en bas (voire fichier ci-joint pour les détails
http://cjoint.com/?hevVdaabOb) ? MERCI Jacques
Hello, I would like to create a marcro that sorts data and keep the
blank lines at the end (please see the attached file for details
http://cjoint.com/?hevVdaabOb)? THANK YOU Jacques
Bonsoir, Ne peux-tu pas ajouter une fonction si =SI('BD or DB'!A23="";"zzzzzzzz";'BD or DB'!A23) (pour toute tes lignes bien sur) c'est une idée !! -- Cordialement JP25
a écrit dans le message de news:
Bonjour, Quelqu'un peux-il m'aider à créer une macro de tri avec les lignes vides en bas (voire fichier ci-joint pour les détails http://cjoint.com/?hevVdaabOb) ? MERCI Jacques
Hello, I would like to create a marcro that sorts data and keep the blank lines at the end (please see the attached file for details http://cjoint.com/?hevVdaabOb)? THANK YOU Jacques
JP25
Encore moi exemple fichier avec macr de tri, formules et MEFC pour ne pas voir les lignes (faussement vides) -- Cordialement JP25
http://cjoint.com/?hewweGE66l a écrit dans le message de news:
Bonjour, Quelqu'un peux-il m'aider à créer une macro de tri avec les lignes vides en bas (voire fichier ci-joint pour les détails http://cjoint.com/?hevVdaabOb) ? MERCI Jacques
Hello, I would like to create a marcro that sorts data and keep the blank lines at the end (please see the attached file for details http://cjoint.com/?hevVdaabOb)? THANK YOU Jacques
Encore moi
exemple fichier avec macr de tri,
formules et MEFC pour ne pas voir les lignes (faussement vides)
--
Cordialement
JP25 NoSpam-jpmonnier@tele2.fr
http://cjoint.com/?hewweGE66l
<infojacques@gmail.com> a écrit dans le message de news:
1183578539.498546.63600@o61g2000hsh.googlegroups.com...
Bonjour, Quelqu'un peux-il m'aider à créer une macro de tri avec les
lignes vides en bas (voire fichier ci-joint pour les détails
http://cjoint.com/?hevVdaabOb) ? MERCI Jacques
Hello, I would like to create a marcro that sorts data and keep the
blank lines at the end (please see the attached file for details
http://cjoint.com/?hevVdaabOb)? THANK YOU Jacques
Encore moi exemple fichier avec macr de tri, formules et MEFC pour ne pas voir les lignes (faussement vides) -- Cordialement JP25
http://cjoint.com/?hewweGE66l a écrit dans le message de news:
Bonjour, Quelqu'un peux-il m'aider à créer une macro de tri avec les lignes vides en bas (voire fichier ci-joint pour les détails http://cjoint.com/?hevVdaabOb) ? MERCI Jacques
Hello, I would like to create a marcro that sorts data and keep the blank lines at the end (please see the attached file for details http://cjoint.com/?hevVdaabOb)? THANK YOU Jacques
Daniel
Bonsoir. rattache cette macro à un bouton :
Sub tri() Dim c As Range For Each c In Range("A7:C30") If c.Value <> "" And c.Value <> 0 Then c.Offset(, 9) = c Else c.Offset(, 9) = "" End If Next c Range("A7:L30").Sort Key1:=Range("J7"), Order1:=xlAscending, _ Key2:=Range("K7"), Order2:=xlAscending, Key3:=Range("L7"), _ Order3:=xlAscending, Header:=xlNo Range("J7:L30").Clear End Sub
Cordialement. Daniel a écrit dans le message de news:
Bonjour, Quelqu'un peux-il m'aider à créer une macro de tri avec les lignes vides en bas (voire fichier ci-joint pour les détails http://cjoint.com/?hevVdaabOb) ? MERCI Jacques
Hello, I would like to create a marcro that sorts data and keep the blank lines at the end (please see the attached file for details http://cjoint.com/?hevVdaabOb)? THANK YOU Jacques
Bonsoir.
rattache cette macro à un bouton :
Sub tri()
Dim c As Range
For Each c In Range("A7:C30")
If c.Value <> "" And c.Value <> 0 Then
c.Offset(, 9) = c
Else
c.Offset(, 9) = ""
End If
Next c
Range("A7:L30").Sort Key1:=Range("J7"), Order1:=xlAscending, _
Key2:=Range("K7"), Order2:=xlAscending, Key3:=Range("L7"), _
Order3:=xlAscending, Header:=xlNo
Range("J7:L30").Clear
End Sub
Cordialement.
Daniel
<infojacques@gmail.com> a écrit dans le message de news:
1183578539.498546.63600@o61g2000hsh.googlegroups.com...
Bonjour, Quelqu'un peux-il m'aider à créer une macro de tri avec les
lignes vides en bas (voire fichier ci-joint pour les détails
http://cjoint.com/?hevVdaabOb) ? MERCI Jacques
Hello, I would like to create a marcro that sorts data and keep the
blank lines at the end (please see the attached file for details
http://cjoint.com/?hevVdaabOb)? THANK YOU Jacques
Sub tri() Dim c As Range For Each c In Range("A7:C30") If c.Value <> "" And c.Value <> 0 Then c.Offset(, 9) = c Else c.Offset(, 9) = "" End If Next c Range("A7:L30").Sort Key1:=Range("J7"), Order1:=xlAscending, _ Key2:=Range("K7"), Order2:=xlAscending, Key3:=Range("L7"), _ Order3:=xlAscending, Header:=xlNo Range("J7:L30").Clear End Sub
Cordialement. Daniel a écrit dans le message de news:
Bonjour, Quelqu'un peux-il m'aider à créer une macro de tri avec les lignes vides en bas (voire fichier ci-joint pour les détails http://cjoint.com/?hevVdaabOb) ? MERCI Jacques
Hello, I would like to create a marcro that sorts data and keep the blank lines at the end (please see the attached file for details http://cjoint.com/?hevVdaabOb)? THANK YOU Jacques
LSteph
Bonsoir,
Sub Trip3() Dim laligne As Long laligne = Worksheets("BD or DB").[a65536].End(xlUp).Row
Worksheets("RESULTAT or RESULT").Range("a7", "h" & laligne).Sort _ Key1:=Range("A7"), Order1:=xlAscending, _ Key2:=Range("B7"), Order2:=xlAscending, _ Key3:=Range("C7"), Order3:=xlAscending, _ Header:=xlGuess, OrderCustom:=1, _ MatchCase:úlse, Orientation:=xlTopToBottom, _ DataOption1:=xlSortNormal, DataOption2:=xlSortNormal, _ DataOption3:=xlSortNormal End Sub
'Cordialement
'lSteph
Bonjour, Quelqu'un peux-il m'aider à créer une macro de tri avec les lignes vides en bas (voire fichier ci-joint pour les détails http://cjoint.com/?hevVdaabOb) ? MERCI Jacques
Hello, I would like to create a marcro that sorts data and keep the blank lines at the end (please see the attached file for details http://cjoint.com/?hevVdaabOb)? THANK YOU Jacques
Bonsoir,
Sub Trip3()
Dim laligne As Long
laligne = Worksheets("BD or DB").[a65536].End(xlUp).Row
Worksheets("RESULTAT or RESULT").Range("a7", "h" & laligne).Sort _
Key1:=Range("A7"), Order1:=xlAscending, _
Key2:=Range("B7"), Order2:=xlAscending, _
Key3:=Range("C7"), Order3:=xlAscending, _
Header:=xlGuess, OrderCustom:=1, _
MatchCase:úlse, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal, DataOption2:=xlSortNormal, _
DataOption3:=xlSortNormal
End Sub
'Cordialement
'lSteph
Bonjour, Quelqu'un peux-il m'aider à créer une macro de tri avec les
lignes vides en bas (voire fichier ci-joint pour les détails
http://cjoint.com/?hevVdaabOb) ? MERCI Jacques
Hello, I would like to create a marcro that sorts data and keep the
blank lines at the end (please see the attached file for details
http://cjoint.com/?hevVdaabOb)? THANK YOU Jacques
Sub Trip3() Dim laligne As Long laligne = Worksheets("BD or DB").[a65536].End(xlUp).Row
Worksheets("RESULTAT or RESULT").Range("a7", "h" & laligne).Sort _ Key1:=Range("A7"), Order1:=xlAscending, _ Key2:=Range("B7"), Order2:=xlAscending, _ Key3:=Range("C7"), Order3:=xlAscending, _ Header:=xlGuess, OrderCustom:=1, _ MatchCase:úlse, Orientation:=xlTopToBottom, _ DataOption1:=xlSortNormal, DataOption2:=xlSortNormal, _ DataOption3:=xlSortNormal End Sub
'Cordialement
'lSteph
Bonjour, Quelqu'un peux-il m'aider à créer une macro de tri avec les lignes vides en bas (voire fichier ci-joint pour les détails http://cjoint.com/?hevVdaabOb) ? MERCI Jacques
Hello, I would like to create a marcro that sorts data and keep the blank lines at the end (please see the attached file for details http://cjoint.com/?hevVdaabOb)? THANK YOU Jacques
infojacques
Bnojour, MERCI à tous pour vos réponses ! Je vais les tester et en adopter une :))) Bonne journée à vous ! Jacques
Bnojour,
MERCI à tous pour vos réponses !
Je vais les tester et en adopter une :)))
Bonne journée à vous !
Jacques