ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Error 91 with IE object in Excel (https://www.excelbanter.com/excel-programming/348674-error-91-ie-object-excel.html)

mfq

Error 91 with IE object in Excel
 
I'm getting Error 91 inconsistently when I run my macro. Macro stops
when it reaches the "USERNAME" line. I've tried setting the object to
nothing at the end and also using a fully qualified name. None works.
Anybody have any ideas? Does this have something to do with the browser
object? (I'm using Excel 2000)

Here's my code:
'''''''''''''''''''''''''''''''''''''''''''''''''' START''''''''''''''''''''''''''''''''''''''''''''' '''''''''''''''
Public Sub FHLBSF()
Dim dFRC(1 To 13, 1 To 3) As Double
Dim ie As Object, ipf As Object, tmpWksht As Object
Dim dDuration As Double, PctDone As Double

' Prepare to open the web page
Set ie = CreateObject("InternetExplorer.Application")
ie.Visible = False

With ie
.navigate "https://member.fhlbsf.com/member/admin/login.asp?"
Do Until Not .Busy
DoEvents
Loop
End With

' INCONSISTENT ERROR 91 HERE
ie.document.all.Item("UserName").Value = sUName
' ERROR
ie.document.all.Item("Password").Value = sPW
ie.document.all.Item("submitButton").Click

ie.navigate sStandardVRCURL
Do Until Not ie.Busy
DoEvents
Loop

ie.ExecWB 17, 2
ie.ExecWB 12, 0

'Logout
With ie
Set ipf = ie.document.all.Item("menu5")
ipf.Click
End With

ie.Quit
Set ipf = Nothing
Set ie = Nothing
End Sub
'''''''''''''''''''''''''''''''''''''''''''''''''' END''''''''''''''''''''''''''''''''''''''''''''''' '''''''''''''


jaf

Error 91 with IE object in Excel
 
If I get a visit from the FBI for testing your code....

http://msdn.microsoft.com/library/de...gobjnotset.asp
The error you are getting (Object variable or With block variable not set)
means either sUName or does not have a "value"

You need to do some error checking before those lines run.

I don't know if your syntax is correct or not. ".value=" may not be correct
if the data is not numeric.


--
John
johnf202 at hot mail dot com


"mfq" wrote in message
ups.com...
I'm getting Error 91 inconsistently when I run my macro. Macro stops
when it reaches the "USERNAME" line. I've tried setting the object to
nothing at the end and also using a fully qualified name. None works.
Anybody have any ideas? Does this have something to do with the browser
object? (I'm using Excel 2000)

Here's my code:
'''''''''''''''''''''''''''''''''''''''''''''''''' START''''''''''''''''''''''''''''''''''''''''''''' '''''''''''''''
Public Sub FHLBSF()
Dim dFRC(1 To 13, 1 To 3) As Double
Dim ie As Object, ipf As Object, tmpWksht As Object
Dim dDuration As Double, PctDone As Double

' Prepare to open the web page
Set ie = CreateObject("InternetExplorer.Application")
ie.Visible = False

With ie
.navigate "https://member.fhlbsf.com/member/admin/login.asp?"
Do Until Not .Busy
DoEvents
Loop
End With

' INCONSISTENT ERROR 91 HERE
ie.document.all.Item("UserName").Value = sUName
' ERROR
ie.document.all.Item("Password").Value = sPW
ie.document.all.Item("submitButton").Click

ie.navigate sStandardVRCURL
Do Until Not ie.Busy
DoEvents
Loop

ie.ExecWB 17, 2
ie.ExecWB 12, 0

'Logout
With ie
Set ipf = ie.document.all.Item("menu5")
ipf.Click
End With

ie.Quit
Set ipf = Nothing
Set ie = Nothing
End Sub
'''''''''''''''''''''''''''''''''''''''''''''''''' END''''''''''''''''''''''''''''''''''''''''''''''' '''''''''''''




mfq1975

Error 91 with IE object in Excel
 
Hahaha - about the FBI comment although with the way things have been
developing in the news of late, it wouldn't be totally impossible.
Anyway, thanks for the site reference.



All times are GMT +1. The time now is 06:49 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com