Sujet Précédent Sujet Suivant

Remplissage auto

Résolu
bpierre35 -  
 bpierre35 -
Bonjour,

j'ai récupéré un tableau dans lequel j'ai des cellules vides.
Je souhaiterais les remplir automatiquement avec la valeur qui précède chaque cellule vide.
Merci pour votre aide
A voir également:

1 réponse

Réponse 1 / 1
lermite222 Messages postés 9042 Statut Contributeur 1 199
 
Bonjour,
Peut-être avec ces quelque lignes ?? 
Sub RemplirCelluleVide()
Dim Cel As Range
    For Each Cel In Range("A2:F20") 'adapter la plage
        If Cel = "" Then
            Cel = Cells(Cel.Row - 1, Cel.Column)
        End If
    Next Cel
End Sub

A+
0
bpierre35
 
merci beaucoup
0

Discussions similaires

remplissage automatique d'une case si une conditions est remplie
secutor08 -
via55 -

4 réponses
bouton sur clavier servant à colorier cellule
hoquangtri -
Raymond PENTIER -

7 réponses
Remplir une cellule (texte) en fonction d'une autre (texte).
SOMUM -
SOMUM -

4 réponses
Nettoyer sa Ps4
QuentinPsg97424 -
Reskape -

5 réponses
mettre de la couleur dans un tableau word
metiswallis -
SaphodesLandes -

17 réponses