Decimal when transferring data to userform

Hello,

Upon transferring the data from a worksheet to a userform. The currency value has dropped but also, the real value with all decimals dropped when I format the textbox value and add the pound sign.

What I would like to achieve is to keep the real cell value with all its decimal to the userform without loosing any decimal but, as I formatted on the worksheet, showing only 2 decimal.

These are the two codes I came up so far

Me.TextBox13.Value = editWks.Range("L17").Value

or

Me.TextBox13.Value = Format(editWks.Range("L17").Value, "£#,##0.0000")

[ can be reduced to "£#,##0.00" but then will loose the four decimal value if applicable]

As you can see from the result below, the currency is missing on the textbox next to the May 2018 and on the second, unless I have the four decimal displayed, because if I formatted it to 2 then the real value with 4 decimal will be gone. So that will create discrepancy in the calculation. (e.g. textbox next to Jan 2019).

I very much appreciate your help on this. Thank you.

example.PNG

Hi Norie,
Thank you for this. I think it did job.
Does it mean however that I have to do the same 'with' code for all 12 textboxes as per the image above or is there a better way of doing so?

Thanks. I will try that.

I've written something like this for all 12 textboxes but I think the syntax is incorrect. Would it be appropriate?

Private Sub cmdExtract_Click()

Dim i As Integer, j As Integer
 
    For i = 13 To 24
     With Me.TextBox & i
        For j = 15 To 37
        .Tag = editWks.Range("L" & "15+j").Value
        .Value = editWks.Range("L" & "15+j").Text
        Next
     End With
    Next
 
        Call GetRebateSum

End Sub

Thanks for everyone's help. It did work.