Bonjour,
je voudrais pouvoir lister les nombres contenus dans une plage.
j'ai mon onglet "feuil1", avec des nombres éparpillés sur la plage de [O8] à
[AM52], mais dans cette plage, il y a aussi des cellules de texte.
Je voudrais, avoir sur une meme colonne, en "feuil2" à partir de la case
[B2], tous mes nombres de "feuil1" comme précisé ci-avant, par ordre
croissant.
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
michdenis
Si tu as une version autre qu'excel 2007, tu devras revoir le truc de "Sort". car cette façon de procéder est nouvelle et ne s'applique pas sur les versions antérieures.
Sub test() Dim Rg As Range, C As Range, A As Long A = 1 On Error Resume Next Set Rg = Feuil1.Cells.SpecialCells(xlCellTypeConstants, xlNumbers) For Each C In Rg A = A + 1 Feuil2.Range("B" & A).Value = C.Value Next With Feuil2.Sort .SetRange Feuil2.Range("B2:B" & _ Feuil2.Range("B65536").End(xlUp).Row) .Header = xlNo .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .Apply End With
End Sub
"Sunburn" a écrit dans le message de news: Bonjour, je voudrais pouvoir lister les nombres contenus dans une plage. j'ai mon onglet "feuil1", avec des nombres éparpillés sur la plage de [O8] à [AM52], mais dans cette plage, il y a aussi des cellules de texte. Je voudrais, avoir sur une meme colonne, en "feuil2" à partir de la case [B2], tous mes nombres de "feuil1" comme précisé ci-avant, par ordre croissant.
je vous remercie. YANN
Si tu as une version autre qu'excel 2007, tu devras revoir le truc
de "Sort". car cette façon de procéder est nouvelle et ne s'applique
pas sur les versions antérieures.
Sub test()
Dim Rg As Range, C As Range, A As Long
A = 1
On Error Resume Next
Set Rg = Feuil1.Cells.SpecialCells(xlCellTypeConstants, xlNumbers)
For Each C In Rg
A = A + 1
Feuil2.Range("B" & A).Value = C.Value
Next
With Feuil2.Sort
.SetRange Feuil2.Range("B2:B" & _
Feuil2.Range("B65536").End(xlUp).Row)
.Header = xlNo
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
End Sub
"Sunburn" <Sunburn@discussions.microsoft.com> a écrit dans le message de
news: 077FD388-958D-4F5E-B69C-5F7F1B3F8327@microsoft.com...
Bonjour,
je voudrais pouvoir lister les nombres contenus dans une plage.
j'ai mon onglet "feuil1", avec des nombres éparpillés sur la plage de [O8] à
[AM52], mais dans cette plage, il y a aussi des cellules de texte.
Je voudrais, avoir sur une meme colonne, en "feuil2" à partir de la case
[B2], tous mes nombres de "feuil1" comme précisé ci-avant, par ordre
croissant.
Si tu as une version autre qu'excel 2007, tu devras revoir le truc de "Sort". car cette façon de procéder est nouvelle et ne s'applique pas sur les versions antérieures.
Sub test() Dim Rg As Range, C As Range, A As Long A = 1 On Error Resume Next Set Rg = Feuil1.Cells.SpecialCells(xlCellTypeConstants, xlNumbers) For Each C In Rg A = A + 1 Feuil2.Range("B" & A).Value = C.Value Next With Feuil2.Sort .SetRange Feuil2.Range("B2:B" & _ Feuil2.Range("B65536").End(xlUp).Row) .Header = xlNo .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .Apply End With
End Sub
"Sunburn" a écrit dans le message de news: Bonjour, je voudrais pouvoir lister les nombres contenus dans une plage. j'ai mon onglet "feuil1", avec des nombres éparpillés sur la plage de [O8] à [AM52], mais dans cette plage, il y a aussi des cellules de texte. Je voudrais, avoir sur une meme colonne, en "feuil2" à partir de la case [B2], tous mes nombres de "feuil1" comme précisé ci-avant, par ordre croissant.
je vous remercie. YANN
Sunburn
En effet, j'ai Excel 2003 - SP3. Et le "sort" correspond à quoi en fait ?
Merci. YANN
"michdenis" a écrit :
Si tu as une version autre qu'excel 2007, tu devras revoir le truc de "Sort". car cette façon de procéder est nouvelle et ne s'applique pas sur les versions antérieures.
Sub test() Dim Rg As Range, C As Range, A As Long A = 1 On Error Resume Next Set Rg = Feuil1.Cells.SpecialCells(xlCellTypeConstants, xlNumbers) For Each C In Rg A = A + 1 Feuil2.Range("B" & A).Value = C.Value Next With Feuil2.Sort .SetRange Feuil2.Range("B2:B" & _ Feuil2.Range("B65536").End(xlUp).Row) .Header = xlNo .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .Apply End With
End Sub
"Sunburn" a écrit dans le message de news: Bonjour, je voudrais pouvoir lister les nombres contenus dans une plage. j'ai mon onglet "feuil1", avec des nombres éparpillés sur la plage de [O8] à [AM52], mais dans cette plage, il y a aussi des cellules de texte. Je voudrais, avoir sur une meme colonne, en "feuil2" à partir de la case [B2], tous mes nombres de "feuil1" comme précisé ci-avant, par ordre croissant.
je vous remercie. YANN
En effet, j'ai Excel 2003 - SP3.
Et le "sort" correspond à quoi en fait ?
Merci.
YANN
"michdenis" a écrit :
Si tu as une version autre qu'excel 2007, tu devras revoir le truc
de "Sort". car cette façon de procéder est nouvelle et ne s'applique
pas sur les versions antérieures.
Sub test()
Dim Rg As Range, C As Range, A As Long
A = 1
On Error Resume Next
Set Rg = Feuil1.Cells.SpecialCells(xlCellTypeConstants, xlNumbers)
For Each C In Rg
A = A + 1
Feuil2.Range("B" & A).Value = C.Value
Next
With Feuil2.Sort
.SetRange Feuil2.Range("B2:B" & _
Feuil2.Range("B65536").End(xlUp).Row)
.Header = xlNo
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
End Sub
"Sunburn" <Sunburn@discussions.microsoft.com> a écrit dans le message de
news: 077FD388-958D-4F5E-B69C-5F7F1B3F8327@microsoft.com...
Bonjour,
je voudrais pouvoir lister les nombres contenus dans une plage.
j'ai mon onglet "feuil1", avec des nombres éparpillés sur la plage de [O8] à
[AM52], mais dans cette plage, il y a aussi des cellules de texte.
Je voudrais, avoir sur une meme colonne, en "feuil2" à partir de la case
[B2], tous mes nombres de "feuil1" comme précisé ci-avant, par ordre
croissant.
En effet, j'ai Excel 2003 - SP3. Et le "sort" correspond à quoi en fait ?
Merci. YANN
"michdenis" a écrit :
Si tu as une version autre qu'excel 2007, tu devras revoir le truc de "Sort". car cette façon de procéder est nouvelle et ne s'applique pas sur les versions antérieures.
Sub test() Dim Rg As Range, C As Range, A As Long A = 1 On Error Resume Next Set Rg = Feuil1.Cells.SpecialCells(xlCellTypeConstants, xlNumbers) For Each C In Rg A = A + 1 Feuil2.Range("B" & A).Value = C.Value Next With Feuil2.Sort .SetRange Feuil2.Range("B2:B" & _ Feuil2.Range("B65536").End(xlUp).Row) .Header = xlNo .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .Apply End With
End Sub
"Sunburn" a écrit dans le message de news: Bonjour, je voudrais pouvoir lister les nombres contenus dans une plage. j'ai mon onglet "feuil1", avec des nombres éparpillés sur la plage de [O8] à [AM52], mais dans cette plage, il y a aussi des cellules de texte. Je voudrais, avoir sur une meme colonne, en "feuil2" à partir de la case [B2], tous mes nombres de "feuil1" comme précisé ci-avant, par ordre croissant.
je vous remercie. YANN
michdenis
La méthode "Sort" de l'objet "Range" sert à trier tes données en ordre croissant ou décroissant.
la ligne de commande devrait ressembler à ceci sous excel 97 à 2003
With Feuil2 With .Range("B2:B" & .Range("B65536").End(xlUp).Row) .Sort key1:=1, order1:=xlAscending, Header:=vbNo End With End With
"Sunburn" a écrit dans le message de news: En effet, j'ai Excel 2003 - SP3. Et le "sort" correspond à quoi en fait ?
Merci. YANN
"michdenis" a écrit :
Si tu as une version autre qu'excel 2007, tu devras revoir le truc de "Sort". car cette façon de procéder est nouvelle et ne s'applique pas sur les versions antérieures.
Sub test() Dim Rg As Range, C As Range, A As Long A = 1 On Error Resume Next Set Rg = Feuil1.Cells.SpecialCells(xlCellTypeConstants, xlNumbers) For Each C In Rg A = A + 1 Feuil2.Range("B" & A).Value = C.Value Next With Feuil2.Sort .SetRange Feuil2.Range("B2:B" & _ Feuil2.Range("B65536").End(xlUp).Row) .Header = xlNo .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .Apply End With
End Sub
"Sunburn" a écrit dans le message de news: Bonjour, je voudrais pouvoir lister les nombres contenus dans une plage. j'ai mon onglet "feuil1", avec des nombres éparpillés sur la plage de [O8] à [AM52], mais dans cette plage, il y a aussi des cellules de texte. Je voudrais, avoir sur une meme colonne, en "feuil2" à partir de la case [B2], tous mes nombres de "feuil1" comme précisé ci-avant, par ordre croissant.
je vous remercie. YANN
La méthode "Sort" de l'objet "Range" sert à trier
tes données en ordre croissant ou décroissant.
la ligne de commande devrait ressembler à ceci
sous excel 97 à 2003
With Feuil2
With .Range("B2:B" & .Range("B65536").End(xlUp).Row)
.Sort key1:=1, order1:=xlAscending, Header:=vbNo
End With
End With
"Sunburn" <Sunburn@discussions.microsoft.com> a écrit dans le message de
news: AD608244-E25C-41C0-85B5-A78C981B85AC@microsoft.com...
En effet, j'ai Excel 2003 - SP3.
Et le "sort" correspond à quoi en fait ?
Merci.
YANN
"michdenis" a écrit :
Si tu as une version autre qu'excel 2007, tu devras revoir le truc
de "Sort". car cette façon de procéder est nouvelle et ne s'applique
pas sur les versions antérieures.
Sub test()
Dim Rg As Range, C As Range, A As Long
A = 1
On Error Resume Next
Set Rg = Feuil1.Cells.SpecialCells(xlCellTypeConstants, xlNumbers)
For Each C In Rg
A = A + 1
Feuil2.Range("B" & A).Value = C.Value
Next
With Feuil2.Sort
.SetRange Feuil2.Range("B2:B" & _
Feuil2.Range("B65536").End(xlUp).Row)
.Header = xlNo
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
End Sub
"Sunburn" <Sunburn@discussions.microsoft.com> a écrit dans le message de
news: 077FD388-958D-4F5E-B69C-5F7F1B3F8327@microsoft.com...
Bonjour,
je voudrais pouvoir lister les nombres contenus dans une plage.
j'ai mon onglet "feuil1", avec des nombres éparpillés sur la plage de [O8]
à
[AM52], mais dans cette plage, il y a aussi des cellules de texte.
Je voudrais, avoir sur une meme colonne, en "feuil2" à partir de la case
[B2], tous mes nombres de "feuil1" comme précisé ci-avant, par ordre
croissant.
La méthode "Sort" de l'objet "Range" sert à trier tes données en ordre croissant ou décroissant.
la ligne de commande devrait ressembler à ceci sous excel 97 à 2003
With Feuil2 With .Range("B2:B" & .Range("B65536").End(xlUp).Row) .Sort key1:=1, order1:=xlAscending, Header:=vbNo End With End With
"Sunburn" a écrit dans le message de news: En effet, j'ai Excel 2003 - SP3. Et le "sort" correspond à quoi en fait ?
Merci. YANN
"michdenis" a écrit :
Si tu as une version autre qu'excel 2007, tu devras revoir le truc de "Sort". car cette façon de procéder est nouvelle et ne s'applique pas sur les versions antérieures.
Sub test() Dim Rg As Range, C As Range, A As Long A = 1 On Error Resume Next Set Rg = Feuil1.Cells.SpecialCells(xlCellTypeConstants, xlNumbers) For Each C In Rg A = A + 1 Feuil2.Range("B" & A).Value = C.Value Next With Feuil2.Sort .SetRange Feuil2.Range("B2:B" & _ Feuil2.Range("B65536").End(xlUp).Row) .Header = xlNo .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .Apply End With
End Sub
"Sunburn" a écrit dans le message de news: Bonjour, je voudrais pouvoir lister les nombres contenus dans une plage. j'ai mon onglet "feuil1", avec des nombres éparpillés sur la plage de [O8] à [AM52], mais dans cette plage, il y a aussi des cellules de texte. Je voudrais, avoir sur une meme colonne, en "feuil2" à partir de la case [B2], tous mes nombres de "feuil1" comme précisé ci-avant, par ordre croissant.
