Go to a cell from a drop down list

[Turkish04]

2nd Post, First one was solved at the first time of asking. Very happy man.

I have a sheet will a full years date starting at 01-Jan to 31-Dec in Range G3:NH3

What I would like is to have a Drop Down list with all dates in and then once the required date is selected go to the selected date in the sheet

Any help would be very much appreciated!

[NeedForExcel]

Assuming your drop down is in Cell B3,

Put this on the worksheet module -

Please Login or Register  to view this content.

and this on a normal module

Please Login or Register  to view this content.

See the file attached.

[Turkish04]

This looks like it is exactly as I want but the list is in a merged cell c1/d1. what would I need to change in the code to make this happen please?

[NeedForExcel]

This looks like it is exactly as I want but the list is in a merged cell c1/d1. what would I need to change in the code to make this happen please?

Unmerge your cell!

Merged cells cause a lot of issues and are not recommended..

[Turkish04]

I still can't get it to work. I have unmerged the cell so it is now in c1 but it wont jump to the cell.

Any ideas?

[NeedForExcel]

Can you attach the file?

[Turkish04]

Hi NeedForExcel,

For some reason it won't allow me to attach anything. I think it may be restrictions with my pc at work.

It is exactly what I am after but the drop down list is now in c2. Is the drop down list created by data validation? the date range has also altered to F3:NG3.

I will try to attach the file at home later but my laptop is issued through my work so I may encounter a similar issue.

Any help would be appreciated!

[NeedForExcel]

Is the drop down list created by data validation?

Yes! It is a Data Validation List

[Turkish04]

Hi NeedForExcel,

I have got it to work apart from the automatic go to part. I have to call for the macro to run for it to execute.

Any ideas

[NeedForExcel]

Can you paste your code for the GoTo part?

[Turkish04]

I copied your code and have changed the cell ref so it is as follows

Sub GoToDate()
Cells(3, Application.WorksheetFunction.Match(Range("C2"), Range("F3:NG3"), 0) + 6).Activate
End Sub

[NeedForExcel]

Try changing + 6 to + 5 and see if that works.

And how are you trying to attach the workbook? Using the Paperclip icon?

[romperstomper]

Did you change the change event code to use:

Please Login or Register  to view this content.

and did you put the change event in the worksheet code module?

[NeedForExcel]

Oh yes! He has a point there.. I just assumed you did! But did you, actually?

Did you change the change event code to use:

Please Login or Register  to view this content.

and did you put the change event in the worksheet code module?

[Turkish04]

Yes, for some reason it doesn't give me the option to attach.

I have part resolved it by placing a button next to the drop down with the macro assigned so I am happy with that. I changed the +6 to +5 but that didn't resolve it.

If you have any further ideas let me know. I really appreciate it.

Just started a new job and its making me look half intelligent!

[Turkish04]

I had changed the target address but for some reason it was a lower case c. I have changed it to a capital and it works!!!

Thank you

[NeedForExcel]

I had changed the target address but for some reason it was a lower case c. I have changed it to a capital and it works!!!

Thank you

Glad we could help! Drop by if you need any help further.. Thank you for the rep

Cheers!