2015 has been the most awesome year since starting Chandoo.org
Thank you so much for making it happen. This year, more than 11 million people visited our site (up 8%), learned something and took first step to become awesome in their work. 2015 has been an amazing journey, thanks to all your visits, listens, purchases, comments, likes and shares.
A big thanks to you, my dear reader, for supporting me and choosing chandoo.org as partner in your journey to awesomeness.
Apart from our readers, there are also countless people, websites, books, companies which helped me have a fantastic year. This message is my way of saying thanks to them.
People who helped me in 2015
Teachers & gurus:
Running a small business focusing on knowledge requires a lot of training, help and mentoring. Thanks to all these wonderful people who motivated me, taught me, inspired me and corrected me in this year.
Excel folks:
Hui, Jon Peltier, Debra Dalgleish, Mike Alexander, Dick Kuslieka, Rob Collie, Bill Jelen, Jordon Goldmeir, Colin Legg, Mike Girvin, Francis Hayes, & David Hager
Forum members:
Hui, Luke, Narayank, Somendra, Deepak, Debraj, Khalid, Nebu, Asheesh and more.
Business & entrepreneurship:
Pat Flynn, MrMoneyMustache, Tim Ferriss and Tropical MBA.
Health & fitness:
My cycling buddies – Hemanth, Srinivas B, Srinivas C, Sandeep, Sridhar V, Sridhar B and more.
Authors & books
It has been a powerful & inspiring journey, thanks to all the books I could read.
Some of the authors & their books that inspired me are,
- Andy Weir – The Martian
- George Mahood – Everyday is a holiday & Life is a beach
- Rob Collie & Bill Jelen – Power Pivot Alchemy
- Scott Adams – How to fail at everything and still win big
- Stephen King – On Writing
- Foster Provost & Tom Fawcett – Data Science for Business
Note: all the book links are Amazon Affiliate links. That means, if you click and purchase a book thru above links, I will get a few cents from Amazon.
Partners, Affiliates & Supporters
Chandoo.org is able to reach out & help millions of users world wide because it stands on the shoulders of many giants & supporters.
Our partners:
PASS BA & Jen Stirrup: Thank you so much for inviting me to speak at PASS BA 2015 conference. It was an awesome experience meeting all the Excel legends and PASS BA staff in Santa Clara this April.
Plum Solutions: Thank you Danielle for doing all the ground work to conduct another round of Excel & Power Pivot masterclasses in Australia in 2015. It was a great experience meeting our Australian readers & fans.
EduPristine: Thanks to Pawan, Paramdeep & rest of the staff at EduPristine for partnering with Chandoo.org in running Financial Modeling classes.
Our Affiliates:
This year was great for many of our affiliates too. Thanks to their support, we had more customers and they had more revenues. Some of our most prominent affiliates are,
Dashboard Spy, Francis, Daniel Ferry, Debra Dalgleish, Philip, Ken Puls, Oscar, Jimmy Pena, Victor Chan, Alan Murray, Brad Edgar and many more.
Customers & Readers
In 2015, more than 5,300 people purchased courses, templates, ebooks or products from Chandoo.org. More than 120,000 people are now members of our newsletter / RSS feed. More than 12,000 people regularly tune in to Chandoo.org podcast too. Many more people discover and join our little community every day. Thank you so much for inviting me to your life & letting me help you. My sincere & heart-felt thanks to each and every one of you.
Many thanks to Texas Mutual, University of Tasmania (Australia), Environmental Protection Agency – Ohio etc. for purchasing bulk licenses of our products.
I am also thankful to our Excel Forum members, who continue to share their knowledge & skills selflessly.
Special thanks also to,
- Delegates of my Advanced Excel & Power Pivot Masterclasses in Sydney, Melbourne & Brisbane in Australia.
- Delegates of the PASS BA conference in Santa Clara, USA
- People who attended the meetups in Sydney, Melbourne and Brisbane. Thanks for spending a lovely evening with me talking about Excel 🙂
- Leonie, Sunil, Habiba, Matt, Susan, Kurt and Danielle for your love, hospitality and warmth during my Australia visit this summer.
- Rickard from Corality and Johann from ModelOff for taking a few minutes out of their schedules to meet me and share a drink.
- Dan Fylstra for sharing his views and insights about Excel in a podcast interview.
- Staff and editors at Apress who helped Jordan & me with our book – Dashboards for Excel.
- Jeff Weir for all his wisdom, time & advice.
- All Excel MVPs and bloggers who attended the PASS BA conference and made it a memorable experience for me. (here is more)
- All our podcast listeners
- Everyone who bought a copy of The VLOOKUP Book or Dashboards for Excel.
- Mixergy, PC Magazine, InvestinTech for all press coverage and love.
Our staff
Chandoo.org staff are the silent soldiers helping me achieve our mission – “to make you awesome in Excel”. I am deeply thankful to their efforts & work ethic.
- Ravindra: for handling student enrollments, customer support & email work
- Joya: for creating podcast transcripts
- Pothi: for maintaining Chandoo.org webservers and helping our site run smoothly
- Narayan: for answering student questions & doubts
- Chittibadrayya: for taking care of our accounting & financial reporting stuff
- Jo (my wife): for helping me with customer support emails.
Companies & websites that helped me
I am thankful to Microsoft for creating Excel and helping me make a living out of it.
I am also thankful to,
Email & Productivity: Google, iPhone
Website, Hosting & E-commerce: WordPress, GoDaddy, Wishlist Member, KnownHost, Amazon, PayPal, E-Junkie, 2Checkout, EBS, GumRoad, FastSpring, Thesis, libsyn
Community & Connection: Twitter, Facebook, Youtube, Skydrive, pinterest
Software: Paint.NET, Mozy, Notepad ++, Camtasia & Snagit, Skype, Rescue Time, Audacity
Apps: Flipboard, Feedly, Amazon Kindle
There are many other software, companies and websites that help me every day. I am really thankful to each and every one of these. Detailed listing here.
Last but not least…
I am able to perform at my best levels & help you because there is someone else that support, encourage and inspire me every day.
- My family: Jo & kids support me and Chandoo.org in numerous ways. They shower me with love, humor and support everyday so that I can be awesome at what I do.
- All my close friends & relatives: for supporting me & encouraging me to do better.
PS… something for you:
Here is a nice little surprise for you. Open a new Excel 2013 or above file & in A1 type
=BASE(PRODUCT(5,7,83)&REPT(3,2)&REPT(6,2),6^2) &" "&BASE(2^15-2424,3*12)&" "&BASE(PRODUCT(19,1877,5,3,3),4*9)
for older versions of Excel (2010 or prior):
=SUBSTITUTE(SUBSTITUTE(ADDRESS(8,10^2*2+3^2,4)& "P"&ADDRESS(2^2,21^2,2^2)& ADDRESS(16/4,SUBSTITUTE(1517,15,96),4) &"Y"&ADDRESS(2*4,2424+1000,2*2),8,""),4," ")
32 Responses to “Extract Numbers from Text using Excel VBA [Video]”
Interesting that you are posting this at the same time as Doug http://yoursumbuddy.com/regex-function-sum-numbers-string/
Looks like two different articles about two different subjects, extracting numbers in text vs. summing all the numbers in text. Also, articles are published 20 days apart. Is the interesting part that there were two articles written about Visual Basic techniques within this month?
Sorry, that should have said 1 day, not 20. Was looking at the wrong thing. I still think it's just a nice coincidences to have multiple articles about VB written. Dick Kusleika also routinely writes about VB at dailydoseofexcel.com
What a lucky coincidence. I know about Doug's blog, but havent had a chance to read it in a while. Thanks for sharing the link.
I think that the best lesson that can come from the several salary survey solutions is that one should have anticipated the variety of monetary units. If the survey utilized drop down currency lists and limited the salary field to whole numbers only, etc. the resulting input would have been far cleaner. Sorry, Chandoo, but the messy input was, in my opinion, self-inflicted.
You are right. Since there are more than 200 different currencies, I thought a currency field would complicate the survey. The bigger problem was, Google Docs (which I used for survey) does not have an option to capture only numbers. Input fields were by text, so people entered in lots of different formats.
But I am happy how it turned out. It taught me several lessons on how to clean data.
Next time I will use a better tool to capture such responses.
Your post made me check how the "regular" and "irregular" decimal separators look like in different countries and it appears to be really interesting case. Take a look:
http://en.wikipedia.org/wiki/Decimal_mark
Cheers.
I am pretty sure you can replace this code block from your article...
If Text Like "*.*,*" Then
european = True
Else
european = False
End If
with this single line of code...
european = Format$(0, ".") = ","
Just to follow up on my previous post, I think I may have misunderstood the intent of your code. You were not looking to see if the computer system was using a dot for the decimal point, rather, you were looking to see if the Text was using a dot as the decimal point, weren't you? If so, then you could use this single line of code as to replace your If..Then..Else block...
european = Text Like "*.*,*"
But what if the number in Text was not large enough to display a thousands separator? Or what if it were a whole number? In either of those cases your original test, and my replacement for it, will fail. Maybe this would be a better test...
european = Right(Format$(Text, "."), 1) = ","
You are right. I am checking if the text has European format. And I loved your one line shortcut. I did not think of using LIKE in such context. Thanks for sharing that.
Again, you are right that this method would fail if the number is not big enough for a thousands separator. Since my data has annual salaries, all numbers are usually in thousands. So I did not think about it.
Hi ,
I have a question please. I'm working on a report that has alphanumeric on it and I only need to retrieve 7 integers that starts with 7 and 3 example SCM RIS PX RIS 02 - 7152349, ADSF\243434134, CM532345 and i need to get the 7152349. Can you please help me on this? I truly appreciate your help!
Thank you very much!
Hi-
The post was wonderful. Please take a look at this function also
Function ExtractNumber(InputString As String) As String
'Function evaluates an input string character by character
' and returns numeric only characters
'Declare counter variable
Dim i As Integer
'Reset input variable
ExtractNumber = ""
'Begin iteration; repeat for the length of the input string
For i = 1 To Len(InputString)
'Test current character for number
If IsNumeric(Mid(InputString, i, 1)) Then
'If number is found, add it to the output string
ExtractNumber = ExtractNumber & Mid(InputString, i, 1)
End If
Next i
End Function
Thank you so much. Your function code is amazing. It very useful for my lesson. Thank you so much.
To be more international.
At the beginning, for the rench format :
If fromThis.Value Like "*.*,*" Or fromThis.Value Like "* *,*" Then
european = True
End If
And at the end :
ElseIf ltr = "," And european And Len(retVal) > 0 Then
retVal = retVal & Application.DecimalSeparator
End If
Hi Chandoo,
Sorry, but your code does not work correctly with my Hungarian excel. My decimal separator is "," so
getNumber = CDbl(retVal)
will not convert the string to value, because you hard-coded "." as separator.
And, as you mentioned: "method would fail if the number is not big enough for a thousands separator" I would like to add: would fail if the user did not enter the thousand separator and also would fail if the thousand separator is not "," nor "." but " " (space chr) - as in Hungary.
This two functions could help to determine the system settings:
application.DecimalSeparator
application.ThousandsSeparator
Conclusion:
you say: "We do not need special treatment for regular format (61,000.30) as Excel & VBA are capable of dealing with these numbers by default." - it is true in case you system uses the regular format. 🙂
Cheers,
Kris
Awesome! It works !!
But how does one take into account negative numbers (say the list has negative numbers and I want to retain those negative numbers)
Thanks.
Hi. When I download this example, my excel is not showing formulas exactly. I wanted a ready version of this example, please. Thank you
Hi Chandoo,
Thanks for this brilliant article like many others that you have written for the benefit of many. Unfortunately, I am constantly having problems downloading your sample workbooks. I am currently using Excel 2007, and each time I try to download any of your sample workbooks, for e.g. the 'Extract Numbers Using VBA workbook', I get the following message 'This file is not in a recognizable format'.
I always get this message each time I try to download any of your sample workbooks. Please kindly advise me on how to resolve this.
Thank you.
Kenny
I have numbers like 12345-12-1 which I want to extract from text strings. 12345 might be variable there as 123, 1234, 12345, 123456,1234567 or so. When I get that in other cell (Column) I should see multiple entries of similar numbers with - (hyphen). How to do that?
@Madhav
Assuming your data is in cell A1
=LEFT(A1,FIND("-",A1)-1)
Thanks Hui for your response. Thank you for your time to find potential solution for my problem.
I tried your formula but was not successful in using the same.
here is more clarification so that you/others could help me.
Column A has following in Cells A1 to A4.. could be long..
ABCD 12345-12-1 XYZ 9878-02-9
LMNOPQ 12345-12-1 STQ 789748-98-5
NFHFKDJFKDS 123-23-1, NDKANSD
A FDSAFNDS 12345-12-1, ASNDSAND
from such data I need to extract the number with hyphens
remove , immediately after the numbers, separate the numbers with spaces
Column B shall look like:
12345-12-1 9878-02-9
12345-12-1 789748-98-5
123-23-1
2345-12-1
2 separate strings (numbers) having hyphen (-) therein should be separated with space.
@Madhev
Have a look at a solution using a simple UDF
https://www.dropbox.com/s/zexf4t9tmxmt3m9/Get_Numbers.xlsm?dl=1
Thanks Hui that worked well with the examples I provided.
I should have given following type of example:
2-ABCD 12345-12-1 X-2-YZ 9878-02-9
in the above case I do not want to extract a number and hyphen which is connected to or is part of text string..
Can you please help me modify the code to ignore numbers and - with text string.?
Thanks in advance.
@Madhav
So what is the answer expected from
2-ABCD 12345-12-1 X-2-YZ 9878-02-9
Thanks for your interest and time Hui.
so when I have text like
2-ABCD 12345-12-1 X-2-YZ 9878-02-9 3-abc-4-efg in Cell A2
in B2 the answer should be only numbers with hyphens and no text with numbers or hyphens
12345-12-1 9878-02-9 OR
12345-12-1 some delimiter (, or 😉 9878-02-9
The logic I thought was (but unable to do)
1. remove all strings containing text (and - and numbers) and then extract only numbers containing hyphens
2. Extract numbers in only following format ( # is a digit below) and ignore numbers and hyphens in any other format
#######-##-#
######-##-#
#####-##-#
####-##-#
###-##-#
##-##-#
Hope this helps.
Why not just use the function =getNumber ?
=getnumber doesn't extract numbers with hyphens..
also need to ignore numbers and hyphens associated with text string
When I use this code that code give me error
cdb1 is not highlight can u explain me
@Deepak
It runs fine for me
Select the first line and Press F9 to set a stop point
goto a cell and edit the function and press Enter
Then you can step through the code when it runs using F8
report back what happens
HI,
How can we add spaces between numbers and removing decimals.
how can we make spaces in the reesult e.g 25 655 2335
Dear Team,
I need to extract number (cheque number) from a cell (some numbers may repeat that to be ignored),
Text is - :-Inward Clg Cheque 00992924 00992924,BD
Result should be - 992924
Kindly help in getting formula for this (please email the code or VBA Code)