JulienB
XLDnaute Junior
Bonjour le forum,
J'ai fais (tout seul comme un grand) ce bout de code :
Explication :
Je recherche dans la colonne A les cellules vides comprise entre deux "Titre" et j'y colle a la valeur du titre le plus haut. (ca c'est la théorie)
Le soucis c'est qu'il commence avec le dernier titre de la colonne et remonte.... et donc y colle la valeur du Titre du dessous ...
j'imagine qu'il y a un truc avec le " ".End(xlUp).Row" mais x1down commence à la 65536 eme ligne.
comment faire ?
Merci le forum !
J'ai fais (tout seul comme un grand) ce bout de code :
Code:
Dim titre As String
Dim i As Long
Sheets("Processus1").Activate
i = Range("A65536").End(xlUp).Row
titre = Cells(i, 1).Value
For i = Range("A65536").End(xlUp).Row To 0 Step -1
If IsEmpty(Cells(i, 1).Value) Then Cells(i, 1).Value = titre
Next i
Explication :
Je recherche dans la colonne A les cellules vides comprise entre deux "Titre" et j'y colle a la valeur du titre le plus haut. (ca c'est la théorie)
Le soucis c'est qu'il commence avec le dernier titre de la colonne et remonte.... et donc y colle la valeur du Titre du dessous ...
j'imagine qu'il y a un truc avec le " ".End(xlUp).Row" mais x1down commence à la 65536 eme ligne.
comment faire ?
Merci le forum !