1)
> End If
> Next i
> cell.Value = text1
> Next
> Application.DisplayAlerts = True
> Application.Calculation = xlCalculationAutomatic
> End Sub
>
>
>
> On Mon, Jun 4, 2012 at 8:44 PM, sonal gupta wrote:
>
>> Hi,
>>
>> This is my first post in this group.
ShN = ShN & Mid(Shname, i, 1)
>
> End If
>
> Next
>
> RemoveSpecialCharacters = ShN
>
> End Function
>
>
>
> * *
>
> *Regards*
>
> *Rajan verma*
>
> *+91 7838100659 [IM-Gtal
Hi,
This is my first post in this group.I have learnt many things from this
group.I'm finding difficulty in cleaning the range in which each cell has
string like " rahul;6e3-".I need a macro which will clean the special
characters,spaces & numbers & leave the alphabets only.
Thanks in advanc