Remplacement valeur cellule sous condition

[anugal]

Bonjour

Débutant en VBA, je cherche une macro qui remplace la valeur d'une cellule enfonction de la valeur d'une autre

Exemple dans la colonne A

TUTU
0
0
0
0
TITI
0
0
TOTO
0
Je veux remplacer les 0 par la valeur TUTU entre TUTU et TITI, puis remplacer les 0 entre TITI et TOTO par la valeur TITI, etc....
En espérant avoir été clair
Merci pour votre aide

 

[youky(BJ)]

Re : Remplacement valeur cellule sous condition

Salut et bienvenu sur le forum,
Anugal voici une macro.
Bruno

For Each c In Range("A1", [A65000].End(xlUp))
If c.Value = 0 Then
c.Value = tx
Else
tx = c.Value
End If
Next

 

[JBARBE]

Re : Remplacement valeur cellule sous condition

Bonjour,

Peut-être avec ceci !

A+

 

[anugal]

Re : Remplacement valeur cellule sous condition

Bonjour

Merci beaucoup à tous les 2

Les 2 macros fonctionnent à merveille

Pour un premier post je ne suis vraiment pas déçu par l'entraide (rapide et efficace !)