Macro - check name and then insert blank row

Hello,

Would appreciate any help on below.

I need a macro that would insert a blank row after each unique entry.

To illustrate imagine following data:

John
John
John
Chris
Chris
Joe


I want macro to automatically insert a row after 'last' John, last Chris and Joe.


Would very much appreciate any response.

Thanks!