Hi everyone,
i created 10 textboxes where when i enter data in one it calculate results in the others, what i wanted to do is when i enter the data in say text box one then it shifts the decimals points 4places, ie type in 12345 and when i press tab to go to next box then the result would be 1.2345
i tred something like this but obviously i am wrong

Private Sub OpenPrice_LostFocus()
Me.textbox.Text = Format(Me.OpenPrice.Text, "#,###")
End Sub