incrémentation particuliere de série

  • Initiateur de la discussion Initiateur de la discussion Hervé
  • Date de début Date de début

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 !

Hervé

XLDnaute Barbatruc
Bonjour tout le monde


Je cherche une formule me permettant d'incrementer une série de chiffre d'une maniere particuliere.

en départ j'ai : 0101

je cherche à créer une série par formule pour avoir ceci :

0101
0101
0102
0102
0103
0103
...

exemple du résultat attendu en piece jointe

merci pour votre aide.

salut [file name=hervedemande.zip size=1794]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/hervedemande.zip[/file]
 

Pièces jointes

Salut
en admettant que ce soit des nombres, que tu ais :
A1 : 0101
A2 : 0101
A3 : 0102
tu écris la formule suivante en A4 :
=SI(A1=A2;A3;A3+1)
et tu fais de la recopie sur le reste de ta série
A+

Message édité par: Gorfael, à: 14/06/2006 14:36
 
re

une autre proposiiton en vba par function, ne fonctionne qu'a partir de la ligne 3.


Public Function incremente()
Dim c As Range

Application.Volatile
Set c = Application.Caller

If c.Row < 3 Then Exit Function

If Not c.Offset(-1, 0) = c.Offset(-2, 0) Then
        incremente = c.Offset(-1, 0)
Else
       
If c.Offset(-1, 0) Mod 10 = 0 Then
                incremente = c.Offset(-1, 0) + 91
       
Else
                incremente = c.Offset(-1, 0) + 1
       
End If
End If

End Function

salut
 
Bonjour les joyeux lurons 🙂

Une autre formule, plus longue que celle d'Ândré :

=(ENT((LIGNE()-1)/20)+1)*100+MOD(ENT((LIGNE()-1)/2);10)+1

en partant de la 1ère ligne. Si tu commences à une ligne différente de 1, il te suffit d'adapter la formule comme suit :

=(ENT((LIGNE()-LIGNE(CelluleDébut))/20)+1)*100+MOD(ENT((LIGNE()-LIGNE(CelluleDébut))/2);10)+1

C'était juste pour mettre mon grain de sel 😛

A+ les amis 😉
 
- 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

Discussions similaires

P
Réponses
1
Affichages
1 K
Pierrot93
P
B
  • Question Question
Réponses
1
Affichages
1 K
B
  • Question Question
Réponses
1
Affichages
1 K
M
Réponses
4
Affichages
1 K
Gérard DEZAMIS
G
Y
Réponses
3
Affichages
3 K
M
  • Question Question
Réponses
2
Affichages
1 K
Réponses
1
Affichages
2 K
A
L
Réponses
7
Affichages
952
B
  • Question Question
Réponses
4
Affichages
2 K
brunonkc
B
Y
Réponses
6
Affichages
2 K
D
  • Question Question
Réponses
6
Affichages
1 K
P
Réponses
1
Affichages
1 K
J
N
Réponses
16
Affichages
2 K
N
F
Réponses
1
Affichages
840
Denis
D
Retour