Recopié une cellule dans colonne si

[Bren]

Salut,

alors voilà une colonne :

pc
vide
vide
vide
vide
ecran
vide
vide
vide
vide
log

Je veux que pc se recopie jusqu'à ecran puis ecran jusqu'a log ainsi de suite pour donner ça :

pc
pc
pc
pc
ecran
ecran
ecran
ecran
log
log
...

c'est une boucle tant que la cellule est vide recopié la cellule du dessus, non ?

ça ce traduit comment croncretement en vb ???

merci

 

[Léa]

Bonsoir,

Voila un bout de code qui devrait te satisfaire
Attention j'ai arrêté ma boucle à 20, donc si dans ta colonne tu as plus de 20 cellules concernées, change ce paramètre

Dim I As Integer
Dim texte As String

For I = 1 To 20
texte = Range('A' & I).Value
If Range('A' & I + 1).Value = '' Then
Range('A' & I + 1).Value = texte
End If
Next I

Bon courage

Léa

 

[Bren]

Merci beaucoup
ça marche !!!

je vais essayer de comprendre le code maintenant 😉