OVH Cloud OVH Cloud

Macro qui copy quand une cellule est vide ?

2 réponses
Avatar
TroXsA
Bonjour a tous

Je recherche a faire une macro qui copy la premiere cellule pleinne dans les
cellule vide suivante
Exemple :
Dans la Colonne C
-- A B C
1 ----- ab
2 -----
3 -----
4 -----
5 -----cd
6 -----
7 -----
8 -----
9 -----ef
10 ----

Ce qui donnerais comme resultat

-- A B C
1 ----- ab
2 ----- ab
3 ----- ab
4 ----- ab
5 -----cd
6 ----- cd
7 ----- cd
8 ----- cd
9 -----ef
10 ----ef
11-----ef

ext ext ....

J'ai pas trop de compétance dans VBA si quelle un aurais une solution ça
serait cool :)
Merci a tous !

2 réponses

Avatar
JB
Bonjour,

[C1:C100].SpecialCells(xlCellTypeBlanks).FormulaR1C1 = "=R[-1]C"
[C1:C100].Value = [C1:C100].Value

Cordialement JB



Bonjour a tous

Je recherche a faire une macro qui copy la premiere cellule pleinne dans les
cellule vide suivante
Exemple :
Dans la Colonne C
-- A B C
1 ----- ab
2 -----
3 -----
4 -----
5 -----cd
6 -----
7 -----
8 -----
9 -----ef
10 ----

Ce qui donnerais comme resultat

-- A B C
1 ----- ab
2 ----- ab
3 ----- ab
4 ----- ab
5 -----cd
6 ----- cd
7 ----- cd
8 ----- cd
9 -----ef
10 ----ef
11-----ef

ext ext ....

J'ai pas trop de compétance dans VBA si quelle un aurais une solution ça
serait cool :)
Merci a tous !


Avatar
TroXsA
Merci beaucoup ! :)
je vais tester ça toute suite

Merci encore :)

"JB" a écrit dans le message de news:

Bonjour,

[C1:C100].SpecialCells(xlCellTypeBlanks).FormulaR1C1 = "=R[-1]C"
[C1:C100].Value = [C1:C100].Value

Cordialement JB



Bonjour a tous

Je recherche a faire une macro qui copy la premiere cellule pleinne dans
les
cellule vide suivante
Exemple :
Dans la Colonne C
-- A B C
1 ----- ab
2 -----
3 -----
4 -----
5 -----cd
6 -----
7 -----
8 -----
9 -----ef
10 ----

Ce qui donnerais comme resultat

-- A B C
1 ----- ab
2 ----- ab
3 ----- ab
4 ----- ab
5 -----cd
6 ----- cd
7 ----- cd
8 ----- cd
9 -----ef
10 ----ef
11-----ef

ext ext ....

J'ai pas trop de compétance dans VBA si quelle un aurais une solution ça
serait cool :)
Merci a tous !