Extraction of multiple numbers within a long string in excel vba

Thank you very much Carim. Just one small thing: In the new version the rounding doesnt seem to work properly. 19 * 0.9 is now 171 instead of 17?

Edit: Nevermind, that seemed to be a local issue between "." and "," when entering the multiplier value.