Excel VBA Convert Text String to Number


Convert String to Integer
MsgBox CInt("7.55")
MsgBox CLng("13.5")

Debug.Print "13.5" + "13.5"

Sub Using_Variables()
  Dim valueOne As String
  valueOne = 5
  MsgBox CLng(valueOne) + CLng(valueOne)
End Sub

Convert String to Decimal
MsgBox CDbl("9.1819")
MsgBox CDec("13.57") + CDec("13.4")

Convert String to Currency
ange("A1").Value = CCur("18.5")

 

REF:

https://www.automateexcel.com/vba/convert-text-string-to-number/

 

VBE2019,Rubberduck:Excel VBA 的插件。

 

posted @ 2020-06-07 17:44  emanlee  阅读(777)  评论(0编辑  收藏  举报