Bagaimana cara mengedipkan atau mem-flash teks sel tertentu di Excel?
Untuk membuat sel tertentu menonjol di lembar kerja Anda, bagaimana jika mengedipkan teks sel ini? Artikel ini akan menunjukkan kepada Anda metode mengedipkan teks dari sel tertentu di Excel.
Teks berkedip atau berkedip dari sel tertentu dengan kode VBA
Teks berkedip atau berkedip dari sel tertentu dengan kode VBA
Lakukan hal berikut untuk mengedipkan teks dari sel tertentu di Excel.
1. tekan lain + F11 tombol secara bersamaan untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.
2. Dalam Microsoft Visual Basic untuk Aplikasi window, klik Menyisipkan > Modul. Kemudian salin dan tempel kode berikut ke jendela Kode.
Kode VBA: Teks berkedip dari sel tertentu di 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
Note: dalam kode VBA ini, Sheet2 dan A1 menunjukkan teks di sel A1 dari Sheet2 akan berkedip di buku kerja saat ini.
3. tekan lain + Q tombol secara bersamaan untuk menutup Microsoft Visual Basic untuk Aplikasi jendela.
Sekarang Anda memerlukan tombol untuk memulai dan menghentikan kedipan.
4. klik Pengembang > Menyisipkan > Tombol (Kontrol Formulir). Lihat tangkapan layar:
5. Gambarlah tombol di lembar kerja Anda, lalu Tetapkan Makro kotak dialog muncul, silakan klik MulaiBlink dalam Makro nama kotak, dan kemudian klik OK tombol. Lihat tangkapan layar:
6. Klik kanan tombol yang disisipkan, dan klik Edit Teks dari menu klik kanan. Kemudian ubah teks tombol tersebut menjadi teks yang Anda butuhkan seperti Start / Stop Blinking.
Mulai sekarang, saat mengklik tombol, teks sel A1 mulai berkedip. Dan saat mengklik tombol itu lagi, teks di sel A1 berhenti berkedip.
Alat Produktivitas Kantor Terbaik
Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Lanjutan untuk Meningkatkan Produktivitas dan Menghemat Waktu. Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...
Tab Office Membawa antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Jauh Lebih Mudah
- Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
- Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
- Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!