How to insert row with increased value after every unique value in column

[sonic911]

Hello from vba newbie

I have table with 2 columns:
It looks like this:

reason code

accident A20
accident A21
accident A30
accident-fake A20.0
fake B30

What I need - is just insert values from 0 to 9 to every unique value in column "code".
f.e. for A20 - I need to insert 9 rows from 1 to 9, because A20.0 exists.