Remplissage Automatique de cellules d'une colonne

[jipi06]

Bonsoir à toutes et tous

J'ai un tableau de 2 colonnes qui est importé et qui peut varier en nb de lignes.

j'ai besoin de remplir les cellules vides de la colonne A automatiquement (macro) a chaque changement de valeur de cette même colonne.

Les valeurs de la colonne B sont toujours remplies

extrait...c'est plus clair sur le fichier attaché

Situation de départ Résultat attendu
Equip Indicateurs Equip Indicateurs
A 2010-07 A 2010-07
2010-08 A 2010-08
2010-09 A 2010-09
2010-10 A 2010-10
2010-11 A 2010-11
2010-12 A 2010-12
B 2010-07 B 2010-07
2010-08 B 2010-08


Merci beaucoup de votre aide


Jipi

 

[Staple1600]

Re : Remplissage Automatique de cellules d'une colonne

Bonsoir

Une possibilité de solution

Sub a()
Dim r As Range
Set r = [A2].Resize([B6556].End(xlUp).Row - 1)
r.SpecialCells(xlCellTypeBlanks).FormulaR1C1 = "=R[-1]C"
    With r
        .Value = .Value
    End With
End Sub

 

[jipi06]

Re : Remplissage Automatique de cellules d'une colonne

Bonjour
désolé pour le retard

Ca fonctionne impecable

Merci JM de ton aide

A la prochaine