Hmmmm,

I tried the code and got a VB run-time error.

Run-time error '424';

Object required

There error highlights the yellow line below.

Here is the code as I have it installed.

' TEST Macro
' Macro recorded 6/10/2011 by Don Flak
'
'
    Dim ie As Object
    Set ie = CreateObject("Internetexplorer.Application")
    ie.Visible = True
    ie.Navigate "
https://crpl.usps.gov/uspsedw/servlet/mstrWeb?evt=5005&src=mstrWeb.report.5005&mstrWeb=-EAGNMNTWEB12.Accounting.34952_&report=*-1.*-1.0.0.0&sortBean=*-1.*-1.0.0..0&frame=*-1.*-1.0.0.*0.0.*-1.*0.*0&deFormatEditor=*-1.*-1.1.1.0..1..0..&rb=0.0.8704360C11E08B8DA22600804F472779.OT.*-1.16779648.1.0.0.0.0.1.0*.0*.100*.20*.100*.20*.0.1-2574165611E095C899A300804F87A575.0.1.1.0.6.1234833824.0.100.2000.0.0.0..1.100.1.20.....*0.1_*0.*-1.*-1.0.*0.1.0.*0.2.1.1&dm=*-1.*-1.0.0.&deSaveAs=*-1.*-1.1.1.0.*0.0.0.*0.*0.*0.*0&deSaveAsFb=0.D43364C684E34A5F9B2F9AD7108F7828.*0.8.0.0-12288.2048_268453447.*-1.1.*0&reportGraph=*-1.*-1.0.0.&reportFT=*-1.*-1.0.0&GridAutoStyle=*-1.*-1.0.0..SelectedAutostyleID&vfep=*-1.*-1.0.0..0.0&deImport=*-1.*-1.1.1.0.1.1.30.2048%2C12288&5005=1
"
    newHour = Hour(Now())
    newMinute = Minute(Now())
    newSecond = Second(Now()) + 12
    waitTime = TimeSerial(newHour, newMinute, newSecond)
    Application.Wait waitTime
        For Each oHTML_Element In HTMLDoc.getElementsByTagName("Export")

            If oHTML_Element.Type = "submit" Then
                oHTML_Element.Click
                Exit For
            End If
        Next
    Set ie = CreateObject("Internetexplorer.Application")
    ie.Visible = True
    ie.Navigate "
https://crpl.usps.gov/uspsedw/servlet/mstrWeb?evt=5005&src=mstrWeb.report.5005&mstrWeb=-EAGNMNTWEB12.Accounting.34952_&report=*-1.*-1.0.0.0&sortBean=*-1.*-1.0.0..0&frame=*-1.*-1.0.0.*0.0.*-1.*0.*0&deFormatEditor=*-1.*-1.1.1.0..1..0..&rb=0.0.6DB80E8411E08B8EA22600804F370779.FLEX.*-1.16779648.1.0.0.0.0.1.0*.0*.100*.20*.100*.20*.0.1-62F2C30611E095C899A300804F17C778.0.1.1.0.6.1234833824.0.100.2000.0.0.0..1.100.1.20.....*0.1_*0.*-1.*-1.0.*0.1.0.*0.2.1.1&dm=*-1.*-1.0.0.&deSaveAs=*-1.*-1.1.1.0.*0.0.0.*0.*0.*0.*0&deSaveAsFb=0.D43364C684E34A5F9B2F9AD7108F7828.*0.8.0.0-12288.2048_268453447.*-1.1.*0&reportGraph=*-1.*-1.0.0.&reportFT=*-1.*-1.0.0&GridAutoStyle=*-1.*-1.0.0..SelectedAutostyleID&vfep=*-1.*-1.0.0..0.0&deImport=*-1.*-1.1.1.0.1.1.30.2048%2C12288&5005=1
"
    Set ie = CreateObject("Internetexplorer.Application")
    ie.Visible = True
    ie.Navigate "
https://crpl.usps.gov/uspsedw/servlet/mstrWeb?evt=5005&src=mstrWeb.report.5005&mstrWeb=-EAGNMNTWEB12.Accounting.34952_&report=*-1.*-1.0.0.0&sortBean=*-1.*-1.0.0..0&frame=*-1.*-1.0.0.*0.0.*-1.*0.*0&deFormatEditor=*-1.*-1.1.1.0..1..0..&rb=0.0.597B42BE11E08B8FA22600804FA7E575.SDO.*-1.16779648.1.0.0.0.0.1.0*.0*.100*.20*.100*.20*.0.1-F0D9FC5C11E095C899A300804FB7077A.0.1.1.0.6.1234833824.0.100.2000.0.0.0..1.100.1.20.....*0.1_*0.*-1.*-1.0.*0.1.0.*0.2.1.1&dm=*-1.*-1.0.0.&deSaveAs=*-1.*-1.1.1.0.*0.0.0.*0.*0.*0.*0&deSaveAsFb=0.D43364C684E34A5F9B2F9AD7108F7828.*0.8.0.0-12288.2048_268453447.*-1.1.*0&reportGraph=*-1.*-1.0.0.&reportFT=*-1.*-1.0.0&GridAutoStyle=*-1.*-1.0.0..SelectedAutostyleID&vfep=*-1.*-1.0.0..0.0&deImport=*-1.*-1.1.1.0.1.1.30.2048%2C12288&5005=1
"
End Sub



On Mon, Jun 13, 2011 at 2:08 AM, Rajan_Verma <rajanverma1...@gmail.com>wrote:

>  \Hope it will help you
>
>
>
>             For Each oHTML_Element In
> HTMLDoc.getElementsByTagName("Export")
>
>
>
>                                                             If
> oHTML_Element.Type = "submit" Then
>
>
> oHTML_Element.Click
>
>
> Exit For
>
>                                                             End If
>
>            Next
>
>
>
>
>
> *From:* excel-macros@googlegroups.com [mailto:
> excel-macros@googlegroups.com] *On Behalf Of *Don Flak
> *Sent:* Saturday, June 11, 2011 5:36 PM
> *To:* excel-macros@googlegroups.com
> *Subject:* Re: $$Excel-Macros$$ Macro to navigate through a Java Web-Page
> Options
>
>
>
> No, but the site does acquire my login credentials through the workstation.
>  We utilize a single sign on, so when I log on to my work station, it
> maintains my credentials and permits access to several internal servers.  As
> I said, I don't have a problem with the code I wrote that gets me to the
> page and the report I need, I simply can't get over the last hurdle and
> "click" the export button.
>
>
>
> Thanks,
>
> Don
>
> On Sat, Jun 11, 2011 at 12:53 AM, Rajan_Verma <rajanverma1...@gmail.com>
> wrote:
>
> Is it HTTPS:// site?
>
> -----Original Message-----
> From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com]
> On Behalf Of Don
> Sent: Saturday, June 11, 2011 12:18 AM
> To: MS EXCEL AND VBA MACROS
> Subject: $$Excel-Macros$$ Macro to navigate through a Java Web-Page Options
>
>
> I have to log onto our corporate reporting portal, click through
> several folders, execute data queries, export the data to a .csv file
> and then run some reports from that data.
>
> I have the code written to get to the the web-apge I need, and
> prepare
> the report for exporting.
>
>
> There is a button at the bottom of the page that simply is titled
> Export but it is a java enabled button.
>
>
> I need the code that would in essence, click the button and start the
> export.
>
>
> Any suggestions would be greatly appreciated.
>
>
> I can't post a link to the site because it is an internal, secured
> site.
>
>
> Thanks
>
>
>
>
> --
>
> ----------------------------------------------------------------------------
> ------
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/discussexcel
>
> --
>
> ----------------------------------------------------------------------------------
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/discussexcel
>
>
>
> --
> ----------------------------------------------------------------------------------
>
>
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/discussexcel
>
>   --
>
> ----------------------------------------------------------------------------------
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/discussexcel
>

-- 
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/discussexcel

Reply via email to