Macro pour remplir les cellules après cop/coll TCD

bloublou à dit:

Bonjour,

Etant pas très fort en VBA : :'(

Je voudrais faire une Macro qui lorsque l'on copie n'importe quel TCD recopie les espaces vides :

Les cellulles de A3 à A25 doivent être égales à A2
La Cellule B3 = B2

Idem pour toutes les colonnes 🙂


Mais surtout qu'elle soit adaptable sur tout type de longueeu de Tableau 😛 Est-ce que c'est possible ?

Je vous ai mis un petit fichier pour mieux comprendre

Merci de votre aide 🙂 🙂 🙂

Cliquez pour agrandir...

Pierrot93 à dit:

Bonjour bloublou

peut être une piste avec le code ci-dessous, mais ton exemple ne me parait pas réaliste, vois pas trop comment tu peux générer un TCD avec des lignes complètement vide...

Code:

Range("A1").CurrentRegion.SpecialCells(xlCellTypeBlanks).FormulaR1C1 = "=R[-1]C"

A noter, ce code ne s'appliquera jamais directement sur un tcd, mais uniquement sur la copie des valeurs / formats...

bonne journée
@+

Cliquez pour agrandir...