Shift data into empty cells?

I’ve got an order form that is populated by a long list of order choices (this list is external to the form). If a choice has any quantity entered it automatically enters the quantity and description in the order form e.g. =IF(A14>0,"0.220 dia Pilot, P/N 68009-2","") The only problem is that the form can end up with a lot of empty cells between parts ordered. What I want is for the form to shift all data (quantity and description) up so there are no empty cells between data.