Coordonnées cellule dernière vide

[tom_the_cat]

Bonjour à tous,

Il me manque un tout petit truc et après j'aurais finalisé mon projet:

je cherche à donner une coordonnée de la dernière cellule vide. J'ai cette formule en VBA:

 .Cells(VIDE, y) = TextBox1 & TextBox2

Quelles est la facon d'écrire "VIDE" dans ce cas la pour qu'il trouve en coordonnée x la première cellule vide qu'il trouve?

Merci beaucoup à tous

 

[Efgé]

Re : Coordonnées cellule dernière vide

Re
Je pense que la première cellule vide de la colonne est déja en ligne 8, donc x renvoi 65536. Pour éviter ceci il faut utiliser

 x = Cells(65535, y).End(xlUp).Row + 1

Cordialement

 

[tom_the_cat]

Re : Coordonnées cellule dernière vide

Non c'est pas ca non plus, la il monte jusqu'en haut et il fait +1 donc il se retrouve en ligne 2 quand il écrit les données.

C'est bizarre, que ce soit vers le haut ou vers le bas, il s'arrête pas aux données qu'il trouve. Je n'arrive pas à comprendre pourquoi.

 

[Efgé]

Re : Coordonnées cellule dernière vide

Re
met un exemple plus proche de la réalité, ce sera plus simple.
Cordialement

 

[tom_the_cat]

Re : Coordonnées cellule dernière vide

Ca y est c'est bon j'ai trouvé

C'est parce que dans l'exemple que j'avais donnée je n'avais qu'une seule feuille utilisée. L'erreur tenait a un seul tout petit point.

La solution est celle-ci:

y = ComboBox1.ListIndex + 2
x = .Cells(8, y).End(xlDown).Row + 1
.Cells(x, y) = TextBox1.Value & " " & TextBox2.Value

Quand je ne mettais pas le . devant Cells (8, y) alors il ne cherchait pas dans la bonne feuille.

C'est tout bon maintenant, merci beaucoup Efgé.