Nice work Don..!!
Regards,
DILIPandey
On 10/16/11, dguillett1 <dguille...@gmail.com> wrote:
> Array formula solution
>
> =1*MID(J3,MATCH(TRUE,ISNUMBER(1*MID(J3,ROW($1:$9),1)),0),COUNT(1*MID(J3,ROW($1:$9),1)))
>
> Macro
> Sub ExtractNumbers()
> Dim r As Range
> Dim s As String
> Dim v As Variant
>
> Set r = Range("j3", Range("j3").End(xlDown))
> s = Join(Application.Transpose(r))
>
> With CreateObject("VBScript.RegExp")
> .Pattern = "\D+"
> .Global = True
> s = Trim(.Replace(s, " "))
> End With
>
> v = Split(s)
> With Range("l3").Resize(UBound(v) + 1)
> .Value = Application.Transpose(v)
> .Sort key1:=.Item(1), Order1:=xlAscending, Header:=xlNo
> End With
> End Sub
>
> Don Guillett
> SalesAid Software
> dguille...@gmail.com
>
> From: neil johnson
> Sent: Sunday, October 16, 2011 5:54 AM
> To: excel-macros
> Subject: $$Excel-Macros$$ How to extract number in cell
>
> Hi All,
>
> How to extract number form the cell .
>
> For example
>
> abc123abc
> wc34agh
> 783abcd
>
> Thanks
> --
> ----------------------------------------------------------------------------------
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/discussexcel
>
> --
> ----------------------------------------------------------------------------------
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/discussexcel
>
--
Thanks & Regards,
DILIP KUMAR PANDEY, mvp
MBA,B.Com(Hons),BCA
Mobile: +91 9810929744
dilipan...@gmail.com
dilipan...@yahoo.com
New Delhi - 62, India
--
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to excel-macros@googlegroups.com
<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/discussexcel
