Solved: Goto a cell and ensure that cell is in the middle of the screen

I know that I can use Application.Goto to move to a named cell in a worksheet, but how can I ensure that the cell I go to is always displayed roughly in the middle of the screen regardless of screen size or resolution?

Thanks

Joe

Try this:

http://www.cpearson.com/excel/zoom.htm

Many thanks for such a neat solution