VBA Copy Rows Based on Cell Number, Getting Error with Non-Integers

Question

I have this code to duplicate each line based on the value in Column O (if it is between 1 and 50).

 If ((VInSertNum > 1) And VInSertNum < 50 And IsNume