Cum să clipească sau să clipească textul celulei specificate în Excel?
Pentru a face o anumită celulă remarcabilă în foaia dvs. de lucru, ce zici de clipirea textului acestei celule? Acest articol vă va arăta metoda de a clipi textul unei celule specificate în Excel.
Text intermitent sau intermitent al celulei specificate cu cod VBA
Text intermitent sau intermitent al celulei specificate cu cod VBA
Procedați după cum urmează pentru a clipi textul unei celule specificate în Excel.
1. presa Alt + F11 tastele simultan pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.
2. În Microsoft Visual Basic pentru aplicații fereastră, faceți clic pe Insera > Module. Apoi copiați și lipiți următorul cod în fereastra Cod.
Cod VBA: text intermitent al celulei specificate în 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
notițe: în acest cod VBA, Sheet2 și A1 indică textul din celula A1 din Sheet2 va clipi în registrul de lucru curent.
3. apasă pe Alt + Q tastele simultan pentru a închide Microsoft Visual Basic pentru aplicații fereastră.
Acum aveți nevoie de un buton pentru a porni și a opri clipirea.
4. clic Dezvoltator > Insera > Buton (Control formular). Vedeți captura de ecran:
5. Desenați un buton în foaia de lucru, apoi un Atribuiți macro apare fereastra de dialog, faceți clic pe StartBlink în Macro nume , apoi faceți clic pe OK buton. Vedeți captura de ecran:
6. Faceți clic dreapta pe butonul inserat și faceți clic pe Editează textul din meniul cu clic dreapta. Apoi schimbați textul butonului cu textul de care aveți nevoie, cum ar fi Start / Stop Clipește.
De acum înainte, când faceți clic pe buton, textul celulei A1 începe să clipească. Și când faceți clic din nou pe buton, textul celulei A1 încetează să clipească.
Cele mai bune instrumente de productivitate de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!