Hi,
Try it,
Hi,
Also try below code for your quary,
Sub numeric()
Dim MyCell As Range
For Each MyCell In Selection.Cells
MyCell.Value = Asc(UCase(MyCell)) - 64
Next
End Sub
Code
On Mon, Mar 19, 2012 at 12:15 PM, Maries talk2mar...@gmail.com wrote:
Hi,
Try it,
=CODE(UPPER(A1))-64
A1 contains your letter
Rajan
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com]
On Behalf Of Maries
Sent: Mar/Mon/2012 01:46
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ Replace letters with numbers
Hi,
Try
=CODE(UPPER(A1))-64
A1 contains your letter
Rajan
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com]
On Behalf Of Maries
Sent: Mar/Mon/2012 01:46
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ Replace letters with numbers
Hi,
Try