Программное обеспечение

Про Excel. Как сделать мигающую ячейку?

Возможно ли в Excel сделать так чтобы в ячейке с какой-либо записью моргал (менялся) фон (заливка) например зеленым-желтым-зеленым-желтым.
Или также моргал (менялся) цвет шрифта текста (например красный-зеленый-красный-зеленый-красный-зеленый) ?
Как именно и что нужно сделать?
Подскажите пожалуйста :-)
Я в Word 2007 делал такое.
У меня получилось.
Делаешь таблицу обычную.
Делаешь заливку скажем красным, а слева желтым.
А текст в них на оборот справа желтым, а слева красным.
Заходишь в свойства таблицы.
Там функция какая-то есть типа инвертировать цвета.
---
Думаю и в Excel есть подобная фигня.... Правда не интересовался.
Поищи там.
---
Вообще вот тут читай. Тут у парня схожий вопрос возник.
https://www.planetaexcel.ru/forum/index.php?PAGE_NAME=read&FID=8&TID=10370
Фаррух Хусаинов
Фаррух Хусаинов
46 671
Лучший ответ
Сергей Дорошкевич Мой документ Excel, что-то не найду в нем "инвертировать цвета"
Использовать формулу Blink if >=100, если значение в ячейке =100 или больше, будет мигать зеленым.
Сергей Дорошкевич У меня в той ячейке текстовая запись.
Её можно заставить Blink-ать?
И в какую ячейку писать Blink if >=100? Тут же нужно как-то указать в какой ячейке искать >=100
только макросом.
для фона. в ячейке А2.
====================================
For x = 1 To 100
Range("A2").Interior.ColorIndex = 6
PauseTime = 0.5
Start = Timer
Do While Timer < Start + PauseTime
DoEvents
Loop
Range("A2").Interior.ColorIndex = 4
PauseTime = 0.5
Start = Timer
Do While Timer < Start + PauseTime
DoEvents
Loop
Next x
======================================
для текста заменить вторую и ниже строку на
Range("A2").Font.ColorIndex = 6
цифры это цвет. подбирай.
мигнёт 100 раз. увеличивай.
Успехов!
Ильдар Усманов
Ильдар Усманов
43 098
Сергей Дорошкевич Спасибо большое.
Только у меня ничего не получается.
Вроде делаю как нашел в поисковиках, но ничего не моргает
Ника дедушка, никак
Ведь это не 90-ые
Александр Шелестов Можно и легко.
МИГАЮЩАЯ ЯЧЕЙКА

вы что-то недоговариваете.
Не думаю что у вас потребность в детской игрушке, которая работает при нажатии на кнопку...
Наверняка вам нужна какая-то напоминалка которая включается при определенных условиях.
Но условия вы пропустили...

Отвечаю по вопросу как есть.
- открываем excel
- вставить
- загружаем любую картинку, фото, геометрическую фигуру и т. п.
кликаем на нужный Лист - Исходный текст
копируем код:
Sub Blick()
Dim s As Byte
For s = 1 To 5
[D3].Interior.ColorIndex = 4
Application.Wait Now + TimeSerial(0, 0, 1)
[D3].Interior.ColorIndex = 6
Application.Wait Now + TimeSerial(0, 0, 1)
Next
[D3].Interior.ColorIndex = 0
End Sub

возвращаемся на рабочий Лист. Клик правой мышкой по рисунку - Нахначить макрос - Blick - OK

*[D4] - ячейка D4
если надо выделить массив - тогда [D4:F7]
1 to 5 - кол-во миганий
ColorIndex = 4 - зеленый цвет
1 - черн
2 - бел
3 - красн
4 - зел
5 - темносиний
6 - желт
7, 38 - розов ( разнве тона)
8, 33, 42 - голубой
10 - т/зеленый
12 - коричн
15 - серый
22 - оранж
41 - син
можно перебирать до 56
TimeSerial(0, 0, 1) - задержка (0 час, 0 мин, 1 сек)
Сергей Дорошкевич Спасибо за ответ :-)
Да, мне нужна "напоминалка"
Я скачал файл из темы форума https://www.planetaexcel.ru/forum/index.php?PAGE_NAME=read&FID=8&TID=10370 и подогнал под мою задачу :-)