Hur kontrollerar jag om ett visst intervallnamn finns i Excel?
Innan du kör något VBA-skript kan du behöva kontrollera om ett namngivet intervall finns i den aktuella arbetsboken. VBA-koden i den här artikeln kan hjälpa dig att snabbt kontrollera om ett visst intervallnamn finns i Excel.
Kontrollera om det finns ett visst intervallnamn med VBA-kod
Kontrollera om det finns ett visst intervallnamn med VBA-kod
Du kan köra nedanstående VBA-kod för att snabbt kontrollera om ett visst intervallnamn finns i aktuell arbetsbok.
1. Tryck andra + F11 samtidigt för att öppna Microsoft Visual Basic för applikationer fönster.
2. I Microsoft Visual Basic för applikationer fönstret klickar Insert > Modulerna. Kopiera sedan och klistra in nedanstående VBA-kod i fönstret.
VBA-kod: kontrollera om ett visst intervall finns i 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
Anmärkningar:
3. tryck på F5 för att köra koden. Sedan en Kutools för Excel dialogrutor dyker upp för att berätta om det angivna intervallnamnet finns eller inte, klicka på OK knapparna successivt för att stänga dialogrutorna. Se skärmdump:
Relaterade artiklar:
- Hur kontrollerar jag om första tecknet i en cell är en bokstav eller ett tal i Excel?
- Hur kontrollerar jag om ett cellvärde ligger mellan två värden i Excel?
- Hur kontrollerar jag om cellen börjar eller slutar med en viss karaktär i Excel?
Bästa kontorsproduktivitetsverktyg
Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid. Klicka här för att få den funktion du behöver mest...
Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare
- Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
- Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
- Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!