Goedemorgen, goedemiddag en goedeavond.

[elloco]

Hallo, ik wil graag dat als ik mijn excel bestand open klik, dat dan afhankelijk van de werkelijk tijd, dit in cel F5 automatisch springt: Goedemorgen, Goedemiddag of Goedenavond.

Voor 12.00 uur = Goedemorgen
Na 12.00 uur = Goedemiddag
Na 18.00 uur = Goedenavond

Na 18.00 uur = Goedenavond, lukt het mij niet om de juiste opdracht te geven, wat doe ik fout.

=ALS(B2<=G2;"Goedemorgen";ALS(B2>=G2;"Goedemiddag";ALS(B2>=G3;"Goedenavond";"""")))

Voorbeeld bestand voeg ik hierbij.

Bij voorbaat mijn dank.Bekijk bijlage Test met Welkomst scherm in excel 2007 - kopie.xlsm

 

[mvw64]

Probeer het zo eens

=ALS(B2<G2;"Goedemorgen";ALS(B2>=G3;"Goedeavond";"Goedemiddag"))

 

[elloco]

Bedankt voor je snelle reactie.

Mijn eerste indruk is dat het werkt, zal het testen en natuurlijk laat ik je weten of het gelukt is.

 

[Ad Becude]

Of je doet het zo.

="Goede"&KIEZEN(INTEGER(UUR(NU())/6)+1;"nacht";"morgen";"middag";"avond")

 

[elloco]

Dit lijkt mij ook top.

Ga het ook testen, bedankt.

 

[Ad Becude]

Nog mooier, is deze.

Zet de code achter je werkblad.

Private Sub Worksheet_Activate()
Range("B2") = "Goede" & Choose(Int(Hour(Now()) / 6 + 1), "nacht", "morgen", "middag", "avond") & "  " & Environ("username")
End Sub