Comment empêcher la sélection de plusieurs feuilles de calcul dans Excel ?
Lorsque vous sélectionnez accidentellement plusieurs feuilles de calcul et que vous effectuez des modifications, tout le contenu sera appliqué à toutes les feuilles sélectionnées. Nous vous présentons ici une méthode pour éviter de sélectionner plusieurs feuilles en même temps, afin d'éviter que le même contenu n'apparaisse sur ces feuilles.
Empêcher la sélection de plusieurs feuilles avec du code VBA
Empêcher la sélection de plusieurs feuilles avec du code VBA
Veuillez suivre les étapes ci-dessous pour empêcher la sélection simultanée de plusieurs feuilles de calcul.
1. Dans la feuille de calcul que vous devez modifier, faites un clic droit sur l'onglet de la feuille et sélectionnez Affichage du code dans le menu contextuel.
2. Ensuite, copiez et collez le code VBA ci-dessous dans la fenêtre Code de la fenêtre Microsoft Visual Basic for Applications qui s'affiche.
Code VBA : Empêcher la sélection multiple de feuilles dans Excel
Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
On Error GoTo err_handler
If ActiveWindow.SelectedSheets.Count > 1 Then
If ActiveSheet Is Target.Parent Then
Application.EnableEvents = False
MsgBox "Please don't make changes with multiple sheets selected.", _
vbInformation, "Kutools for Excel"
Application.Undo
ActiveSheet.Select
End If
End If
err_handler:
Application.EnableEvents = True
Application.ScreenUpdating = True
End Sub3. Appuyez ensuite simultanément sur les touches Alt + Q pour fermer la fenêtre Microsoft Visual Basic for Applications.
4. Lorsque vous sélectionnez plusieurs feuilles de calcul avec la feuille actuelle, entrez du contenu et appuyez sur la touche Entrée, une boîte de dialogue Kutools for Excel apparaîtra comme indiqué dans la capture d'écran ci-dessous pour vous rappeler la sélection de plusieurs feuilles de calcul. Cliquez sur le bouton OK.
Après avoir cliqué sur le bouton OK, toutes les feuilles sélectionnées seront immédiatement dissociées.
Articles connexes :
- Comment supprimer toutes les feuilles sauf celle spécifiée/actuelle dans Excel ?
- Comment créer de nouvelles feuilles pour chaque ligne dans Excel ?
- Comment supprimer une feuille de calcul sans avertissement ni invite dans Excel ?
Meilleurs outils de productivité pour Office
Améliorez vos compétences Excel avec Kutools pour Excel, et découvrez une efficacité incomparable. Kutools pour Excel propose plus de300 fonctionnalités avancées pour booster votre productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte l’interface par onglets à Office, simplifiant considérablement 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 chaque jour !
Tous les modules complémentaires Kutools. Une seule installation
La suite Kutools for Office regroupe les modules complémentaires pour Excel, Word, Outlook & PowerPoint ainsi qu’Office Tab Pro, idéal pour les équipes travaillant sur plusieurs applications Office.
- Suite tout-en-un — modules complémentaires Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Un installateur, une licence — installation en quelques minutes (compatible MSI)
- Une synergie optimale — productivité accélérée sur l’ensemble des applications Office
- Essai complet30 jours — sans inscription, ni carte bancaire
- Meilleure valeur — économisez par rapport à l’achat d’add-ins individuels