Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Boostez vos compétences Excel avec notre communauté !
Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force.
Apprenez, échangez, progressez – et tout ça gratuitement !
👉 Inscrivez-vous maintenant !
je cherche s'il est possible de numéroter 1,2,3 etc... une ligne X puis on remonte jusqu'à la première
En PJ un exemple pour mieux visualiser ce que j'exprime peut-être un peu mal
la ligne de départ;. il faut bien la définir, non??
qu'est ce qui fait qu'elle à la ligne 20 dans un cas, ou à 50 dans un autre??
autre solution (qui permet donc d'INCREMENTER en REMONTANT sur la feuille)
tu mets 1 sur la ligne de départ (ex en F30)
puis en F29 (la cellule juste au dessus) tu mets =F30+1
puis tu tires la formule vers le haut
si je comprend bien tu veux numéroter en DEcrémentant
deux façons
1) en A1 tu tapes 20
en A2, tu tapes 19
tu selectionnes A1:A2
tu places la souris sur le coint inférieur droit (le curseur devient une croix)
en maintenant le clic souris, tu descends (=tu tires) vers le bas jusqu'a la valeur finale que tu souhaites
2) en A1: tu tapes la première valeur souhaitée (ici 20)
en B1, tu écris la formule
=$A$1-LIGNE()+1
et tu tires la formule (clic maintenu sur le coin inférieur droit de la cellule B1
si je comprend bien tu veux numéroter en DEcrémentant
deux façons
1) en A1 tu tapes 20
en A2, tu tapes 19
tu selectionnes A1:A2
tu places la souris sur le coint inférieur droit (le curseur devient une croix)
en maintenant le clic souris, tu descends (=tu tires) vers le bas jusqu'a la valeur finale que tu souhaites
2) en A1: tu tapes la première valeur souhaitée (ici 20)
en B1, tu écris la formule
=$A$1-LIGNE()+1
et tu tires la formule (clic maintenu sur le coin inférieur droit de la cellule B1
merci vgendron (et je savais bien que je m'étais mal exprimé) - alors je RE-tente
oui c bien décrémenter (lol)
en revanche, je ne sais pas de quelle cellule je dois partir (là l'exemple c'était la ligne 20 mais parfois c plus bas)
pas sûre du coup qu'il y ait une solution ?!?
la ligne de départ;. il faut bien la définir, non??
qu'est ce qui fait qu'elle à la ligne 20 dans un cas, ou à 50 dans un autre??
autre solution (qui permet donc d'INCREMENTER en REMONTANT sur la feuille)
tu mets 1 sur la ligne de départ (ex en F30)
puis en F29 (la cellule juste au dessus) tu mets =F30+1
puis tu tires la formule vers le haut
je me permets de reprendre ton code modifé pour numéroter à partir de 1
@matoupitou
il te suffit de remplacer le code de Phil par celui ci
Sub Numero()
Application.ScreenUpdating = False
Dim Derlig&
Derlig = Worksheets("Feuil1").Range("B" & Rows.Count).End(xlUp).Row 'Controle sur colonne B
'Derlig = Worksheets("Feuil1").Range("A" & Rows.Count).End(xlUp).Row 'Controle sur colonne A
For i = 1 To Derlig
Range("A" & Derlig - i + 1).Value = i
Next i
End Sub
re
bonjour
si le numéro décrémenté correspond au numero de ligne mettre simplement "=ligne()" dans les cellules
et combien même il ne correspondrait pas on peu faire une soustraction avec un row limite de départ
cel peut etre fait par vba et converti en dur par la suite
alors il y a diverses façons de procéder
exemple 1
en utilisant comme je le dis plus haut la formule "=ligne()"et en convertissant en dur les valeurs
ce qui fait que le calculate est engagé pour ces cellules
VB:
Sub test()
Dim derlig
derlig = Worksheets("Feuil1").Range("B" & Rows.Count).End(xlUp).Row 'Controle sur colonne B
With Range("a1").Resize(derlig)
.Formula = "=row()"
.Value = .Value
End With
End Sub
maintenant exemple 2 sans passer par le calculate puisqu'on evalue un tableau avec evalaute par vba
VB:
Sub test2()
Dim derlig
derlig = Worksheets("Feuil1").Range("B" & Rows.Count).End(xlUp).Row 'Controle sur colonne B
With Range("a1").Resize(derlig)
.Value = Evaluate("row(1:" & derlig & ")")
End With
End Sub
et il y en a encore bien d'autre notamment (me semble t il )la fonction serie
- Navigue sans publicité - Accède à Cléa, notre assistante IA experte Excel... et pas que... - Profite de fonctionnalités exclusives Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel. Je deviens Supporter XLD