Lorsque je fais copier collage spécial valeur, la cellule est vide
Or lorsque je fais un tri sur mon fichier ces cellules ne sont pas considérées comme vide puisque lorsque j'utilise la formule : Range("l65536").End(xlUp).Offset(1, 0).Select la première cellule considérée comme vide est en dessous des cellules pour lesquelles j'ai fait un copier collage valeur
En colonne A et B c'est mon fichier de départ avec une formule dans les cellules vides de la colonne B (formule de test)
En colonne F et G j'ai refait la même chose puis ai fait un copier collage spécial dans les cellules vides pour supprimer les formules
si je clic dans la zone bleue pour lancer la macro qui va rechercher la 1ere cellule vide de la colonne G, la cellule sélectionnée est en G11 au lieu de G6
normal car le code de la « zone bleue » n'est pas bon !
Il cherche la cellule en dessous de la dernière cellule utilisée de la colonne …
Pour sélectionner la cellule en dessous de la dernière valeur de la colonne :
VB:
Sub Demo()
Feuil1.UsedRange.Columns(7).Find("*", , , , , xlPrevious).Offset(1).Select
End Sub
_______________________________________________________________________________
Merci de cliquer sur J'aime ce post en bas à gauche de chaque message ayant aidé …
_______________________________________________________________________________ Je suis Paris, Charlie, Bruxelles, …