Здравствуйте, подскажите пожалуйста как можно при инициализации формы в Texbox получить десятичное число через запятую, а не через точку. Например если я ввожу число в Texbox "2,5", то он заносит в ячейку как "2,5", но когда форма перезагружается то получаю "2.5", или если будит например целое число "5" то получить "5", а не "5,0"
так ввожу число
| Код |
|---|
Private Sub TextBox1_Change()
ActiveCell.Range("A1").Offset(0, 10).Value = Val(Replace(Me.TextBox1, ",", "."))
ActiveCell.Range("A1").Offset(0, 10).NumberFormat = "0.0"
End Sub |
так получаю
| Код |
|---|
Private Sub UserForm_Initialize()
Me.TextBox1 = ActiveCell.Range("A1").Offset(0, 10)
End Sub |