The data I have now doesnt work in scatter chart so I need to translate the letter to a number.
I have attached a file.
The column B and Column C contain the key chart.
Column D contains the data that needs to be translated to a number.
The result would go into column E leaving column D intact.
Thank you!!!!
This seems easer
Code:Option Explicit
Sub Translate()
Dim X As Variant, V As Variant
Dim rStart As Range, rEnd As Range, rCell As Range
Dim i As Long
Application.ScreenUpdating = False
Set rStart = Range("D38")
Set rEnd = rStart.End(xlDown)
For Each rCell In Range(rStart, rEnd).Cells
rCell.Offset(0, 1).Value = Asc(rCell.Value) - 64
Next
Application.ScreenUpdating = True
End Sub
Thank you Very much!!!! much better!!:)