Excel - Een macro om cellen te laten knipperen

Kwestie

Ik wil een cel laten knipperen onder Excel. Kan dit een macro of een eenvoudiger manier zijn?

Oplossing

-1. Selecteer de cel

-2. Kies Stijl in het menu Opmaak.

-3. Voer in het dialoogvenster Stijl een nieuwe stijlnaam in, zoals 'Knipperen'.

-4. Gebruik de knoppen in het dialoogvenster om de stijlkenmerken te wijzigen.

-5. Klik op OK.

Deze stijl kan worden toegepast op de cellen van uw keuze.

Nu moet je de macro's maken:

 Dim NextTime als datum Sub StartFlash () NextTime = Nu + TimeValue ("00:00:01") Met ActiveWorkbook.Styles ("Flashing"). Font If .ColorIndex = xlAutomatic Then .ColorIndex = 3 .ColorIndex = 5 - .ColorIndex Einde met Application.OnTime NextTime, "StartFlash" End Sub

-------------------------------------------------- ----------------------

 Sub StopFlash () Application.OnTime NextTime, "StartFlash", planning: = False ActiveWorkbook.Styles ("Flashing"). Font.ColorIndex = xlAutomatic End Sub