Clean and Trim Not Working

I have a series of numbers which have spaces at the end, which I need to remove. I started by running a 'Trim' macro over the numbers but this didn't remove the spaces, so I assumed there must be special characters after the numbers, so I then tried running a 'Clean' macro over the numbers, followed by the 'Trim' Macro, but this still doesn't remove the extra spaces after the numbers.

Can anyone identify what the problem is? Both Macros are included in the attached workbook.

Is it simply the case that the 'Clean' macro isn't cleaning the string, if so, how can I adapt this to remove any special characters? Also, how do I tell there are special characters there in the first place?

Is there an easy way to then combine the two macros so that it first cleans and then trims?

Many thanks