2 méthodes simples pour sélectionner toutes les cellules non vides dans une feuille de calcul Excel

Dans une feuille de calcul Excel, si des données sont saisies dans des cellules non adjacentes, sélectionner et copier les données des cellules non vides peut s'avérer fastidieux. Cet article présente deux méthodes pour sélectionner rapidement toutes les cellules non vides.

Les utilisateurs d'Excel doivent fréquemment copier et coller des données. Cependant, parfois, il peut y avoir des problèmes. Par exemple, il existe plusieurs cellules vides discontinues dans une feuille de calcul Excel. Dans ce cas, il est un peu difficile de sélectionner toutes les cellules qui ont du contenu. Mais ne vous inquiétez pas. Ici, nous allons vous partager 2 approches pour sélectionner toutes les cellules non vides dans une feuille Excel.

Méthode 1: Sélectionnez via "Aller à spécial"

1. Au départ, ouvrez la feuille de calcul Excel.
2. Ensuite, appuyez sur "F5" pour déclencher la boîte de dialogue "Aller à".
3. Dans la boîte de dialogue "Aller à", cliquez sur le bouton "Spécial".
4. Ensuite, cochez l'option "Constantes", puis les options "Nombres", "Texte", "Logiques" et "Erreurs".
5. Enfin, cliquez sur «OK».
6. Lorsque la boîte de dialogue se ferme, comme vous le voyez, toutes les cellules non vides ont été sélectionnées.

Méthode 2 : Sélectionner avec Excel VBA

1. Tout d'abord, accédez à l'éditeur Excel VBA en faisant référence à "Comment exécuter le code VBA dans votre Excel" .
2. Ensuite, placez le code suivant dans un module inutilisé.

Sub SelectAllNonBlankCells()
    Dim objUsedRange As Range
    Dim objRange As Range
    Dim objNonblankRange As Range

    Set objUsedRange = Application.ActiveSheet.UsedRange

    For Each objRange In objUsedRange
        If Not (objRange.Value = "") Then
           If objNonblankRange Is Nothing Then
              Set objNonblankRange = objRange
           Else
              Set objNonblankRange = Application.Union(objNonblankRange, objRange)
           End If
        End If
    Next

    If Not (objNonblankRange Is Nothing) Then
       objNonblankRange.Select
    End If
End Sub

3. Après cela, quittez l'éditeur VBA et ajoutez cette macro à la barre d'outils d'accès rapide.
4. Maintenant, ouvrez la feuille de calcul souhaitée et cliquez sur le bouton macro.
5. À la fois, toutes les cellules non vides seront sélectionnées, comme indiqué dans l'image suivante.

Comparaison

Réparer les problèmes Excel ennuyeux

Le fichier Excel est sujet aux erreurs et à la corruption. Par exemple, si MS Excel est souvent mal fermé, le fichier peut être facilement endommagé. Par conséquent, les utilisateurs doivent prendre certaines précautions, notamment en sauvegardant les fichiers de manière périodique. De plus, un outil compétent, robuste et fiable correction xlsx outil, comme DataNumen Excel Repair, est une question de nécessité.

Introduction de l'auteur:

Shirley Zhang est une experte en récupération de données dans DataNumen, Inc., qui est le leader mondial des technologies de récupération de données, y compris SQL Server récupération et produits logiciels de réparation Outlook. Pour plus d'informations, visitez www.datanumen.com