Excel tidak menampilkan teks yang berkedip atau berkedip sebagai opsi font. Namun, menggunakan Visual Basic for Applications bawaan Excel, Anda dapat menggunakan kode untuk membuat teks berubah warna setiap bagian, menciptakan efek berkedip.
Langkah 1
Buka file Microsoft Excel 2010 di mana Anda ingin membuat flash teks. Tekan "Alt" dan "F11" untuk membuka konsol VBA.
Video Hari Ini
Langkah 2
Klik kanan entri "Buku Kerja Ini" di sisi kiri konsol VBA. Gerakkan mouse Anda ke "Sisipkan" dan pilih "Modul."
Langkah 3
Klik dua kali opsi "Buku Kerja Ini". Salin kode berikut dan tempel ke ruang putih di sisi kanan layar:
Sub Pribadi Workbook_Open() Blink End Sub
Private Sub Workbook_BeforeClose (Batalkan Sebagai Boolean) NoBlink End Sub
Kode ini akan memulai dan teks yang berkedip saat Anda membuka buku kerja ini, dan menghentikan teks yang berkedip ketika Anda menutup buku kerja, setelah Anda memasukkan kode untuk memberi tahu Excel apa sebenarnya Blink dan NoBlink berarti.
Langkah 4
Klik dua kali "Modul 1" dari daftar di sisi kiri layar. Tempatkan kursor Anda di sisi kanan layar dan masukkan baris berikut:
Hitungan Waktu Publik Sebagai Ganda
Ini menciptakan variabel yang disebut "Timecount" yang dapat Anda gunakan di setiap subrutin.
Langkah 5
Tekan enter untuk memindahkan kursor ke baris berikutnya dan masukkan kode berikut:
Sub blink() Dengan Buku Kerja Ini. Worksheets("Sheet1").Range("A1:A10").Font If .ColorIndex = 3 Kemudian .ColorIndex = 2 Else .ColorIndex = 3 End If End With Timecount = Now + TimeSerial (0, 0, 1) Application. Penghitungan Waktu Tepat Waktu, "Blink",, True End Sub
Ini membuat subrutin yang disebut "Blink" yang akan menyebabkan semua teks dalam rentang yang ditentukan berkedip. Anda dapat mengubah rentang dari "A1:A10" ke rentang apa pun yang Anda inginkan, termasuk sel individual.
Langkah 6
Tekan "Enter" untuk mengakses baris berikutnya dan masukkan kode berikut:
Sub noblink() Buku Kerja Ini. Worksheets("Sheet1").Range("A1:A10").Font. ColorIndex = _ xlColorIndexAplikasi Otomatis. Penghitungan Waktu Tepat Waktu, "Blink",, Subs Akhir Palsu
Ini akan membuat subrutin yang akan dijalankan saat Anda menutup buku kerja. Itu mengubah semua teks kembali menjadi hitam, sehingga seseorang yang membuka buku kerja tanpa mengaktifkan makro tidak akan secara tidak sengaja melihat apa pun di kotak teks.
Langkah 7
Tutup konsol VBA dengan mengklik "X" di sudut kanan atas. Klik tab "File" di bagian atas layar dan pilih "Save as." Pilih "Buku Kerja Excel Macro-enabled" dari bidang drop-down dan ketik nama untuk buku kerja. Klik "Simpan."
Langkah 8
Tutup file Excel lalu buka kembali. Teks Anda, dalam rentang yang ditentukan dalam makro, akan mulai berkedip. Tergantung pada pengaturan keamanan Anda, Anda mungkin perlu mengeklik tombol "Aktifkan Makro" di bagian atas layar untuk melihat teks yang berkedip.
