How to convert 10.23 to 1023 by suppressing DECIMAL POINT using VBA.

[xlhelp15]

Hello Experts,


Could you please help me for the below request ?


I need to convert all the decimal values into numbers like below,


if user type 10.23 it needs to change 1023. I have tried it using Format -> Numbers, unfortunately unable to achieve the desired result.

Thanks.

 

[JoeMo]

What do you want to happen if the user enters an integer like 10? Do you want to change it to 1000? And what about 10.12345?

 

[xlhelp15]

Yes, absolutely. if user enters an integer like 10 it needs to change as 1000. There are only 2 digits after the decimal point. so user will not key 10.12345, Joe. Thanks much you quick response.

 

[Scott Huish]

This assumes Column A, change as necessary:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim c As Range, d As Range
Set d = Intersect(Range("A:A"), Target)
If d Is Nothing Then Exit Sub
Application.EnableEvents = False
For Each c In d
    If IsNumeric(c) And c <> "" Then c = c * 100
Next
Application.EnableEvents = True
End Sub

 

[xlhelp15]

Awesome, It works as my expectation. Thanks a million !!!