If cell A1 is greater than B1, cut and paste row to first empty row with macro?

Question

I have tried to sew together some macros but I can not make it work. What I am trying to accomplish, with a button, is:

If cell in column I1-I14 is greater than cell