Last week we discussed how to extract numbers from text in Excel using formulas. In comments, quite a few people suggested that using VBA (Macros) to extract numbers would be simpler.
So today, lets learn how to write a VBA Function to extract numbers from any text.

Using VBA Function to Extract Numbers from Text in Excel
When using VBA to scan a text for number, the basic approach is like this:
- Read each character in a given text
- See if it is number
- If so, extract it
- Continue with next character
- Convert the extracted characters to a number
- Return that number
While this works fine, it also has some limitations.
For example, with above approach, A text value like “US $313,00.00” will be extracted as 3,130,000 not as 31,300.00
Depending on your data, you may have many such peculiarities. For example, here are 4 situations I ran in to:

Handling decimal points & thousand separators during extraction
When it comes to decimal points & thousand separators there are 2 conventions:
- 61,000.30 (Regular)
- 61.000,30 (European)
We do not need special treatment for regular format (61,000.30) as Excel & VBA are capable of dealing with these numbers by default.
To check if a text has European format number, we have to see if . occurs before ,
(Note: this method is not fool-proof, but should work well for most situations)
This can be done by using LIKE statement,
if text like "*.*,*" then
european = true
else
european = false
end if
Writing our getNumber() VBA Function
Once we put all these ideas together, we will have our getNumber() function. Watch below video to understand how to extract numbers from text using Excel VBA.
[Watch this video on our Youtube channel]
Download Number Extraction VBA Function
Click here to download the Extract Numbers using VBA workbook.
View code module to understand how getNumber function works.
Do you use VBA to extract numbers?
I often use VBA to clean raw data. Earlier I mentioned about cleaning phone numbers & spelling mistakes. I think simple functions like getNumber() can save us tons of time & let us focus on the important task – analyzing data.
What about you? Do you use VBA to clean data? What techniques & ideas you rely on? Please share your thoughts using comments.
New to Excel VBA? Take our crash course
Are you new to Excel VBA? If so, go thru below links to take our FREE VBA Crash course.
- What is VBA & Writing your First VBA Macro in Excel
- Understanding Variables, Conditions & Loops in VBA
- Using Cells, Ranges & Other Objects in your Macros
- Putting it all together – Your First VBA Application using Excel
- My Top 10 Tips for Mastering VBA & Excel Macros
If you want more,
I know you are thirsty for more. Why not join our Online VBA Classes and learn Excel VBA in step-by-step manner. Click here to know more.













5 Responses to “Preparing Profit / Loss Pivot Reports [Part 2 of 6]”
[...] Preparing Pivot Table P&L using Data sheet [...]
[...] Preparing Pivot Table P&L using Data sheet [...]
[...] Preparing Pivot Table P&L using Data sheet [...]
I am not getting sound from the videos. I have checked all the settings and spent several hours searching the Internet to no avail.
Has anyone else had this problem?
Is there anyway to get the Grand Total to be broken out in the same fashion as the items above it? For instance, if you have in column 1, widget a, widget b, and have their sales by month in column 2, I'd like to see the grand total also be by month, for widget a & b combined.
I can't get anything other than a single line for the grand total, rather than the same format as the data above.
Widget A Month Sales
Jan 100
Feb 200
Widget B
Jan 150
Feb 250
Grand total - here I would also like to have Jan, Feb.
Jan 250
Feb 450