• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

EEN Knop om naar de datum van vandaag te gaan

Status
Niet open voor verdere reacties.

jelleruben

Gebruiker
Lid geworden
11 nov 2006
Berichten
435
Hallo Allemaal,

Ik heb een Excel lijst waar de datums voor zijn gevuld (tot 24 juni 2026). Nu zou ik graag een knop boven aan de lijst willen hebben
als ik daar op druk dat hij naar de datum van vandaag gaat.

Ik heb elkder op het form wel een VBA code gevonden maar deze werk op mijn bestand niet.


Code:
Sub Vandaag()
Range("D5").Select
Datum = Date - Range("D5").Value
ActiveWindow.SmallScroll Down:=Datum
End Sub

Hoe moet ik deze code aanpassen om wel te werken?
 

Bijlagen

  • NaarDatum.xlsm
    90,1 KB · Weergaven: 11
Probeer deze eens:
Code:
Sub Vandaag()
    Set c = Range("D:D").Find(Date)
    If Not c Is Nothing Then Application.Goto c
End Sub
 
Laatst bewerkt:
Of dit...
Selecteer een datum en klik...
 

Bijlagen

  • NaarDatumMV.xlsm
    89,9 KB · Weergaven: 17
Super dat was een snelle antwoord, het werkt nu, heel erg bedankt voor je snelle reactie...
 
Laat even weten welke optie je gebruikt...Daar leren wij ook van.
 
@ mvdvlistm,

Ik had mijn reactie reeds geven, en toen kwam jou bericht. Maar die ga ik ook zeker eens bekijken. Ben benieuwd
 
Die plaatst de huidige datum en tijd in de actieve cel.
Dat is niet wat je vroeg.
 
Super dat was een snelle antwoord, het werkt nu, heel erg bedankt voor je snelle reactie...

Dat is volgens mij een reactie op post 2 van Edmoor.
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan