Comment masquer plusieurs lignes ou colonnes vides dans Excel à la fois dans Excel?
Masquer ou supprimer les lignes ou colonnes vides peut vous aider à condenser la feuille de calcul.Dans cet article, je vais vous présenter quelques moyens rapides de masquer ou de supprimer les lignes ou colonnes vides dans la feuille de calcul Excel.
Masquer rapidement plusieurs lignes ou colonnes vides avec le code VBA
Supprimez rapidement plusieurs lignes ou colonnes vides avec Kutools for Excel
Masquer rapidement plusieurs lignes ou colonnes vides avec le code VBA
Le code VBA suivant peut vous aider à masquer rapidement et facilement plusieurs lignes ou colonnes vides dans une feuille de calcul.
1. Maintenez le ALT + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.
2. Cliquez insérer > Moduleet collez le code suivant dans le Module Fenêtre.
Code VBA: Masquer plusieurs lignes vides dans une feuille de calcul
Sub HideEmpties()
'Updateby Extendoffice
Dim xRg As Range
Dim xTxt As String
Dim xCell As Range
Dim I As Long
On Error Resume Next
If ActiveWindow.RangeSelection.Count > 1 Then
xTxt = ActiveWindow.RangeSelection.AddressLocal
Else
xTxt = ActiveSheet.UsedRange.AddressLocal
End If
Set xRg = Application.InputBox("Please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
On Error Resume Next
For I = 1 To xRg.Row + xRg.Rows.Count
If Application.WorksheetFunction.CountA(xRg.Rows(I)) = 0 Then
xRg.Rows(I).EntireRow.Hidden = True
End If
Next
End Sub
3. Puis appuyez F5 clé pour exécuter ce code, et une boîte de dialogue s'affiche pour vous rappeler de sélectionner la plage de données que vous souhaitez masquer les lignes vides, voir capture d'écran:
4. Et puis cliquez OK bouton, les lignes vides sont masquées à la fois, voir capture d'écran:
Notes: Pour masquer plusieurs colonnes vides, veuillez appliquer le code VBA suivant:
Code VBA: masquer plusieurs colonnes vides dans une feuille de calcul
Sub HideEmpties()
'Updateby Extendoffice
Dim xRg As Range
Dim xTxt As String
Dim xCell As Range
Dim I As Long
On Error Resume Next
If ActiveWindow.RangeSelection.Count > 1 Then
xTxt = ActiveWindow.RangeSelection.AddressLocal
Else
xTxt = ActiveSheet.UsedRange.AddressLocal
End If
Set xRg = Application.InputBox("Please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
On Error Resume Next
For I = 1 To xRg.Column + xRg.Columns.Count
If Application.WorksheetFunction.CountA(xRg.Columns(I)) = 0 Then
xRg.Columns(I).EntireColumn.Hidden = True
End If
Next
End Sub
Supprimez rapidement plusieurs lignes ou colonnes vides avec Kutools for Excel
Cette section, je vais parler de la façon de supprimer plusieurs lignes ou colonnes vides que vous n'avez pas voulu dans une plage, une feuille de calcul ou un classeur. le Kutools for Excel's Supprimer les lignes et colonnes masquées (visibles) L'utilitaire peut vous aider à résoudre cette tâche le plus rapidement possible.
Kutools for Excel : avec plus de 300 compléments Excel pratiques, essai gratuit sans limitation en 30 jours. |
Après l'installation de Kutools for Excel, procédez comme suit:
1. Sélectionnez la plage de données dans laquelle vous souhaitez supprimer les lignes ou colonnes vides, puis cliquez sur Kutools > Supprimer > Supprimer les lignes et colonnes masquées (visibles), voir capture d'écran:
2. Dans le Supprimer les lignes et colonnes masquées (visibles) boîte de dialogue, sélectionnez Dans la plage sélectionnée in Regarder dans liste déroulante (vous pouvez également choisir une autre option dans cette liste déroulante selon vos besoins), sélectionnez rangées or Colonnes du Supprimer le type section, et choisir Lignes vides or Colonnes vierges sous le Type détaillé section, voir capture d'écran:
3. Et puis cliquez Ok , les lignes ou colonnes vides de la sélection ont été supprimées d'un seul coup. Voir la capture d'écran:
Notes: Avec cette fonctionnalité, vous pouvez également supprimer les lignes ou colonnes cachées, les lignes ou colonnes visibles dans la sélection, la feuille de calcul ou le classeur selon vos besoins.
Cliquez sur Télécharger gratuitement Kutools pour Excel maintenant !
Meilleurs outils de productivité bureautique
Améliorez vos compétences Excel avec Kutools for Excel et faites l'expérience d'une efficacité comme jamais auparavant. Kutools for Excel offre plus de 300 fonctionnalités avancées pour augmenter la productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office et facilite grandement votre travail
- Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!