VBA neumím, tak jsem zkusil použít Power Query. Na listu XML_vstup jsou načtená data z výše zmíněného odkazu.
na listu Výstup jsou data upravena a přeuspořádána a je použit Průřez plus jsem eliminoval data kde celní expirace je staršího data než Dnes (aktuální datum při otevření souboru)
Můžete zkusit jestli by vám to vyhovovalo, případně by šli udělat úpravy.
edit: nechce mi to nahrát soubor, zkusím později
dal jsem to na edisk https://www.edisk.cz/stahni/97198/celni-sazebnik-testpq-3.69-mb.html/citovat