Do you have another Sub or Function called xlFillList ? That appears to be missing in the code you posted.
If you don't have that macro, you could try a more direct method, assuming the userform is contained in the workbook where the data is sitting.
Me.CaliberComboBox.RowSource="Sheet1!A1

10"
or
Me.CaliberComboBox.RowSource="Caliber"