Macro not working after adding date picker

I downloaded the attached macro and made some modifications to suit myself. The macro has stopped working after adding a date picker to select delivery date.  Please help with debugging as I don't have much vb knowledge.

SolidworksApi macros