<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=us-ascii">
<META NAME="Generator" CONTENT="MS Exchange Server version 5.5.2653.12">
<TITLE>OT: Excel Goto method</TITLE>
</HEAD>
<BODY>
<P ALIGN=LEFT><FONT SIZE=2 FACE="Arial">Any Excel gurus out there who can tell me why this:</FONT></P>
<P ALIGN=LEFT><FONT SIZE=2 FACE="Arial">oApp.Goto Reference:=shtCurr.Range("qryF1")</FONT></P>
<P ALIGN=LEFT><FONT SIZE=2 FACE="Arial">would return an</FONT> <FONT SIZE=2 FACE="Arial">'</FONT><FONT SIZE=2 FACE="Arial">Application-defined or object-defined error</FONT><FONT SIZE=2 FACE="Arial">'</FONT><FONT SIZE=2 FACE="Arial">??</FONT></P>
<P ALIGN=LEFT><FONT SIZE=2 FACE="Arial">TIA</FONT></P>
<P ALIGN=LEFT><FONT SIZE=2 FACE="Arial">Roz</FONT></P>
<P ALIGN=LEFT><FONT SIZE=2 FACE="Arial">(</FONT><FONT SIZE=2 FACE="Arial">PS</FONT> <FONT SIZE=2 FACE="Arial">the full code is</FONT></P>
<P ALIGN=LEFT><FONT SIZE=2 FACE="Arial"> Set oBook = GetObject("I:\IT\Systems Dev\Jobs\821GFGMIS\BBS Format UKI Donns.xls")</FONT></P>
<P ALIGN=LEFT><FONT SIZE=2 FACE="Arial"> Set oApp = oBook.Parent</FONT></P>
<P ALIGN=LEFT><FONT SIZE=2 FACE="Arial"> Set shtCurr = oBook.Sheets(Format(Forms!frmGreenFlag!txtBeginningDate, "mmmm"))</FONT></P>
<P ALIGN=LEFT><FONT SIZE=2 FACE="Arial"> </FONT></P>
<P ALIGN=LEFT><FONT SIZE=2 FACE="Arial"> oApp.Goto Reference:=shtCurr.Range("qryF1")</FONT></P>
<P ALIGN=LEFT><FONT SIZE=2 FACE="Arial">with qryF1 being a single-cell range which exists on all the sheets in the workbook</FONT><FONT SIZE=2 FACE="Arial">.</FONT><FONT SIZE=2 FACE="Arial">)</FONT></P>
</BODY>
</HTML>