Comment désélectionner rapidement des cellules dans des plages sélectionnées dans Excel ?
Supposons que vous deviez désélectionner certaines cellules ou plages de la sélection actuelle, vous devez désélectionner toute la sélection et recommencer, car Excel ne propose pas de moyen de désélectionner des cellules une fois qu'elles ont été sélectionnées. Cet article énumérera quelques astuces pour désélectionner une partie des cellules ou plages de la sélection actuelle.
Désélectionner une partie des cellules ou plages de la sélection avec un code VBA
Désélectionner une partie des cellules ou plages de la sélection avec Kutools pour Excel
Par exemple, vous avez sélectionné beaucoup de cellules, mais maintenant vous constatez qu'il y a des cellules dont vous ne voulez pas. Vous devez donc les désélectionner tout en laissant les autres cellules sélectionnées, comme le montrent les captures d'écran suivantes :
![]() | ![]() | ![]() |
Désélectionner une partie des cellules ou plages de la sélection avec un code VBA
Le VBA est une méthode fantastique pour gérer certaines opérations dans Excel qui ne sont pas faciles à réaliser avec les commandes d'Excel. Cela s'applique également à la désélection de cellules ou de plages.
Étape 1 : Sélectionnez la plage sur laquelle vous allez travailler ;
Étape 2 : Cliquez sur une cellule dans la sélection que vous souhaitez désélectionner tout en maintenant la touche Ctrl enfoncée.
Étape 3 : Maintenez les touches Alt + F11 dans Excel, ce qui ouvre la fenêtre Microsoft Visual Basic pour Applications.
Étape 4 : Cliquez sur Insérer > Module, puis collez la macro suivante dans la fenêtre Module.
VBA pour désélectionner la cellule active de la sélection
Sub UnSelectCell()
'Updateby20140314
Dim rng As Range
Dim InputRng As Range
Dim DeleteRng As Range
Dim OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set DeleteRng = Application.InputBox("Delete Range", xTitleId, Type:=8)
For Each rng In InputRng
If Application.Intersect(rng, DeleteRng) Is Nothing Then
If OutRng Is Nothing Then
Set OutRng = rng
Else
Set OutRng = Application.Union(OutRng, rng)
End If
End If
Next
OutRng.Select
End Sub
Étape 5 : Appuyez sur la touche F5 pour exécuter cette macro. Ensuite, une boîte de dialogue apparaît pour vous permettre de sélectionner une plage de travail. Voir les captures d'écran :
Étape 6 : Cliquez ensuite sur OK, une autre boîte de dialogue apparaît pour vous permettre de désélectionner des cellules dans la plage. Et si vous souhaitez désélectionner plusieurs cellules dans la plage, vous pouvez maintenir le bouton Ctrl enfoncé pour les sélectionner une par une. Voir la capture d'écran :
Étape 7 : Cliquez sur OK, et vous pouvez voir le résultat :
Désélectionner une partie des cellules ou plages de la sélection avec Kutools pour Excel
Si vous devez désélectionner de nombreuses cellules ou plages de la sélection, le VBA ci-dessus n'est pas une bonne solution. Nous introduisons donc l'astuce suivante, l'outil Assistant de plage de Kutools pour Excel. Il peut vous aider à désélectionner facilement et rapidement toute cellule ou plage de la sélection.
Kutools pour Excel inclut plus de 300 outils pratiques pour Excel. Essayez gratuitement sans limitation pendant 30 jours.Obtenez-le maintenant.
Étape 1 : Cliquez sur Kutools > Sélection >> Assistant de plage….
Étape 2 : Dans la boîte de dialogue Assistant de plage, cochez l'option Différence, puis cliquez ou faites glisser la souris pour désélectionner des cellules ou des plages de la sélection. Voir la capture d'écran :
Étape 3 : Les cellules indésirables ont été désélectionnées de la sélection. Enfin, fermez la boîte de dialogue Assistant de plage.
Pour plus d'informations détaillées sur l'Assistant de plage, veuillez consulter la description de la fonctionnalité Assistant de plage.
Articles connexes :
- Sélectionner des cellules ou des plages non adjacentes
- Inverser les sélections des plages sélectionnées
- Sélectionner toutes les cellules contenant des données dans les sélections
Meilleurs outils de productivité pour Office
Boostez vos compétences Excel avec Kutools pour Excel, et découvrez une efficacité sans précédent. Kutools pour Excel propose plus de300 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
- Activez la modification 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é de50 %, et réduit des centaines de clics de souris pour vous chaque jour !