Insérer une ligne dans Excel

Question

Bonjour,
J'aurais une question qui pourrait vous sembler relativement simple. 
Voilà, je voudrais insérer une ligne dans un fichier excel, sachant que la ligne insérée devra se placer à la suite et non pas s'insérer entre 2 lignes.
Je vous explique, à chaque fois que j'appuie sur un bouton "ajout", je voudrais ajouter une ligne, si je l'appuie 2 fois, 2 lignes, mais la 3ème fois, je voudrais que la ligne se mette automatiquement en dessous et pas entre 2 autres lignes existantes.

Je vous remercie d'avance du coup de pouce.

Mike-31 · Answer

Salut,

copies ce code dans un module, la cellule démarre en A150 pour rechercher la première cellule non vide et insére une ligne au dessous

Sub Ajout_Ligne()
    Range("A150").End(xlUp).Offset(1, 0).Select
    Selection.EntireRow.Insert
End Sub

A+

Insérer une ligne dans Excel

1 réponse

Discussions similaires

Newsletters