Macro pour copier une valeur

[IMRANE]

BONJOUR
SVP il y a quelqu un qui peut m aider a resoudre mon probleme
j ai une colonne tres long et j ai un vide dedans que je veux remplir par la valeur de la cellule en dessus
pour bien expliquer mon cas j ai mis un fichier joint

 

[camarchepas]

Re : Macro pour copier une valeur

Bonjour ,

Un petit code à mettre dans un module standard .

Sub Complete()
Dim FinLigne As Long, Encours As Long

Application.ScreenUpdating = False
FinLigne = Range("A" & Rows.Count).End(xlUp).Row
For Encours = 1 To FinLigne
If Range("A" & Encours) = "" Then Range("A" & Encours) = Range("A" & Encours - 1)
Next Encours
Application.ScreenUpdating = True
End Sub

 

[IMRANE]

Re : Macro pour copier une valeur

BONJOUR LE FORUM , camarchepas

Merci votre code fonctionne parfaitement

 

[IMRANE]

Re : Macro pour copier une valeur

BONJOUR LE FORUM camarchepas
svp j ai besoin de votre aide
j ai mis un fichier joint pour expliquer mon exemple

 

[camarchepas]

Re : Macro pour copier une valeur

Bonjour Imrane,

Le sujet n'étant pas du tout le même

Ouvres un autre sujet par exemple :

Recherche d'une occurence dans une base de données .