macro si sur une plage

flo2002

XLDnaute Impliqué
bonjour le forum!

je cherche à faire une macro qui dirai la chose suivante:
si une cellule de la colonne A n'est pas vide alors mettre la formule en B sur la meme ligne que la cellule concernée.

ce serai pour éviter à avoir à inserer des lignes ou faire glisser les cellules quand je veut ajouter une valeur en A.

Merci d'avance!
 

Blunet

XLDnaute Occasionnel
Salut flo, j'espère avoir bien compris ton problème.

Sub Remplir()
Dim i%
For i = 1 To 100
If Not IsEmpty(Cells(i, 1).Value) Then
Cells(i, 1).Select: Selection.Copy
Cells(i, 2).Select: Selection.PasteSpecial _
Paste:=xlPasteFormulas
End If
Next i
End Sub
 

Discussions similaires

Réponses
11
Affichages
214

Membres actuellement en ligne

Aucun membre en ligne actuellement.

Statistiques des forums

Discussions
312 370
Messages
2 087 693
Membres
103 641
dernier inscrit
anouarkecita2