79131519

Date: 2024-10-27 21:22:39
Score: 1
Natty:
Report link

Try this: Sub SelecteerDatum() Cells(Application.Match(CLng(Date), Range("A:A"), 1), "A").Select End Sub

Reasons:
  • Whitelisted phrase (-2): Try this:
  • Low length (1):
  • No code block (0.5):
  • Unregistered user (0.5):
  • Low reputation (1):
Posted by: Cees Swagerman