hallo,

ik heb hier een excel bestand met in kolom A kalenderdagen.
nu zou ik graag hebben dat wanneer je excel bestand opent dat de datum van 'vandaag' geselecteerd is en in het midden van het scherm komt;)
dus al je bv het bestand heb opgeslaan als je de cel in bv augustus heb geselecteerd. dat die opent met de cel van 23maart (vandaag dus).
hoe kan ik dat doen? is dit met macro ofzo? daar ken ik nog niet genoeg van:rolleyes:

alvast bedankt:good:

http://www.eenmanierom.nl/microsoft-excel-openen-met-een-specifiek-werkblad-of-cel-actief/

Als je in de cel =vandaag() intikt heb je altijd de huidige datum. Met celeigenschappen kan je het weergaveformaat kiezen.

Als je in de cel =vandaag() intikt heb je altijd de huidige datum. Met celeigenschappen kan je het weergaveformaat kiezen.
dat weet ik
maar het is dus de bedoeling om een excel bestand te openen met daarin reeds 365 dagen in datum vorm(kolom A) te openen op de datum van die dag zonder te scrollen naar de datum van die dag.

@g_man
kan dit progje niet echt installeren op de PC van het werk,geen bevoegdheid dus zal het met een macro moeten denk ik


nog iemand ideën??

En met de invoer 'vertikaal zoeken'? Ben al te lang weg uit Excel om er nog heel veel van te weten, maar met zoeken en als-functies kom je toch nog wel ergens.

En met de invoer 'vertikaal zoeken'? Ben al te lang weg uit Excel om er nog heel veel van te weten, maar met zoeken en als-functies kom je toch nog wel ergens.

kun je dan die functies toepassen in een macro? zoja dan kan ik zoeken "naar vandaag()" maar ik weet niet goed hoe je die macro dan laat starten als je het bestand opend

damm khad gehoopt op een voorbeeldje :p

toch bedankt

we blijven zoeken

Als je in cel A1 (of ergens anders maar dan moet "Range("A1")" in macro veranderen naar de juiste cel)

volgende formule in cel A1 =VANDAAG()
dan moet het lukken met volgende macro
Sub Auto_Open()
Cells.Find(Sheets("blad1").Range("A1"), , LookIn:=xlFormulas, LookAt:=xlPart).Activate

End Sub

Als je in cel A1 (of ergens anders maar dan moet "Range("A1")" in macro veranderen naar de juiste cel)

volgende formule in cel A1 =VANDAAG()
dan moet het lukken met volgende macro
Sub Auto_Open()
Cells.Find(Sheets("blad1").Range("A1"), , LookIn:=xlFormulas, LookAt:=xlPart).Activate

End Sub
daar ben ik al iets blijer mee,
maar in A1 staat niet"= vandaag()" maar enkel dus de datumnotatie dus" 01/01/2012" en A2 "02/01/2012".........
dus als ik die excel open zou hij zonder scrollen naar de dag van vandaag gaan.

alvast bedankt;)

je moet ergens in je excel de formule =vandaag() zetten (want morgen is een andere vandaag dan vandaag :lol: )
ik dit gedaan in A1 maar mag ook in een ander cel zijn (in de macro wordt naar deze cel verwezen)
dus als je de formule in een andere cel zet in macro, "Range("A1")", veranderen naar "Range("uw cel")"

ook even nazien dat uw werkblad dezelfde naam heeft in de macro
(Sheets("blad1"). veranderen naar (Sheets("uw werkblad naam").

FYI,
Als je een macro opneemt en je geeft deze de naam Auto_Open dan start deze macro automatisch bij het openen van je excel

OPGELET,
dit alles is vanaf versie 2007 bij eerder versie moet je een ander macro gebruiken.

werkt perfect, ik moest dus wel de excel opslaan "met macro's" anders werkt dat niet hé ;p

nogmaals bedankt

hier mag slotje op :good: