Comment copier et coller uniquement des cellules non vides dans Excel?
La plupart d'entre nous peuvent souffrir de ce problème, lorsque nous copions une liste de données contenant des cellules vides, puis les collons dans une autre colonne, les cellules vides seront également collées. C'est très ennuyeux lorsque nous n'avons pas besoin des blancs et que nous voulons coller uniquement des cellules non vides. Dans ce cas, comment pourrions-nous copier et coller uniquement des cellules non vides dans Excel rapidement et facilement? Voici quelques astuces rapides pour le résoudre:
Copiez et collez uniquement les cellules non vides avec la commande Aller à spécial
Copiez et collez uniquement les cellules non vides avec la fonction Filtre
Copiez et collez uniquement les cellules non vides avec la formule de tableau
Copiez et collez uniquement les cellules non vides avec le code VBA
Copiez et collez uniquement des cellules non vides avec Kutools for Excel 
Copiez et collez uniquement les cellules non vides avec la commande Aller à spécial
Avec la Aller à Spécial , vous pouvez d'abord sélectionner toutes les données, puis les copier et les coller dans un autre emplacement.
1. Sélectionnez votre liste de données que vous souhaitez utiliser.
2. Puis clique Home > Rechercher et sélectionner > Aller à Spécial, voir capture d'écran:
3. Dans le Aller à Spécial boîte de dialogue, cochez Constants option, voir capture d'écran:
4. Puis clique OK, et seules les cellules de valeur ont été sélectionnées dans la liste.
5. Et puis copiez et collez les données à un emplacement de votre choix. Et seules les valeurs de cellule non vides ont été collées. Voir la capture d'écran:
Notes: Cette méthode n'est disponible que pour les constantes, elle n'est pas appliquée aux cellules de formule.
Copiez et collez uniquement les cellules non vides avec la fonction Filtre
La Filtre La fonctionnalité peut vous aider à filtrer d'abord les cellules non vides, puis vous pouvez les copier et les coller dans d'autres cellules selon vos besoins.
2Cliquez sur Données > Filtre, voir capture d'écran:
3. Cliquez ensuite sur le bouton déroulant dans le coin droit de la cellule dans la liste sélectionnée et décochez la case Blanks option dans le menu déroulant. Voir la capture d'écran:
4. Et puis cliquez OK, toutes les cellules non vides ont été filtrées comme suit:
5. Enfin, vous pouvez copier les données filtrées et les coller à n'importe quel emplacement dont vous avez besoin.
Notes: Les valeurs et les formules sont prises en compte en utilisant cette méthode.
Sélectionnez les cellules non vides à la fois |
| Cliquez pour un essai complet gratuit dans
30
jours! |
 |
Copiez et collez uniquement les cellules non vides avec la formule de tableau
Pour copier et coller uniquement les cellules non vides, vous pouvez également appliquer la formule matricielle suivante.
1. Outre vos données, entrez la formule suivante dans une cellule vide:
=LOOKUP("zzzzz",CHOOSE({1,2},"",INDEX(A:A,SMALL(IF($A$1:$A$15<>"",ROW($A$1:$A$15)),ROWS($B$1:B1)))))
Notes: Dans la formule ci-dessus, A1: A15 est la liste de données que vous souhaitez utiliser. Vous pouvez la modifier selon vos besoins.
2. Puis appuyez Maj + Ctrl + Entrée clés ensemble, puis sélectionnez la cellule B1 et faites glisser la poignée de recopie vers la plage que vous souhaitez contenir cette formule, et toutes les valeurs de cellule non vides ont été extraites. Voir la capture d'écran:
3. Comme ce sont des formules, lorsque vous les copiez à un autre endroit, vous devez les copier et les coller en tant que valeurs.
Notes: Cette formule n'est disponible que pour les constantes, non appliquée aux cellules de formule.
Copiez et collez uniquement les cellules non vides avec le code VBA
Si vous êtes intéressé par le code VBA, vous pouvez exécuter le code suivant pour terminer cette tâche.
1. Maintenez le ALT + F11 clés, et il ouvre le Fenêtre Microsoft Visual Basic pour Applications.
2Cliquez sur insérer > Moduleet collez le code suivant dans le Fenêtre du module.
Code VBA: copiez et collez uniquement les cellules non vides dans Excel
Sub PasteNotBlanks()
'Update 20140325
Dim rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
If InputRng.Columns.Count > 1 Then
MsgBox "Please select one column."
Exit Sub
End If
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
InputRng.SpecialCells(xlCellTypeConstants).Copy Destination:=OutRng.Range("A1")
End Sub
3. Puis appuyez F5 clé pour exécuter ce code, une boîte de dialogue apparaîtra pour vous rappeler de sélectionner la plage de données que vous souhaitez utiliser. Voir la capture d'écran:
4. Et puis cliquez OK, une autre boîte de dialogue apparaîtra pour vous permettre de choisir une cellule pour mettre les données.
5. Cliquez OK pour terminer ce code, et seules les valeurs de cellule non vides ont été collées à la position spécifiée.
Notes: Ce code n'est disponible que pour les constantes.
Copiez et collez uniquement des cellules non vides avec Kutools for Excel
Existe-t-il un moyen beaucoup plus simple que ci-dessus? Bien sûr, Kutools pour Excel's Sélectionnez une cellule non videL'utilitaire s peut vous aider à sélectionner d'abord les cellules non vides, puis à les copier et les coller.
| Kutools pour Excel, avec plus de
300
fonctions pratiques, rend vos travaux plus faciles. |
||
Après installation gratuite Kutools for Excel, procédez comme suit:
1. Sélectionnez la plage de cellules et cliquez sur Kutools > Sélectionnez > Sélectionnez les cellules non vides. Voir la capture d'écran:
2. Ensuite, les cellules non vides sont sélectionnées, appuyez sur Ctrl + C pour les copier, puis sélectionnez une cellule dans laquelle vous souhaitez afficher le résultat passé, appuyez sur Ctrl + V pour coller les cellules non vides sélectionnées. Voir la capture d'écran:
Copier et coller une cellule non vide uniquement
| Kutools pour Excel:
300
+ les fonctions que vous devez avoir dans Excel,
30
essai gratuit d'un jour à partir d'ici |
Les meilleurs outils de productivité de bureau
Kutools for Excel résout la plupart de vos problèmes et augmente votre productivité en
80 %
- Réutilisation: Insérer rapidement formules complexes, graphiques et tout ce que vous avez utilisé auparavant; Crypter les cellules avec mot de passe; Créer une liste de diffusion et envoyer des e-mails ...
- Barre Super Formula (modifiez facilement plusieurs lignes de texte et de formule); Disposition de lecture (lire et modifier facilement un grand nombre de cellules); Coller dans la plage filtréeplus
- Fusionner les cellules / lignes / colonnes sans perdre de données; Contenu des cellules divisées; Combiner des lignes / colonnes en double... Empêcher les cellules en double; Comparer les gammesplus
- Sélectionnez Dupliquer ou Unique Lignes; Sélectionnez les lignes vides (toutes les cellules sont vides); Super Find et Fuzzy Find dans de nombreux classeurs; Sélection aléatoire ...
- Copie exacte Plusieurs cellules sans changer la référence de formule; Créer automatiquement des références à plusieurs feuilles; Insérer des puces, Cases à cocher et plus encore ...
- Extrait du texte, Ajouter du texte, Supprimer par position, Supprimer l'espace; Créer et imprimer des sous-totaux de pagination; Conversion entre le contenu et les commentaires des cellulesplus
- Super filtre (enregistrer et appliquer des schémas de filtrage à d'autres feuilles); Tri avancé par mois / semaine / jour, fréquence et plus; Filtre spécial par gras, italique ...
- Combiner des classeurs et des feuilles de travail; Fusionner les tableaux en fonction des colonnes clés; Diviser les données en plusieurs feuilles; Conversion par lots xls, xlsx et PDFplus
- Plus que
300Caractéristiques puissantes. Prend en charge Office/Excel2007-2019 et 365. Prend en charge toutes les langues. Déploiement facile dans votre entreprise ou organisation. Fonctionnalités complètes30-jour d'essai gratuit. Garantie de remboursement de 60 jours.
Office Tab apporte une interface à onglets à Office et simplifie considérablement 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é en
50 %, et réduit chaque jour des centaines de clics de souris !
