Premiere ligne vide entre .....

Re : Premiere ligne vide entre .....

bonjour

pour savoir si une ligne est vide

If Application.CountA(Rows(NoDeTaLig)) = 0 Then ' si ligne vide

Re : Premiere ligne vide entre .....

Bonjour,

vois avec ça:

l=[A18].End(xlDown).Row+1

A+

Smotty

PS je viens de modifier la lettre.

Ensuite tu peux tester avec:

if l>=31 then ...

A+

Re : Premiere ligne vide entre .....

Merci à tous les 2 , mais je n'arrive pas au resultat..... Je dévellope le parcours de mon code , l'utilisateur charge le prg les lignes 18 à 31 sont vierges. Puis il rentre des données dans chaque cellule de la ligne . A la fin je demande une sauvegarde la feuille est enregistrée sous un autre nom et le prg initial donc sauvegarde pour usage ultérieur , mais si l'utilisateur veut ajouter des données a sa feuille sauvegardee il me faut que la valeur initiale de ligne soit incrementée du nbre de ligne deja "occupées"; et la je coince même avec vos précieux conseils. Si vs aviez la gentillesse de me modifier en entier le p'tit bout de code envoyé ? cela serait sympa. Merci GDS35