Hi ,
Check with formula --> Left(Column no,10)
Regards,
Rajesh. Nair
On Fri, Jun 24, 2011 at 2:58 PM, Brajesh Kumar Porwal <
brajeshkumarpor...@gmail.com> wrote:
> Dear Expert,
>
>
> I need your help because I have more data of Multiple format. I want
> extract only 10 digit mobile number.
Sub mobile()
Dim i As Integer
Dim strPath
Dim strFile
Dim UB
For i = 1 To 400
strPath = Cells(i, 1) '- stores the value of the cell in the
variable *strpath (* iterates between A1:A400)
strFile = Split(strPath, ".") '- splits the value to an array *
strfile* usng '.' as
Hi Ashish,
i have below code but i dont know whts the wrong with this.
please chekc and guide me thansk for you continues help.
Thanks,
Rakesh.
*Sub mobile()
Dim i As Integer
Dim strPath
Dim strFile
Dim UB
For i = 1 To 400
strPath = Cells(i, 1)
strFile = Split(strPath, ".")
UB = UBound(strFile)
S