VBA formating excel change for example: 18D00132 to 1.8E+133

[vlado23]

Hello Friends,
I put to vba this:

Sub BehProgramu()
test = IsNumeric(786)
test = IsNumeric("Tech on the Net")
test = IsNumeric("234")
test = IsNumeric(18D00132)
End Sub

And when I click enter the last row is transfored to expon. format, why is excel doing this ?
Sub BehProgramu()
test = IsNumeric(786)
test = IsNumeric("Tech on the Net")
test = IsNumeric("234")
test = IsNumeric(1.8E+133)
End Sub

 

[MartyS]

Hello Friends,
I put to vba this:

Sub BehProgramu()
test = IsNumeric(786)
test = IsNumeric("Tech on the Net")
test = IsNumeric("234")
test = IsNumeric(18D00132)
End Sub

And when I click enter the last row is transfored to expon. format, why is excel doing this ?
Sub BehProgramu()
test = IsNumeric(786)
test = IsNumeric("Tech on the Net")
test = IsNumeric("234")
test = IsNumeric(1.8E+133)
End Sub

If you want 18D00132 to be a string, it has to be enclosed/encapsulated within quotation marks


test = IsNumeric("18D00132")


Without question marks, it is treated as a number automatically... The fact there is a letter D in there is irrelevant because clever VBA editor looks at what you've entered and says "Ah.. is this a HEXADECIMAL number?"

Hexadecimal numbers can and do contain letters up to F (see: https://simple.wikipedia.org/wiki/Hexadecimal_numeral_system)

test = IsNumeric(18D00132) is being converted into a Hexadecimal number!

Try changing the D to Z and see what happens!


test = IsNumeric(18Z00132)


Here, VBA throws an exception because it's looking at what you've entered.. assuming its a NUMBER (because no quotation marks) and then saying "but Hexadecimal only goes up to F... what is a Z in a number??? ERROR!!!


Hope that helps explain!