naar datum springen.

[schilderehbo]

Ik heb een agenda bestandje waarmee ik wil dat hij opent in de cel waar de datum van de huidige dag in staat.
Had iets van internet een VBA code gehaald maar dat werkte niet.

alvast bedankt.

 

[peter59]

Hallo,

Is dit ongeveer wat je zoekt?
Deze ook van internet afgehaald.
Bij het openen van het workbook springt deze naar de betreffende datum van vandaag.

 

[schilderehbo]

Nee helaas allemaal foutmeldingen.

maar bedankt voor het mee denken

 

[edmoor]

Gebruik dit:

Private Sub Workbook_Open()
    Set c = Range("B8:BI8").Find(Date, , xlValues)
    If Not c Is Nothing Then Application.Goto Range(c.Address), True
End Sub

 

[schilderehbo]

Het werkt thanks.

 

[HSV]

Waarom spring je niet gelijk met c naar de datum @edmoor?

 

[edmoor]

Kan in dit geval inderdaad ook