Re: Web Query

Tech-Archive recommends: Repair Windows Errors & Optimize Windows Performance

I did what you wrote, but there are two problems:

1. It only open a google page, but does not search anything, nor import the
info to excel.
2. An error message comes up saying: Runtime error 2147467259 (80004005)'
Method 'Busy' of
object 'Iwebbrowser2' failed
and this line is highlighted when I press debug:

Do Until .ReadyState = READYSTATE_COMPLETE And Not .Busy

Thanks for your help, but please try to help me further, until we get this
thing done.

Thanks again.

"ron" wrote:

On Sep 3, 1:30 pm, art <a...@xxxxxxxxxxxxxxxxxxxxxxxxx> wrote:
now it tells me the problem is "Worksheet". I tried putting a ' before
worksheet as well, but then other problems come up. Can you please help me
clear out this problem, or tell me any easy way to be able to make a web
query to search fot the zip code that will be in cell A1?



"dustinbrearton via OfficeKB.com" wrote:
The words Submit button should be commented. Web browsers don't really allow
you to copy info the way it was typed. Just put a ' before the words submit
button and re-run.
art wrote:
It tells me there is an error "sub or finction not defined". And it
highlights the words "submit Button". Do you know what's the problem?

Thanks.

Where should I paste it in? In "Sheet1" or in "ThisWorkBook"? And what should
I do afterwards? Thanks for your help.
[quoted text clipped - 58 lines]
Next copy/paste the code from above into the module between Sub and
End Sub. Then, just run the macro...Ron

--
Message posted viahttp://www.officekb.com- Hide quoted text -

- Show quoted text -

Art...When I pasted my code into this newsgroup, the Google format
editor unfotuneately broke the text in a manner that, as you noted,
will create errors. Dustin's response is correct in terms of how to
remedy the problem. More completely the following lines need to be
adjusted

' Make the desired selections on the Login web page and click the
submit button

should appear all on one line in your code as

' Make the ......... the submit button
----------------------------------------------------------------------------------------

' Copy the entire web page and then paste it as text into the
worksheet

also place this all on one line as

' Copy the entire .......... into the worksheet
--------------------------------------------------------------------------------------------

ActiveSheet.PasteSpecial Format:="Text", Link:=False,
DisplayAsIcon:=False

also place this all on one line as
note: no apostrophe at the beginning of this line

ActiveSheet.PasteSpecial ....... =False, DisplayAsIcon:=False


Now try running the code, it should work. Let me know how it
goes...Ron

.

Relevant Pages

  • Re: djgpp on 386
    ... I don't even honestly know what Google Pages ... years ago some people mentioned making a small DJGPP distro (e.g. ... really care. ... I don't know whether DOS users are just anarchists, lazy, or just busy ...
    (comp.os.msdos.djgpp)
  • Re: Ahem. Wheres Roy?
    ... >> Dave is busy with some new clients and making sites. ... > He should hire me then (although actually I am very busy too. ... The sitemap submitted to ... Google hasn't even fixed it and it states that of course the Googlebot is ...
    (alt.internet.search-engines)
  • Re: seo uk
    ... >obvious one is a search for "search engine" which google highlights the ... >the site content for search terms like "gym equipment" and highlights ... as a keyword - then you should've put a hyphen between it and ratz. ...
    (alt.internet.search-engines)
  • Re: Photos / When the Mob ran Vegas
    ... all my posts are available in Google. ... Chuck then used to trash Berman. ... Would you answer the hotel vs. hotel, ... CTFF is too busy with a lawsuit. ...
    (alt.vacation.las-vegas)
  • Re: Whos in charge here?
    ... again in the Google search)." ... over the newsgroup. ... If you can provide any assistance please contact me. ... The phone's always busy. ...
    (rec.sport.football.college)