Open workbook to todays date

[bsims15]

Hi All,

Need some help, i have a workbook which will have a schedule for machines over a year of dates, per sheet i need to be able to open this workbook to todays date rather than scrolling every day, ive tried a few VBA codes online but nothing has worked, below is a screen grab of the worksheet, any help would be appreciated!

If this could work to switch to the correct sheet when there are multiple years that would be great, if not i will create a new workbook for each year.


Capture.PNG

[AliGW]

Welcome to the forum.

I think this might be what you want: https://www.extendoffice.com/documen...rent-date.html

[bsims15]

Thank you, i think that got me half way there, when i open the workbook the correct cell is now selected, but it still only visibly opens row 1 rather than scrolling to the correct row, is that an extra bit of code required?

[AliGW]

I am sure someone will help you with that. Please post the code you have so far.

[bsims15]

Thanks, I used the code from the link provided.

Please Login or Register  to view this content.

Attachment 778522

[AliGW]

OK, but I was assuming you had changed it to suit your own situation. If not, that's fine.

[bsims15]

Sorry, I may not have been clear in my original message, i tried a few of the online codes, im not experienced in writing these codes, ive watched a few videos but nothing that explains in too much detail so i wouldn't be sure which parameters to change, that's why I came here looking for advice.

[k1dr0ck]

you need to have a worksheet named to the current year so that would be 2022 then try below

Please Login or Register  to view this content.

[CheeseSandwich]

you need to have a worksheet named to the current year so that would be 2022 then try below

Please Login or Register  to view this content.

You can swap the above line with the below if you want it to scroll the screen so that the date cell is top left of screen:

Please Login or Register  to view this content.

[bsims15]

Thanks both, I think its kind of working, i was hoping that each time i opened the file it would automatically take me to that cell rather than the last place it left off, is it possible for this script to auto run once the file is opened? it dosent seem to happen automatically when i open the file, unless im missing something.

[CheeseSandwich]

Place the code in the ThisWorkbook module and not a standard module. Then save close and open again.

The first line of the code makes the macro run on open:

Please Login or Register  to view this content.

[bsims15]

Thank you everyone, the code works great and now ive put it in the right module thing it works over the shared network too!

Really appreciate your guys help!

[AliGW]

If that takes care of your original question, please select Thread Tools from the menu link above and mark this thread as SOLVED.

Also, if you have not already done so, you may not be aware that you can thank those who have helped you by clicking the small star icon (* Add Reputation) located in the lower left corner of the post in which the help was given. By doing so you can add to the reputation(s) of all those who offered help.