Open and activate based on values in a cell

[AndyD]

Hi
need code to open a workbook based on a cell value
eg is A1 cell value is "Dave" then macro opens "Dave.xls", etc

Also to activate based on same selection

Instead of windows("Dave.xls").activate , need Windows("activate whatever cell value of A1 is).activate

many thenks
Andy

 

[Andrew Poulsom]

Try:

Workbooks.Open Range("A1").Value
Windows(Range("A1").Value).Activate

I think if you open a workbook it becomes active, so you probably don't need the second line.

Or you could use a Hyperlink in cell A1.