cell kleuren na een paar seconden

[gast0660]

Beste forumleden,

Een paar van mijn vrienden hebben een kroeg waar iedere twee weken bingo wordt gespeeld. Dit gebeurd aan de hand van een excel bestand geprojecteerd op een groot scherm. (bestand in bijlage). Nu is het probleem dat naargelang diegene die de trekking doet er nogal wat verschil van tijd zit tussen de trekkingen. Nu vroeg ik mij af of ik de kleur van de samengevoegde cellen (N2-Q5) na een paar seconden kan laten veranderen van kleur, zodat diegene die de trekking doet weet dat het tijd is voor de volgende trekking
Alvast bedankt voor jullie reactie
mvg
Bekijk bijlage 116623

 

[HSV]

Ik hoop niet dat dit een valse BINGO is.

Je bijlage werkt helaas niet.

Hierbij de code achter moduleblad.

Private Sub Worksheet_Change(ByVal Target As Range)
 With [N2:Q5]
   .Interior.ColorIndex = 3
Application.Wait DateAdd("s", 10, Now)
   .Interior.ColorIndex = 4
  End With
End Sub

Staat nu ingesteld voor 10 seconden.

 

[robdgr]

Je bijlage leidt tot

Ongeldig(e) Bijlage opgegeven

.

 

[gast0660]

Hoi,
Harry en Rob, alvast bedankt voor jullie snelle reactie.
Ik stuur het bestandje nog eens door als bijlage, hopelijk is het dit keer ok.
Het scriptje van Harry is in ieder geval een stap in de goede richting.
Bekijk bijlage Bingo.xls
mvg
Philiep

 

[ExcelAmateur]

gast0660,

Ik heb een beetje zitten spelen met de code.
Een stukje code van HSV gebruikt en wat uit de bestaande code.

Kijk eens wat je er nu van vind.

 

[Warme bakkertje]

Waarom niet de groene bal 'Trekking' een aantal seconden verbergen ?

 

[gast0660]

Beste forumleden,
Mijn vraag is MEER dan opgelost, had de code van Harry al toegepast en werkt perfect.
De oplossing van warme bakker is ook een ideale oplossing (pfff, had er zelf nog niet aan gedacht ) Hierbij is dit probleem opgelost. Hartelijk dank aan iedereen!!!! ik ben nieuw op dit forum en ben werkelijk overdonderd door alle spontane medewerking

mvg
hartelijk dank en prettige feestdagen