Incrementer cellule avec repetition

R@chid

XLDnaute Barbatruc

Supporter XLD

• 1 Mai 2014

• #2

Re : Incrementer cellule avec repetition

Bonjour et Bienvenue sur XLD,
Si ta date initiale est en A5, alors en A6 :

Code:

=A$5+ENT((LIGNES($5:6)-1)/10)

@ tirer vers le bas



@ + +

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 1 Mai 2014

• #3

Re : Incrementer cellule avec repetition

Bonjour à tous______________EDITION: Bonjour R@chid 😉, j'aurai du te lire avant de faire du VBA inutile ici 😉


A défaut de fichier exemple fourni par le demandeur, j'ai testé ceci sur un classeur vierge
(avec une date en A1)
Vois ce que cela peu t'inspirer... ou pas.

Code:

Sub a()
Dim dl&, i&, plg As Range, ld&
Range("A5") = [A1]
Range("A5").AutoFill Destination:=Range("A5:A10"), Type:=xlFillSeries
dl = Range("A" & Rows.Count).End(xlUp).Row
    For i = dl To 6 Step -1
    If Cells(i, 1) <> Cells(i - 1, 1) Then
    Rows(i).Resize(9).Insert
    End If
Next i
ld = Range("A" & Rows.Count).End(xlUp).Row + 9
Set plg = Range(Cells(5, 1), Cells(ld, 1)).SpecialCells(xlCellTypeBlanks)
plg.FormulaR1C1 = "=R[-1]C"
    With Range("A5").CurrentRegion
    .Value = .Value
    End With
End Sub

 

Dernière édition: 1 Mai 2014

Vote positif 0 Vote négatif

N

nobru26

Guest

• 1 Mai 2014

• #4

Re : Incrementer cellule avec repetition

Ouaouwwww!!!

Vous êtes trop forts!
La solution de R@chid fonctionne, ça a l'air simple pour vous!

Je vais tester le VB, mais sérieux vous êtes forts!

Merci

 

Vote positif 0 Vote négatif

N

nobru26

Guest

• 1 Mai 2014

• #5

Re : Incrementer cellule avec repetition

Un petit plus?
Y'a t'il moyen de mettre les 9 cellules sauf la première de chaque série en texte blanc pour la "cacher"? dans le même style de formule?

Merci

 

Vote positif 0 Vote négatif

R@chid

XLDnaute Barbatruc

Supporter XLD

• 1 Mai 2014

• #6

Re : Incrementer cellule avec repetition

Re,
salut Staple1600
Voir PJ

@ + +

 

Pièces jointes

• nobru26.xlsx

  11.5 KB · Affichages: 42

Vote positif 0 Vote négatif

N

nobru26

Guest

• 1 Mai 2014

• #7

Re : Incrementer cellule avec repetition

le TOP!!!

Merci

 

Vote positif 0 Vote négatif