Hvordan blinker eller blinker tekst i den angivne celle i Excel?
For at gøre en bestemt celle fremragende i dit regneark, hvad med at blinke teksten i denne celle? Denne artikel viser dig metoden til at blinke teksten til en bestemt celle i Excel.
Blinkende eller blinkende tekst i den specificerede celle med VBA-kode
Blinkende eller blinkende tekst i den specificerede celle med VBA-kode
Gør følgende for at blinke teksten til en bestemt celle i Excel.
1. Trykke andre + F11 taster samtidigt for at åbne Microsoft Visual Basic til applikationer vindue.
2. i Microsoft Visual Basic til applikationer vindue, skal du klikke på indsatte > Moduler. Kopier og indsæt derefter følgende kode i vinduet Kode.
VBA-kode: Blinkende tekst fra den angivne celle i Excel
Sub StartBlink()
'Updated by ExtendOffice 20181010
Dim xCell As Range
Dim xTime As Variant
On Error Resume Next
Set xCell = Range("Sheet2!A1")
On Error Resume Next
If xCell.Font.Color = vbRed Then
xCell.Font.Color = vbWhite
Else
xCell.Font.Color = vbRed
End If
xTime = Now + TimeSerial(0, 0, 1)
Application.OnTime xTime, "'" & ThisWorkbook.Name & "'!StartBlink", , True
End Sub
Bemærk: i denne VBA-kode angiver Ark2 og A1 teksten i celle A1 i Ark2 vil blive blinket i den aktuelle projektmappe.
3. Tryk på andre + Q taster samtidigt for at lukke Microsoft Visual Basic til applikationer vindue.
Nu har du brug for en knap for at starte og stoppe blinkingen.
4. klik Udvikler > indsatte > Knap (formkontrol). Se skærmbillede:
5. Tegn en knap i dit regneark og derefter en Tildel makro dialogboksen dukker op, skal du klikke StartBlink i Makro navn og klik derefter på OK knap. Se skærmbillede:
6. Højreklik på den indsatte knap, og klik Rediger tekst fra højreklikmenuen. Skift derefter knapteksten til den tekst, du har brug for, såsom Start / Stop blinker.
Fra nu af, når du klikker på knappen, begynder teksten i celle A1 at blinke. Og når du klikker på knappen igen, holder teksten i celle A1 op med at blinke.
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!