View Single Post
  #9   Report Post  
Posted to microsoft.public.excel.programming
Auric__ Auric__ is offline
external usenet poster
 
Posts: 538
Default To be got Alphabetic

Moideen wrote:

Auric__;1603366 Wrote:
Moideen wrote:
-
We Need Always 3 Digits.This function only comming 2 Digits, Pls

Advice
me on this matter.

Eg: 1.550 , Shown only : A.FF, To be Shown : A.FFS

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBST ITUTE(SUBSTITUTE
(A1,1,"A"),2,"B"),3,"C"),4,"D"),5,"F"),0,"S")-


Works for me. Shrug. Try switching to the VBA solution:

Private Sub Worksheet_Change(ByVal Target As Range)
For Each cell In Target
If cell.Column = 1 Then cell.Offset(0, 1).Value = Replace(Replace(
_
Replace(Replace(Replace(Replace(cell.Value, 1, "A"), 2, "B"),
_
3, "C"), 4, "D"), 5, "F"), 0, "S")
Next
End Sub


Not Getting..

Eg: 1.550 , Shown only : A.FF, To be Shown : A.FFS


Then there's some difference between your system and mine, possibly something
wrong. Everything that I've posted works as expected for me.

--
SPIDERS! One had a name, even.