Hvordan dukker pop op-meddelelsesfelt, hvis celleværdien er lig med "X" i Excel?
At poppe op på meddelelsesfeltet hjælper meget, mens du finder bestemt indhold i det angivne interval. For eksempel finder du celleværdi, der svarer til 50 i et område A1: C7, og du har brug for et meddelelsesfelt, der dukker op for at fortælle dig, om celleværdien eksisterer eller ej. Følgende to metoder kan hjælpe dig.
Pop op meddelelsesboks, hvis celleværdien er lig med "X" med VBA-kode
Pop let op i meddelelsesfeltet, hvis celleværdien er lig med "X" med Kutools til Excel
Pop op meddelelsesboks, hvis celleværdien er lig med "X" med VBA-kode
Følgende VBA-kode kan hjælpe med at oprette et pop op-meddelelsesfelt, når den bestemte værdi findes i det angivne interval. Gør som følger.
1. I regnearket skal du kontrollere værdier i det angivne interval, højreklikke på fanenavnet i arkfanen og derefter klikke på Vis kode fra højreklikmenuen. Se skærmbillede:
2. i Microsoft Visual Basic til applikationer vindue, kopier og indsæt følgende VBA-kode i vinduet Kode.
VBA-kode: pop op-meddelelsesfelt, hvis celleværdien er lig med "X"
Private Sub Worksheet_Change(ByVal Target As Range)
'Update: 2017/7/25
Dim xCell As Range, Rg As Range
On Error Resume Next
Set Rg = Application.Intersect(Target, Range("A1:C7"))
If Not Rg Is Nothing Then
For Each xCell In Rg
If xCell.Value = "50" Then
MsgBox "guest entered into cell " & xCell.Address, vbInformation, "Kutools for Excel"
Exit Sub
End If
Next
End If
End Sub
Private Sub Worksheet_selectionChange(ByVal Target As Range)
Dim xCell As Range, Rg As Range
On Error Resume Next
Set Rg = Application.Intersect(Target, Range("A1:C7"))
If Not Rg Is Nothing Then
For Each xCell In Rg
If xCell.Value = "50" Then
MsgBox "guest entered into cell " & xCell.Address, vbInformation, "Kutools for Excel"
Exit Sub
End If
Next
End If
End Sub3. Trykke andre + Q taster samtidigt for at lukke Microsoft Visual Basic til applikationer vindue og gå tilbage til regnearket.
Fra nu af, når celleværdier ændres i området A1: C7, og der er celleværdi lig med "50", får du et meddelelsesfelt som vist nedenstående skærmbillede.
Derudover kan du bare vælge det interval, der skal vises meddelelsesfeltet, hvis celleværdien findes.
Noter:
Pop op meddelelsesfelt, hvis celleværdien er lig med "X" med Kutools til Excel
Vælg specifikke celler nytte af Kutools til Excel kan også hjælpe dig med at løse dette problem. Gør som følger.
Før påføring Kutools til Excel, Bedes download og installer det først.
1. Vælg det område, du vil finde, hvis der findes en celleværdi, og klik derefter på Kutools > Type > Vælg specifikke celler.
2. i Vælg specifikke celler dialogboksen skal du vælge Cell valgmulighed i Valgtype sektion, og vælg derefter Lig først og fremmest Specifik type rulleliste, og skriv celleværdien i det næste tekstfelt, og klik til sidst på OK .
Hvis celleværdien findes i det angivne interval, får du følgende meddelelsesfelt, klik på OK knappen, vælges cellen.
Ellers får du beskedfeltet som vist nedenstående skærmbillede.
Hvis du vil have en gratis prøveperiode (30 dage) af dette værktøj, klik for at downloade det, og gå derefter til at anvende handlingen i henhold til ovenstående trin.
Pop let op i meddelelsesfeltet, hvis celleværdien er lig med "X" med Kutools til Excel
Relaterede artikler:
- Hvordan slettes hele rækken, hvis cellen indeholder nul i Excel?
- Hvordan tæller celler med specifik tekst i markering i Excel?
Bedste kontorproduktivitetsværktøjer
Overlad dine Excel-færdigheder med Kutools til Excel, og oplev effektivitet som aldrig før. Kutools til Excel tilbyder over 300 avancerede funktioner for at øge produktiviteten og spare tid. Klik her for at få den funktion, du har mest brug for...
Fanen Office bringer en grænseflade til et kontor med Office, og gør dit arbejde meget lettere
- Aktiver redigering og læsning af faner i Word, Excel, PowerPoint, Publisher, Access, Visio og Project.
- Åbn og opret flere dokumenter i nye faner i det samme vindue snarere end i nye vinduer.
- Øger din produktivitet med 50 % og reducerer hundredvis af museklik for dig hver dag!
