Remplissage conditionnel des cellules

[Ptreesong]

Bonjour,
Voila mon problème :
J'ai un tableau excel avec une liste de date en colonne ( il y a seulement l'année) et certaine cellules vides. Je souhaite remplir les cellules vides par la date qui se trouve dans la premier cellule remplie au dessus.
Je pense à un truc du style : si la cellule est vide alors la cellule à la même valeur que la cellule n-1.
Pour corser le problème j'ai quelques fois deux voir trois cellule vide de suite !
Merci de vos réponse car je suis assez nul dans la rédaction des ordres excel.
Ptreesong

 

[excalibur]

Re : Remplissage conditionnel des cellules

bonjour Ptreesong suppose colonne a

Sub Macro1()
Dim v As Variant, c As Range
For Each c In Range("a1", [a65000].End(xlUp))
If c = "" Then c = v Else: v = c
Next
End Sub

 

[Claudy]

Re : Remplissage conditionnel des cellules

Bonjour, va falloir passer par une macro:

Sub remplirsivide()
For Each cell In Range("A1:A50")
If cell = 0 Then
cell.Value = cell.Offset(-1, 0).Value
End If

Next

End Sub

a adapter à tes besoins....

 

[eriiic]

Re : Remplissage conditionnel des cellules

Bonjour,

ou bien par formule :
- insérer une colonne vide à droite des dates (date en A par exemple).
- en B2: =SI(A2="";B1;A2) à recopier vers le bas.
- copier colonne B
- collage spécial valeur en colonne A
- supprimer colonne B

eric