Comment insérer plusieurs lignes vides dans Excel

La création d'une macro dans Microsoft Excel offre aux utilisateurs la possibilité d'automatiser des tâches répétitives et prévisibles dans le programme, ce qui leur permet souvent de gagner du temps.

Insérer des lignes vides entre les entrées de données

Si vous souhaitez créer une macro qui insère deux lignes vides dans une feuille de calcul existante toutes les 2 entrées, il existe une macro disponible qui peut vous aider à le faire. Le résultat final devrait ressembler à ceci:

Mise en page par défaut:

 Titre1
Titre2
Titre3
Titre4 

Après la macro:

 Titre1
Titre2
Titre3
Titre4 

Insertion de plusieurs lignes vides entre des données existantes

En utilisant la macro suivante, vous obtiendrez le résultat illustré ci-dessus:

 Sous test ()
Dim j As Long, r As Range
j = InputBox ("tapez le nombre de lignes à insérer")
Définir r = Plage ("A2")
Faire
Range (r.Offset (1, 0), r.Offset (j, 0)). EntireRow.Insert
Définir r = Cells (r.Row + j + 1, 1)
'MsgBox r.Address (l'apostrophe au début de cette ligne rend cette ligne inutilisable)
Si r.Offset (1, 0) = "" puis quittez Exit
Boucle
End Sub