Importing Non-Table Data

[ercedwards]

I use a web site to monitor when my son gets dispatched on a fire call

[FONT=Verdana,Arial,Tahoma,Calibri,Geneva,sans-serif]https://www.toronto.ca/community-people/public-safety-alerts/alerts-notifications/toronto-fire-active-incidents/

I have a macro that works fine on my Windows 8 computer but not on Windows 10 and no one in the world seems to have an answer as to why although lots of people have the same issue. The infamous 8150002e run-time error.

The real data I want from this web site is NOT in a table so using Web Query is not an option. The real data is <td> and <tr> objects on the web page.

Does anyone know of a way to grab this data in VBA and drop it into Excel?

Thanks
[/FONT]

 

[ercedwards]

Thanks much.

I'll do that tomorrow and play with it. I'm 72 and now need my afternoon nap.

Cheers

 

[sandy666]

You are wecome

Have a nice nap

 

[sandy666]

what about extended version with more information?

[Table="width:, class:head"]
[tr=bgcolor:#FFFFFF][td=bgcolor:#70AD47]

Index​

[/td][td=bgcolor:#70AD47]

Prime Street​

[/td][td=bgcolor:#70AD47]

Cross Street​

[/td][td=bgcolor:#70AD47]

Dispatch Time​

[/td][td=bgcolor:#70AD47]

Now​

[/td][td=bgcolor:#70AD47]

Duration​

[/td][td=bgcolor:#70AD47]

Incident Number​

[/td][td=bgcolor:#70AD47]

Incident Type​

[/td][td=bgcolor:#70AD47]

Alarm Level​

[/td][td=bgcolor:#70AD47]

Area​

[/td][td=bgcolor:#70AD47]

Area Description​

[/td][td=bgcolor:#70AD47]

Count Units​

[/td][td=bgcolor:#70AD47]

Dispatched Units​

[/td][/tr]

[tr=bgcolor:#FFFFFF][td=bgcolor:#E2EFDA]

1​

[/td][td]ROCHESTER AVE, NY[/td][td=bgcolor:#E2EFDA]ST IVES AVE / MILDENHALL RD[/td][td]

07/03/2019 19:22:10​

[/td][td=bgcolor:#E2EFDA]08/03/2019 02:27[/td][td]

0.07:04:53​

[/td][td=bgcolor:#E2EFDA]F19025182[/td][td]Fire - Residential[/td][td=bgcolor:#E2EFDA]

6​

[/td][td]

131​

[/td][td=bgcolor:#E2EFDA]3135 Yonge Street[/td][td]

64​

[/td][td=bgcolor:#E2EFDA]R134, P131, A131, C13, P121, R122, LA114, A321, R321, S313, P123, P125, C31, HZ332, P311, C10, CMD10, CMD10C, HZ332, C34, A135, P114, P132, T114, P312, R341, C11, P116, REHAB01, C30, C9, P116, LA231, BOX12, T114, P322, R341, C11, P132, P244, P314, R235, R421, LA333, A324, P325, C42, P233, P313, C14, C24, P232, R243, P344, P441CA, C2, C23, P422, P445, P426, P221, P226, P433, P331[/td][/tr]

[tr=bgcolor:#FFFFFF][td=bgcolor:#E2EFDA]

2​

[/td][td]M9P[/td][td=bgcolor:#E2EFDA][/td][td]

08/03/2019 02:09:46​

[/td][td=bgcolor:#E2EFDA]08/03/2019 02:27[/td][td]

0.00:17:17​

[/td][td=bgcolor:#E2EFDA]F19025265[/td][td]MEDICAL[/td][td=bgcolor:#E2EFDA]

0​

[/td][td]

443​

[/td][td=bgcolor:#E2EFDA]1724 Islington Avenue[/td][td]

1​

[/td][td=bgcolor:#E2EFDA]P443[/td][/tr]

[tr=bgcolor:#FFFFFF][td=bgcolor:#E2EFDA]

3​

[/td][td]UXBRIDGE AVE, TT[/td][td=bgcolor:#E2EFDA]LN S DAVENPORT W UXBRIDGE / DAVENPORT RD[/td][td]

08/03/2019 02:21:07​

[/td][td=bgcolor:#E2EFDA]08/03/2019 02:27[/td][td]

0.00:05:56​

[/td][td=bgcolor:#E2EFDA]F19025266[/td][td]Alarm Residential[/td][td=bgcolor:#E2EFDA]

0​

[/td][td]

423​

[/td][td=bgcolor:#E2EFDA]358 Keele Street[/td][td]

5​

[/td][td=bgcolor:#E2EFDA]R423, A423, C42, P342, R345[/td][/tr]
[/table]