Comment vérifier si un certain nom de plage existe dans Excel?
Avant d'exécuter un script VBA, vous devrez peut-être vérifier si une plage nommée existe dans le classeur actuel. Le code VBA fourni dans cet article peut vous aider à vérifier rapidement si un certain nom de plage existe dans Excel.
Vérifiez si un certain nom de plage existe avec le code VBA
Vérifiez si un certain nom de plage existe avec le code VBA
Vous pouvez exécuter le code VBA ci-dessous pour vérifier rapidement si un certain nom de plage existe dans le classeur actuel.
1. presse autre + F11 touches simultanément pour ouvrir le Microsoft Visual Basic pour applications fenêtre.
2. dans le Microsoft Visual Basic pour applications fenêtre, cliquez sur insérer > Module. Ensuite, copiez et collez le code VBA ci-dessous dans la fenêtre.
Code VBA: vérifiez si une certaine plage existe dans Excel
Sub CheckRanges()
Dim chkRange As Range
Dim areasName(2) As String
Dim chkCnt As Long
Dim i As Integer
areasName(0) = "new"
areasName(1) = "MyRange"
areasName(2) = "Range2"
Application.ScreenUpdating = False
For i = 0 To 2
On Error Resume Next
chkCnt = Len(ThisWorkbook.Names(areasName(i)).Name)
On Error GoTo 0
If chkCnt <> 0 Then
Set chkRange = Range(areasName(i))
MsgBox "This Range: '" & areasName(i) & "' DOES exist!", vbInformation, "Kutools for Excel"
chkCnt = 0
Else
MsgBox "This Range: '" & areasName(i) & "' does NOT exist!", vbInformation, "Kutools for Excel"
End If
Next i
Application.ScreenUpdating = True
End Sub
Notes:
3. appuie sur le F5 clé pour exécuter le code. Puis un Kutools for Excel des boîtes de dialogue apparaissent pour vous dire si le nom de plage spécifié existe ou non, cliquez sur le bouton OK boutons successivement pour fermer les boîtes de dialogue. Voir la capture d'écran:
Articles connexes:
- Comment vérifier si le premier caractère d'une cellule est une lettre ou un chiffre dans Excel?
- Comment vérifier si une valeur de cellule se situe entre deux valeurs dans Excel?
- Comment vérifier si la cellule commence ou se termine par un caractère spécifique dans Excel?
Meilleurs outils de productivité bureautique
Améliorez vos compétences Excel avec Kutools for Excel et faites l'expérience d'une efficacité comme jamais auparavant. Kutools for Excel offre plus de 300 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
- 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é de 50% et réduit des centaines de clics de souris chaque jour!