csv table download from URL wit sporadic problem with comma delimiter

Hi
I have been trying to automate a csv table download into excel from a url (US Treasury) which works when done manually and was working for a while using the below VBA. Now however, it has decided that it doesn't want to recognise the comma delimiter and is dumping everything into just the one column. The code and url are included below and I would very much appreciate anyone who might point out where I may have erred, as I'm currently flummoxed on what I original thought was a relatively simple script!

Please Login or Register  to view this content.

Hi
are you still using XL2010 ? If not please amend your profile accordingly.
This being said, wouldn't it be easier to achieve using Power Query ? I can't help for the moment, but it's worth looking into.