petit problème VBA

Bonjour, n'étant pas très fort en VBA et véritable casse tête pour moi je me tourne vers vous.Voici mon problème. J'ai une colonne de données qui se présente sous cette forme:

2.040
-
-
2.028
2.035
-
2.089
-
-
-
-
2.020
2.078
etc

et la macro ou la fonction devrait retourner ceci:
2.040
2.028
2.028
2.028
2.035
2.089
2.089
2.020
2.020
2.020
2.020
2.020
2.078

Ma plage de données est en AN15 -> jusque l'infini considérant que de nouvelles données sont constament importées.

Merci d'avance

Nicolas

Bonjour,

Une solution

Code:

---

1 2 3 4 5 6 7 8 9

Sub Test() Dim DerLig As Long With Worksheets("Feuil1")'Nom de feuille à adapter DerLig = .Range("AN" & .Rows.Count).End(xlUp).Row For i = DerLig To 16 Step -1 If .Range("AN" & i).Offset(-1, 0) = "-" Then .Range("AN" & i).Offset(-1, 0) = .Range("AN" & i) Next i End With End Sub

---

Cordialement.

Merci !!!:)