Astuce: Les autres langues sont Google-Traduction. Vous pouvez visiter le English version de ce lien.
Se connecter
x
or
x
x
S'enregistrer
x

or

Comment insérer une ligne vierge basée sur la valeur de cellule ci-dessus dans Excel?

Dans Excel, l'insertion de lignes vides est l'une des fonctions les plus couramment utilisées dans notre travail quotidien. Cependant, est-il possible d'insérer rapidement des lignes vierges en fonction de la valeur de cellule ci-dessus, comme illustré ci-dessous? Maintenant, cet article, parle de la méthode pour insérer rapidement une ligne vide basée sur les valeurs de cellules ci-dessus dans Excel.

doc insérer une ligne vide par le numéro ci-dessus 1 tir flèche droite doc insérer une ligne vide par le numéro ci-dessus 2

Insérer une ligne en fonction de la valeur ci-dessus


Insérer une ligne en fonction de la valeur ci-dessus


Si vous souhaitez insérer une ligne vide en fonction du numéro ci-dessus, vous pouvez utiliser un code de macro.

1. Activez la feuille que vous utilisez et appuyez sur Alt + F11 clés pour ouvrir Microsoft Visual Basic pour applications fenêtre.

2. Cliquez insérer > Module, et collez ci-dessous le code au script.

VBA: Insérer un code vide basé sur la cellule ci-dessus

Sub Insert () 'UpdatebyExtendoffice20170926 Dim xRg As Plage Dim xAddress As String Dim I, xNum, xLastRow, xFstRow, xCol, xCount Comme Longue suite à la reprise d'erreur Suivant xAddress = ActiveWindow.RangeSelection.Address Définir xRg = Application.InputBox ("Sélectionner une plage utiliser (une seule colonne): "," KuTools For Excel ", xAddress,,,,, 8) Si xRg est Nothing, puis quitter Sub Application.ScreenUpdating = False xLastRow = xRg (1) .End (xlDown) .Row xFstRow = xRg.Row xCol = xRg.Column xCount = xRg.Count Définir xRg = xRg (1) Pour I = xLastRow à xFstRow Étape -1 xNum = Cells (I, xCol) Si IsNumeric (xNum) et xNum> 0 puis Rows (I + 1) .Resize (xNum) .Insert xCount = xCount + xNum End Si Next xRg.Resize (xCount, 1) .Sélectionnez Application.ScreenUpdating = True End Sub

doc insérer une ligne vide par le numéro ci-dessus 3

3. presse F5 clé pour exécuter le code, et une boîte de dialogue apparaît pour vous rappeler de sélectionner une liste pour travailler. Voir la capture d'écran:
doc insérer une ligne vide par le numéro ci-dessus 4

4. Cliquez OK, les lignes vides ont été insérées.


Insérer des lignes vides et des colonnes(insérez plusieurs lignes / colonnes vierges à la fois, ou insérez des lignes / colonnes vides toutes les nièmes lignes / colonnes ...)

doc insert ligne vide


Outils de productivité recommandés

Office Tab

étoile d'or1 Apportez des onglets pratiques à Excel et à d'autres logiciels Office, tout comme Chrome, Firefox et Internet Explorer.

Kutools for Excel

étoile d'or1 Incroyable! Augmentez votre productivité dans les minutes 5. Ne nécessite pas de compétences particulières, économisez deux heures par jour!

étoile d'or1 300 Nouvelles fonctionnalités pour Excel, rendent Excel facile et puissant:

  • Fusionner des cellules / lignes / colonnes sans perdre de données.
  • Combiner et consolider plusieurs feuilles et classeurs.
  • Comparez les gammes, copiez plusieurs gammes, convertissez le texte en date, l'unité et la conversion de devise.
  • Compter par couleurs, sous-totaux de recherche, tri avancé et super filtre,
  • Plus Sélectionner / Insérer / Supprimer / Texte / Format / Lier / Commenter / Classeurs / Feuilles de calcul Outils ...

Capture d'écran de Kutools pour Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Natasha · 5 months ago
    Hi there, thank you so much for the post above, is there a way to run the code automatically without having to to press F5?
  • To post as a guest, your comment is unpublished.
    Rageesh · 7 months ago
    Thank you so munch, 1 st format working fine....