Incrementer cellule avec repetition

[nobru26]

Bonjour à tous!

Après moultes recherches je trouve pas solution a mon problème qui doit se trouver avec INDIRECT ou DECALER:

Je cherche à incrémenter par rapport à une cellule de départ exp A1 (01/01/2014)
les cellules A5 à AX par pas de 10 avec copie de 10

exp:

A5 01/01/2014
A6 01/01/2014
A7 01/01/2014
etc
A14 01/01/2014
A15 02/01/2014
A16 02/01/2014
etc...
A24 02/01/2014
A25 03/01/2014
etc....

Je souhaite faire un tableau d'occurrences par jours sur un appareillage, où il peut y avoir plusieurs évènements pas jour pour pouvoir filtrer par la suite.

Merci pour vos éclairage.
NoBru26

 

[R@chid]

Re : Incrementer cellule avec repetition

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

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

@ tirer vers le bas



@ + +

 

[Staple1600]

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.

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

 

[nobru26]

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

 

[nobru26]

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

 

[R@chid]

Re : Incrementer cellule avec repetition

Re,
salut Staple1600
Voir PJ

@ + +

 

[nobru26]

Re : Incrementer cellule avec repetition

le TOP!!!

Merci