So quick sample of data :
B74
B74
9
94
1
948
B74

So if I have this data in a column you notice they have different lenght.
Now I want my macro to add leading zeros until the length of all occurrences is 4.

I know for numbers you can do a range.numberformat = "0000"
But this won't work for B74 because (obviously) it will not be recognized as a number.

I know in a formula you can do it with the command TEXT.
However I do not want to create extra columns I want something to alter it in place just like the numberformat does
but then for numbers and text.
Thanks!