Comment verrouiller ou déverrouiller une sélection en fonction de la valeur d’une autre cellule dans Excel ?
Dans certains cas, vous devrez peut-être verrouiller ou déverrouiller une sélection en fonction de la valeur d’une autre cellule. Par exemple, vous souhaitez que la plage B1:B4 soit déverrouillée lorsque la cellule A1 contient « Accepting », et verrouillée lorsqu’elle contient « Refusing ». Comment obtenir ce résultat ? Cet article peut vous aider.
Verrouiller ou Déverrouiller la sélection Basé sur la valeur dans une autre cellule à l’aide d’un code VBA
Le code VBA suivant vous permet de verrouiller ou de déverrouiller la sélection en fonction de la valeur contenue dans une autre cellule d’Excel.
1. Cliquez avec le bouton droit sur l’onglet de la feuille (celle contenant les cellules que vous souhaitez verrouiller ou déverrouiller en fonction de la valeur d’une autre cellule), puis sélectionnez Afficher le code dans le menu contextuel.
2. Copiez ensuite le code VBA suivant et collez-le dans la fenêtre de code.
Code VBA : verrouiller ou Déverrouiller la sélection Basé sur la valeur dans une autre cellule
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("A1") = "Accepting" Then
Range("B1:B4").Locked = False
ElseIf Range("A1") = "Refusing" Then
Range("B1:B4").Locked = True
End If
End Sub
3. Appuyez simultanément sur les touches Alt + Q pour fermer la fenêtre Microsoft Visual Basic pour Applications.
Désormais, dès que vous saisissez la valeur « Accepting » dans la cellule A1, la plage B1:B4 est automatiquement déverrouillée.
Lorsque vous saisissez la valeur « Refusing » dans la cellule A1, la plage limitée B1:B4 est automatiquement verrouillée.
Libérez la magie d’Excel avec Kutools IA
- Exécution intelligente : effectuez des opérations sur les cellules, analysez des données et créez des graphiques, le tout à partir de commandes simples.
- formules personnalisées : créez des formules sur mesure pour rationaliser vos flux de travail.
- Programmation VBA : Écrivez et implémentez du code VBA en toute simplicité.
- Interprétation de formules : Décryptez facilement les formules complexes.
- Traduction de texte : Franchissez les barrières linguistiques directement depuis vos feuilles de calcul.
Articles associés:
- Comment verrouiller d’un seul coup toutes les références de cellules dans les formules Excel ?
- Comment verrouiller ou protéger des cellules dans Excel après avoir saisi des données ?
- Comment lier une image à une cellule ou l’insérer directement dans une cellule dans Excel ?
Meilleurs outils de productivité Office
Boostez vos compétences Excel avec Kutools pour Excel et découvrez une efficacité inégalée.Kutools pour Excel propose plus de 300 fonctionnalités avancées pour améliorer votre 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 rend votre travail bien plus facile
- Activez 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 vous fait économiser des centaines de clics de souris chaque jour !
Tous les compléments Kutools. Un seul installateur
Kutools for Office regroupe les compléments pour Excel, Word, Outlook et PowerPoint, ainsi que Office Tab Pro, ce qui en fait le choix idéal pour les équipes travaillant à travers les applications Office.
- Suite tout-en-un— Compléments Excel, Word, Outlook et PowerPoint + Office Tab Pro
- Un seul installateur, une seule licence— installation en quelques minutes (compatible MSI)
- Fonctionne mieux ensemble— productivité optimisée dans toutes les applications Office
- Essai gratuit de 30 jours avec toutes les fonctionnalités— aucune inscription, aucune carte bancaire
- Meilleur rapport qualité-prix— économisez par rapport à l’achat de compléments individuels