Inserer une ligne vide

Bonjour à tous,

J'ai trouvé plein de codes pour insérer une ligne vide après chaque enregistrement

Mais je voudrai un code qui me permet d’insérer une ligne vide avant d'enregistrer la ligne sachant que je range mes données comme dans le fichier joint.

Je voudrai une saisie même de plusieurs lignes quand je donne un nouveau n° il me laisse une ligne vide comme démonté dans le fichier

exp la ligne 7est vide

Si quelqu'un pourrait m'orienter se serait gentil de sa part

Amicalement

Noel

Bonjour,

insère cette ligne de code modifiée pour décaler les entrées vers le bas

Private Sub CommandButton1_Click()
Range("D65000").End(xlUp).Offset(1, 0).Select
        Range("E65536").End(xlUp).Offset(2, 0).Select   'se place 2ème ligne sous la dernière ligne vide

Amicalement

Pierrot

Bonjour Pierre,

Merci pour ton aide, mais je souhaiterai que le TextBox1 qui se trouve sous le label N°, tant que ce n° de change pas il ne saute plus de ligne, par contre quand le N) Change il saute la ligne.

J'ai essayé par plusieurs moyens je ne suis pas arrivé.

Pourras-tu voir cela pour moi. Car actuellement il saute de ligne à chaque fois je clique sur le Bouton.

Merci d'avance

Amicalement

Noel

Je suis désolé, ton problème dépasse mes compétences.

Amicalement

Pierrot

Bonjour Pierre,

C'est pas grave.

Merci de ton dévouement

@+