Kopiering af tal startende med 0 Userform tekstboks

Hej

Jeg har en tekstboks i en Userform, hvortil jeg kopierer værdien af 6. kolonne i en variabel række.

Private Sub Userform_Activate()

Dim lRow As Variant
lRow = ActiveCell.Row
Me.TxtVarenr = Cells(lRow, 6)

End Sub


Fra userform tager jeg denne værdi og nogle brugerindtastninger og indsætter disse i et andet ark.

Mit problem består i at nogle at de værdier jeg tager er tal, der starter med 0 eks. 012345. Når jeg indsætter dette i Userformen står dette korrekt som 012345. Men når jeg tager værdierne fra userform og indsætter disse i det andet ark, stå værdien nu som 13245.

    Range("A" & Lastrow30).Select
    ActiveCell.Value = Me.TxtVarenr.Value
   
    Range("B" & Lastrow30).Select
    ActiveCell.Value = Me.TxtDato.Value

    Range("C" & Lastrow30).Select
    ActiveCell.Value = Me.TxtKommentar.Value

Er der nogen, der kan hjælpe mig med mit problem