Convert TextBox.Value to Double into VBA (Excel 2013)

前端 未结 2 1082
后悔当初
后悔当初 2021-01-14 22:13

I have TextBox into my form, where user can input a value. In VBA I need to convert the value from string to double.

I\'m doing it like:

Private Sub          


        
2条回答
  •  南方客
    南方客 (楼主)
    2021-01-14 22:51

    CDbl expects already a number but if the textbox is empty then TextBox6.Value is an empty string. CDbl can't cast an empty string into a double.

    You can validate if the textbox is a numeric value first to avoid this

    If IsNumeric(TextBox6.Value) Then
        new_value = CDbl(TextBox6.Value)
    Else
        new_value = 0
    End If
    

    Alternatively the Val() function might be an option for you.

    new_value = Val(TextBox6.Value)
    

提交回复
热议问题