https://www.pcastuces.com/pratique/astuces/4272.htm

Insérer un nombre précis de lignes - Excel


Si vous souhaitez insérer plusieurs lignes dans une feuille de calculs, Excel ne vous permet pas de choisir le nombre de lignes à ajouter. La solution est alors de répéter plusieurs fois l'ajout simple de lignes jusqu'au nombre désiré ou bien de sélectionner parmi les lignes existantes le nombre de lignes à insérer puis d'utiliser la fonction d'insertion. Si vous avez beaucoup de lignes à insérer, le plus simple est de passer par une macro.
  1. Dans l'onglet Affichage du ruban, cliquez sur le bouton Macros.


  2. Donnez un nom à la macro, AjouterLignes par exemple et cliquez sur Créer.


  3. Dans la fenêtre qui s'ouvre, entre les lignes Sub AjouterLignes() et End Sub, recopiez le code suivant.

    Dim CurrentSheet As Object
    For Each CurrentSheet In ActiveWindow.SelectedSheets
    CurrentSheet.Range("a10:a25").EntireRow.Insert
    Next CurrentSheet

  4. Ce code va insérer 15 lignes à partir de la ligne A10 (donc jusqu'à la ligne A25). A vous de personnaliser le code suivant vos besoins en remplaçant A10 par les coordonnées de la ligne de départ de l'insertion et A25 par celles de la fin de l'insertion. Fermez la fenêtre des macros.

  5. Désormais, pour insérer des cellules, cliquez sur l'icône Macros de l'onglet Affichage.


  6. Si vous avez besoin de modifier les coordonnées de l'insertion, sélectionnez la macro AjouterLignes et cliquez sur Modifier.


  7. Pour lancer la macro et insérer les lignes paramétrées, cliquez sur Exécuter. Les lignes sont automatiquement insérées dans la feuille active.





Copyright © PC Astuces. Tous Droits Réservés
Source : https://www.pcastuces.com/pratique/astuces/4272.htm