Excel не має блимання або блимання тексту як варіант шрифту. Використовуючи вбудований Visual Basic для програм Excel, ви можете використовувати код, щоб змінити колір тексту кожного розділу, створюючи ефект миготіння.
Крок 1
Відкрийте файл Microsoft Excel 2010, у якому ви хочете зробити блимання тексту. Натисніть «Alt» і «F11», щоб відкрити консоль VBA.
Відео дня
Крок 2
Клацніть правою кнопкою миші запис «This Workbook» у лівій частині консолі VBA. Наведіть курсор миші на «Вставити» і виберіть «Модуль».
Крок 3
Двічі клацніть параметр «Ця книга». Скопіюйте наступний код і вставте його в білий простір праворуч на екрані:
Приватна підпорядкована книга_Open() Blink End Sub
Private Sub Workbook_BeforeClose (Cancel As Boolean) NoBlink End Sub
Цей код почне блимання тексту, коли ви відкриєте цю книгу, і припинить блимання тексту коли ви закриваєте книгу, як тільки ви вставите код, щоб сказати Excel, що насправді Blink і NoBlink означає
Крок 4
Двічі клацніть «Модуль 1» зі списку в лівій частині екрана. Помістіть курсор у праву частину екрана та введіть наступний рядок:
Громадський відлік часу подвійний
Це створює змінну під назвою "Timecount", яку можна використовувати в кожній підпрограмі.
Крок 5
Натисніть Enter, щоб перемістити курсор на наступний рядок і введіть наступний код:
Sub blink() за допомогою цієї книги. Worksheets("Sheet1").Range("A1:A10").Font Якщо .ColorIndex = 3 Тоді .ColorIndex = 2 Інакше .ColorIndex = 3 End If End With Timecount = Now + TimeSerial (0, 0, 1) Application. OnTime Timecount, "Blink", True End Sub
Це створює підпрограму під назвою «Blink», яка призведе до спалаху всього тексту у визначеному діапазоні. Ви можете змінити діапазон з "A1:A10" на будь-який діапазон, який ви бажаєте, включаючи окрему клітинку.
Крок 6
Натисніть «Enter», щоб перейти до наступного рядка, і введіть наступний код:
Sub noblink() Цей зошит. Робочі аркуші("Аркуш1").Діапазон("A1:A10").Шрифт. ColorIndex = _ xlColorIndexАвтоматична програма. OnTime Timecount, "Blink", False End Sub
Це створить підпрограму, яка запускатиметься, коли ви закриєте книгу. Він перетворює весь текст назад на чорний, так що той, хто відкриває книгу без увімкнених макросів, випадково не побачить нічого в текстових полях.
Крок 7
Закрийте консоль VBA, натиснувши «X» у верхньому правому куті. Натисніть вкладку «Файл» у верхній частині екрана та виберіть «Зберегти як». У спадному полі виберіть «Книга з підтримкою макросів Excel» і введіть назву книги. Натисніть «Зберегти».
Крок 8
Закрийте файл Excel, а потім відкрийте його знову. Ваш текст у діапазоні, визначеному в макросі, почне блимати. Залежно від налаштувань безпеки вам може знадобитися натиснути кнопку «Увімкнути макроси» у верхній частині екрана, щоб побачити блимаючий текст.
