Data Gathering VBA (basic)

[wyldjokre69]

Hello,

Would someone take a gander at the following VBA program and tell me where I'm going wrong. There are two strings one for "src" and one for "href". I can get them both working individually, but when I try to connect them to save space, I get a 'run time error'. Here is the code:

Please Login or Register  to view this content.

3rd line from the bottom, is where I get my error. Any help would be appreciated.

CheerZ!
Aaron

[Tinbendr]

If InStr(the_url, Chr(34)) - 1) is 0 or false, it will error out.

You'll have to test for false first

Please Login or Register  to view this content.

You'll have trouble at the loop test, too. Ampersand concatenates, while you probably want to add those together.

Please Login or Register  to view this content.

[MarvinP]

Hi,

In your code of:
If start_of_src & start_of_href > 0 Then

I think this should fail. How about something like

If start_of_src >0 AND start_of_href > 0 Then

See what that does ..

[6StringJazzer]

Your Mid functions probably won't work the way you expect them to either, because you are here again using "&". No idea what your intention is there.

Please Login or Register  to view this content.

Also, as a new user please take the time to read all the rules. There aren't very many and they are important:

Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code.

Posting code between [CODE]Please [url=https://www.excelforum.com/login.php]Login or Register [/url] to view this content.[/CODE] tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here



(This thread should receive no further responses until this moderation request is fulfilled, as per Forum Rule 7)

[wyldjokre69]

Thanks Tinbendr, I will give your solution a try. Sorry for not following the rules of this forum. My bad.

If InStr(the_url, Chr(34)) - 1) is 0 or false, it will error out.

You'll have to test for false first

Please Login or Register  to view this content.

You'll have trouble at the loop test, too. Ampersand concatenates, while you probably want to add those together.

Please Login or Register  to view this content.

[wyldjokre69]

Thank you Tinbendr, your suggestion worked, didn't have to put in false tho'. Thankx again.