How to get the last digit of a value of a cell to other in VBA ?

Closed
HARIKA - Apr 17, 2013 at 02:21 AM
Zohaib R
Posts
2368
Registration date
Sunday September 23, 2012
Status
Member
Last seen
December 13, 2018
- Apr 17, 2013 at 03:10 AM
Hello,

I am trying with vba excel that how to get the last digit of a value in one cell to other.suppose I am trying to the get last digit of 99281 on I10 to J10. Digit 1 should be copied to J10. Please help me with the VBA code


1 reply

Zohaib R
Posts
2368
Registration date
Sunday September 23, 2012
Status
Member
Last seen
December 13, 2018
69
Apr 17, 2013 at 03:10 AM
Hi HARIKA,

The following macro will insert the last digit of the number in cell "I10" to cell "J10".

Sub MacroLastDigit ()
Range("J10").Select
Range("J10").FormulaR1C1 = "=RIGHT(RC[-1],1)"
End Sub

Please revert for clarification.
0