Comment sélectionner toutes les cellules avec des données dans Excel?
Lorsque les données restent dans des cellules discontinues, comment sélectionner et copier les données? Cela vous fera perdre beaucoup de temps pour sélectionner toutes les cellules discontinues avec des données une par une, en particulier les données restent dans un ordre presque aléatoire. La manière délicate suivante vous aidera à sélectionner rapidement des cellules d'appel avec des données dans les sélections.
Sélectionnez toutes les cellules avec des données, y compris des formules avec code VBA
Sélectionnez toutes les cellules contenant des données à l'exclusion des formules avec la commande Aller à spécial
S'il n'y a pas de données calculées avec la formule, le Aller à Spécial La commande peut vous aider à sélectionner facilement toutes les cellules contenant des données dans les sélections.
Étape 1: Sélectionnez la plage avec laquelle vous travaillerez, puis appuyez sur F5 clé pour ouvrir le Aller à boite de dialogue.
Étape 2: Clique le # bouton pour entrer Aller à Spécial boite de dialogue. Vérifiez ensuite le Constants option, voir capture d'écran:
Étape 3: Cliquez OK, alors vous verrez toutes les cellules dont le contenu exclut les cellules de formule sont sélectionnées.
Remarque: De cette façon, il n'est pas possible de sélectionner des cellules avec des formules.
Sélectionnez toutes les cellules avec des données, y compris des formules avec code VBA
Si vous avez des cellules remplies de formules, vous pouvez sélectionner toutes les cellules avec des données en sélection avec le code VBA suivant. Veuillez faire comme ceci:
Étape 1: Maintenez la touche Alt + F11 clés dans Excel pour ouvrir le Fenêtre Microsoft Visual Basic pour Applications.
Étape 2: Cliquez insérer > Moduleet collez la macro suivante dans le Fenêtre du module.
Code VBA: sélectionnez toutes les cellules avec des données, y compris des formules
Sub SelectNotBlackRange()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
Dim OutRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
If Rng.Value <> "" Then
If OutRng Is Nothing Then
Set OutRng = Rng
Else
Set OutRng = Union(OutRng, Rng)
End If
End If
Next
If Not OutRng Is Nothing Then
OutRng.Select
End If
End Sub
Étape 3: Puis appuyez F5 clé pour exécuter ce code, et une boîte de dialogue apparaîtra pour vous dire de sélectionner une plage dans laquelle vous souhaitez sélectionner les cellules de données.
Étape 4: Après avoir sélectionné la plage, cliquez sur OK, et toutes les cellules de données, y compris les formules de la plage, ont été sélectionnées.
Sélectionnez toutes les cellules contenant des données, y compris des formules, en un seul clic de Kutools for Excel
Si vous souhaitez sélectionner les cellules contenant des données à la fois des valeurs et des formules avec juste moins d'étapes, ici, je peux vous présenter un moyen simple, Kutools for Excel, Avec son Sélectionnez Unblank Cells fonctionnalité, vous pouvez sélectionner les cellules de données en quelques clics.
| 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, veuillez procéder comme suit :( Téléchargez gratuitement Kutools pour Excel maintenant )
Step1: Sélectionnez la plage dans laquelle vous souhaitez sélectionner uniquement les cellules de données.
Step2: Cliquez Kutools > Sélectionnez > Sélectionnez les cellules non vides, puis toutes les cellules avec des données ont été sélectionnées à la fois, voir capture d'écran:
Téléchargez gratuitement Kutools pour Excel maintenant
Articles Liés:
Sélectionnez des cellules ou des plages non adjacentes
Désélectionner les cellules des plages sélectionnées
Inverser les sélections des plages sélectionnées
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!
