Gary Kjos
garykjos at gmail.com
Tue Nov 5 10:16:16 CST 2013
Sorry but you are way beyond my level of expertise Dale. Good luck figuring it out. GK On Sun, Nov 3, 2013 at 7:53 PM, Dale Kalsow <dkalsow at yahoo.com> wrote: > I anyone able to answer my question? > > Thanks in advance. > > Dale > > On Friday, November 1, 2013 2:54 PM, Dale Kalsow <dkalsow at yahoo.com> > wrote: > > I have written some code in vba in excel. The code opens a web site and > from data in the spreadsheet fills in the same web form from each row of > data. If the web form does not come back with any data, the vba code > closes it. However, if it does find some data, it is supposed to leave the > web form open. The leaving it open part is not working. Instead it throws > an error. Can anyone help me fix the error? The error is: Run-time error > '91': Object variable or With block variable not set. I am getting this > error in the following block of code > > i = 0: blnLoop = True: intI = objCollection.Length > While blnLoop > > MsgBox (objCollection(i).classname) > If objCollection(i).classname = "NoResultsSummaryText" > Then > IE.Quit > > blnLoop = False > End If > i = i + 1 > If i >= intI Then blnLoop = False > Wend > > specifically on the: If objCollection(i).classname = > "NoResultsSummaryText" Then > > line of code. > > Does anyone see how I can fix this? > > Thanks! > > Dale > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com/ > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com > -- Gary Kjos garykjos at gmail.com