Comment empêcher les cellules de contenir des entrées vides ou manquantes dans Excel ?
Si vous créez un tableau dans la plage A1:B10 d'une feuille de calcul et souhaitez vous assurer qu'aucune cellule vide n'est laissée dans cette plage, vous pouvez mettre en place une solution qui affiche automatiquement une invite si une entrée vide est détectée lors de l'édition. Suivez ce guide étape par étape pour éviter les entrées vides ou manquantes dans la plage spécifiée du tableau.
Empêcher les entrées vides ou manquantes dans les cellules à l'aide d'un code VBA
Empêcher les entrées vides ou manquantes dans les cellules à l'aide d'un code VBA
La plage A1:B10 est désignée pour votre tableau, avec A1 et B1 servant d'en-têtes de tableau, comme le montre la capture d'écran ci-dessous. Suivez les étapes décrites pour éviter les entrées vides ou manquantes dans la plage A2:B10 tout en remplissant le tableau.
1. Dans la feuille de calcul où vous souhaitez empêcher les entrées vides dans une certaine plage, faites un clic droit sur l'onglet de la feuille, puis cliquez sur Affichage Code dans le menu contextuel.
2. Dans la fenêtre Microsoft Visual Basic for Applications, copiez et collez le code VBA ci-dessous dans la fenêtre Code. Voir la capture d'écran :
Code VBA : Empêcher les entrées vides ou manquantes dans une plage de cellules
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count <> 1 Then Exit Sub
Dim isect As Range
On Error Resume Next
Set isect = Application.Intersect(Target, Range("A2:B10"))
If Not (isect Is Nothing) Then
If Target.Column = 1 Then
If Len(Target.Value) > 0 And Len(Target.Offset(-1, 0).Value) = 0 Then
MsgBox "You cannot skip a row in column A2:B10", vbInformation, "Kutools for Excel"
Target.ClearContents
End If
Else
If (Len(Target.Value) > 0 And Len(Target.Offset(-1, 0).Value) = 0) Or (Len(Target.Value) > 0 And Len(Target.Offset(0, -1).Value) = 0) Then
MsgBox "You cannot skip a row in column A2:B10", vbInformation, "Kutools for Excel"
Target.ClearContents
End If
End If
End If
End Sub
Remarque : Dans le code VBA, A2:B10 est la plage de cellules dans laquelle vous ne voulez laisser aucune cellule vide. Veuillez modifier la plage selon vos besoins.
Dès maintenant, si vous sautez une cellule vide et remplissez la cellule suivante dans la plage spécifiée, une boîte de dialogue Kutools for Excel apparaîtra comme indiqué ci-dessous.
Articles connexes :
- Comment empêcher la saisie de données dans des cellules spécifiques d'une feuille de calcul dans Excel ?
- Comment empêcher la sélection de plusieurs feuilles de calcul dans Excel ?
- Comment empêcher la suppression d'une feuille de calcul spécifique dans Excel ?
- Comment empêcher la suppression de certains contenus de cellules 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