Discussion :

[Nico451]

Bonjour,

J'ai un souci, je ne comprend pas pourquoi avec cette ligne de commande de temps en temps mon infirmation se mets bien en juste après la dernière ligne écrite et de temps en temps beaucoup plus bas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Num = Range("A" & Rows.Count).End(xlUp).Row
 
Worksheets(ComboBox1.Value).Range("A" & Num) = Info1

J'utilise le "Num" pour remplir ma ligne avec mes autres info

Merci de vos lumière.

[Menhir]

de temps en temps mon infirmation se mets bien en juste après la dernière ligne écrite et de temps en temps beaucoup plus bas

Si ça vient du code, c'est peut-être parce que tu n'indiques pas dans quelle Worksheet rechercher la ligne vide.
Essaye ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Num = Worksheets(ComboBox1.Value).Range("A" & Rows.Count).End(xlUp).Row
Worksheets(ComboBox1.Value).Range("A" & Num) = Info1

Ou mieux :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Worksheets(ComboBox1.Value).Range("A" & Rows.Count).End(xlUp) = Info1

Si ça ne suffit pas, c'est sans doute parce que la cellule juste au dessus de celle où s'écrit l'information n'est pas vide.
Une cellule peut paraitre vide visuellement mais ne pas vraiment l'être. Par exemple, si elle contient un espace, une tabulation, une formule qui renvoie "", etc.

[Nico451]

Merci j'ai juste utilisé la première ligne et ça fonctionne en rajoutant +1 sinon à chaque fois j'écrit sur la même ligne