Hi All

We use a fair few numbers with a leading zero - enters OK in a UserForm
textbox Tb1, however it always drops it on entering the cell on the sheet. Is
there anyway to retain the format of a leading zero. The code for the row
source is below.

Range(Me.Lb1.RowSource).Resize(1, 1).Offset(Me.Lb1.ListIndex, 3) =
Me.Tb1.Value
--
Many thanks

hazel