Hi,
Try this code
dim dtDate as Date
dtDate = Thisworkbook.Names("IDO_Date"").RefersToRange.Value
for i = 2 to Sheets.count
sheets(i).select
if date(Range("B2").value)=dtdate then
Exit For
end if
Next
On May 19, 7:44 pm, Doug <[email protected]> wrote:
> Hello,
> I have a workbook with a separate page for each date. The date is
> always in cell B2. On the first page of the workbook I want to enter
> the date into a cell named "IDO_Date" and click on a button to go to
> the worksheet for that date. Can someone please show me the easiest
> code to assign to the button to do this?
>
> Thanks.
--~--~---------~--~----~------------~-------~--~----~
-------------------------------------------------------------------------------------
Some important links for excel users:
1. Excel and VBA Tutorials(Video and Text), Free add-ins downloads at
http://www.excelitems.com
2. Excel tutorials at http://www.excel-macros.blogspot.com
3. Learn VBA Macros at http://www.vbamacros.blogspot.com
4. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to [email protected]
If you find any spam message in the group, please send an email to:
Ayush Jain @ [email protected] or
Ashish Jain @ [email protected]
-------------------------------------------------------------------------------------
-~----------~----~----~----~------~----~------~--~---
