I Made this VBA Code 2,880,952% faster

[@Excelmacromastery]

Let me know in the comments below if you would like more videos like this👇

[@mikheilchigogidze4224]

This is great. Thanks a lot! Can you please do a video, on how would you schedule an excel macro? Macro to run without opening an excel.

[@jastonkong1409]

Your work is very inspiring. You keep me interested in learning VBA. Thank you so much for such selfless sharing! Also, never in a million year i would have thought that simple line of clearing contents could cause that much trouble! lol

[@sweetdreams6697]

I loved it

[@luiss.l7904]

There is still one thing to work on: combined = data(i,2) & data (i,3) e data(i,4) has a N level of complexity This concatenation operation is done N(loop size) times unecessarily. Use worksheet function to vectorially create a single array with the already concatenated values of all rows.

[@markd.9538]

This idea would have come in very handy for me about 4 years ago. I had to write complex (similar to this, but but non-trivial) scripts that ran across invoice support templates that checked and updated columns to the customer's very specific demands. The code had to look across about 120 columns of data, and the spreadsheets contained hundreds of thousands of rows. In the end it all worked but we had the same problem: the constant updates to the sheet during the process slowed it down to a crawl. Come due day, it would eat a huge chunk of the day for the person running and checking it. If I ever have to implement (or refactor) anything like this in the future, I'm going to be doing it your way! Thank you for the great advice here.

[@HSkraekelig]

Paul, I've been using your web site for hints and tricks for years now. I probably would have stopped at the first fix, but the second is 200% more brilliant. Don't change what doesn't need changing! More please.

[@Excelmacromastery]

Glad you liked it

[@Info-God]

The most efficient combination. Dictionaries+Arrays.

[@barrygeldham390]

Very interesting Paul. Just a rather pedantic point, 2.8 million percent is not 2.8 million times faster, only a mere 28,000 times faster. Still quite impressive.

[@eshaich]

Pro as usual. btw I believe you can do it even faster with the "evaluate" VBA function. no loops and it does the calculation for all the range ows at once.

[@dantealighieri8031]

You make excel coding very enjoyable to learn. i dont even know half of what you did but it was intriguing.

[@Excelmacromastery]

Thanks. Glad you like it.

[@Info-God]

Dictionaries are a just like that: an array organised as you look at a ... dictionary. Try to organise a set of data as a ... dictionary....unique items.

[@RobertWoodman]

That was quite impressive, Paul. I use your KZbin site often for ideas, tips, and tricks.

[@RobGijrath]

That is very efficient. Please show us more videos like this.

[@Excelmacromastery]

Thanks Rob

[@stevegarside5026]

Fantastic coding and described in a way that people can understand. Thanks for sharing!

[@Excelmacromastery]

You're welcome

[@Tocotronic000000]

Fantastic tutorial. We need more like this. Keep up the excelent Work. Greetings from germany

[@Excelmacromastery]

Glad you like it

[@Elesario]

An alternative solution would be to set up a temporary column with a function that can detect whether the item is the first of the group or not, and then use that column to filter the data and clear the visible cells in the first column. Then it's simple to remove the filter and the helper column. It would work best with the calculation mode set manual and triggering the calculation for only the point prior to filtering. In the example provided it's unlikely to be faster, but it might scale better (haven't tested). The reason I suggest this is because moving data between the Excel and VBA engines can be slow, so sometimes you get better performance directly from the Excel calculation system (which is multithreaded), and you're only pushing a few commands at it from VBA's side.

[@hammeedabdo.82]

Thank you Paul, we need more videos like this.

[@Excelmacromastery]

Glad you like it

[@BrittKinsler]

Excellent video and looking forward to more! Thanks!

[@joeburkeson8946]

Easier & faster what's not to like? Another fine tutorial with real world application, thanks.

[@Excelmacromastery]

You're welcome

[@janezklun]

Thank you Paula for such useful videos, yes more

[@nadermounir8228]

Brilliant video Thank you very much for your effort and for showing us a real world example. I am currently enrolled in your course (just started)

[@Excelmacromastery]

Thanks. Glad you like it.

[@stevec1835]

Awsum, thanks for taking the time to make these videos. They are so helpfull...

[@elecirlisboa9155]

Excelente vídeo parabéns, aprendi como reduzir o tempo em algumas macros, obrigado!!

[@kapibara2440]

Smart and clean. Great work Paul! Your videos are valuable 🎉

[@Excelmacromastery]

Thanks

[@Excelmacromastery]

Thanks

[@ΕλευθέριοςΠάντος]

That was splendid indeed! Thank you very much!

[@Excelmacromastery]

Thanks

[@benlinford_work]

Love it, Paul!

[@Excelmacromastery]

Thanks Ben

[@iincitr]

Amazing. Thank you.

[@Excelmacromastery]

You're welcome

[@dermotbalson]

My preference is never to overwrite any original data, both because making an error may lose it forever, and also because in business, work needs to be checked, and you can't do that without the original data.

[@notaras1985]

There's zero reason the data will be lost

[@brianminder2561]

Excellent! I vote for more.

[@Excelmacromastery]

Thanks Brian

[@Bhuvan_C_Paranji]

Hi Paul, I have one issue from Power Bi data, Its taking long time to execute. please give me any idea to lessthan 1 minute to get the power bi data with filter options.

[@mylife1131]

Harika video için teşekkür ederim Paul.

[@Excelmacromastery]

You're welcome

[@ganeshs1360]

Very well presented. I have a question. Is vbnullstring faster than using ""?

[@egozMaster]

you should remove the With statement as well

[@rajuhubli2]

Great video sir

[@Excelmacromastery]

Thanks

[@strannostrannovasrr]

Is it possible to dump only 1 column from a multi column variant array on a worksheet at once? I mean without using a for-next-loop?

[@Excelmacromastery]

You can only do it with the first column. Resize the output range to the size of this column. Range(rowCount,1) = arr

[@sandeepkothari5000]

SURE, WE LIKE YOUR VIDEOS immensely & wany more

[@Excelmacromastery]

Thanks Sandeep

[@sudheerallamuri7132]

Thank you Sir.. I like your Vedios ❤❤

[@richardgreves6161]

tried to download the code and I get Web server is returning an unknown error

[@Info-God]

Type it. This way you learn.

[@JithinDevan]

Thank you Paul - is there any way to speed up below requirement? I need to list all filenames from a folder and their last modified dates into a table. The folder has over 20,000 files and it’s taking ~5 mins to run the macro.

[@sinus2220]

You can call Shell and run DIR command from there.

[@Excelmacromastery]

I think that would be fast. You can easily send to a file

[@Back1Ply]

Power query has from folder connector that lists files and last modified date

[@JithinDevan]

Thank you all for suggestions

[@PIESvcs]

When I see this, I'm reminded that the Data, Advanced Filter allows Unique data items to be filtered in place or copied to another location (using header rows, I think). I am wondering if this may be faster using the native Excel operability. One question I had (and benefit to using Paul's method) is if we want to know the number of occurrences for each Unique entry, an additional array may be useful, for example, if all of those monitors were to be assigned their serial numbers, assigned to users, maintained and depreciated. I needed to do this for network hardware in 1988 using QuickBASIC before VBA.

[@sriranga188]

Yes we need more videos

[@Excelmacromastery]

Thanks

[@kofigyebiadusei2205]

When will make an introductory video for us who are beginners. Thank you

[@Excelmacromastery]

Good suggestion.

[@sasifexcelsolutions4509]

Hi, thanks for this, question, how would I force only xlsb when the user want to save as a file, I want the dialog picker or with 365 only show xlsb to show, this was possible before 365 but don't know how to do it in 365

[@stevetatterton]

Do you need to use LBound of the arrays when it will be 1 unless you specify otherwise, which you don't do here as it's not needed? Or is iterating from LBound to UBound seen as more elegant? I would find 1 easier to use as the For statement is then less cumbersome.

[@Excelmacromastery]

Using lbound is a defensive measure in case a zero based array used. But you'll get away using 1 in most cases.

[@mustavogaia2655]

This is poetry

[@pupazzetti2680]

Yet you could make it even faster by using `Value2` (as you have previously taught in other videos). Just for curiosity, how much faster?

[@Excelmacromastery]

It would only make a difference if you had a large number of writes.

[@wizardofaus8473]

More videos like this please. Also, more videos not like this please. Basically, I would like more videos, as long as they are you teaching VBA. Thank you Paul

[@Excelmacromastery]

You're welcome.

[@rahul7rock]

Dictionary and Array is a deadly combination as always

[@Excelmacromastery]

Absolutely

[@nivrin13]

How do you calculate the speed of the macro?

[@Excelmacromastery]

Using the Windows api timer

[@Info-God]

Define TStart and TEnd, then the difference is the TLapse

[@daves4026]

Bravo

[@mback3713]

Try using Collection instead of Dictionary. ;)

[@Excelmacromastery]

Why? They won't be faster.

[@nivrin13]

Collection allows double entries, dictionary doesn't, so it's already filtering the data

[@mback3713]

@nivrin13 um.... collection will error if you try to retrieve an element from it that is not in the collection. you use `on error resume next` then in your loop check the collection `_ = col[key]`, then switch to do something `if err.number then` and don't forget to `err.clear` after failing to retrieve a value. it works... a little hokey, but is faster than `if key in dict`

[@mback3713]

@Excelmacromastery collection is "native" and doesn't require an import - and is more lightweight and faster than dictionary. It is a little "hokey" as you need to use error handling (the native "Err" object) to detect if a key/value pair exists in the collection, but... try it... sounds like you may be a little surprised at the result.

[@nivrin13]

@@mback3713 Alright. I actually wanted to use the collection method in the past. This is a better approach. Will save it. Cheers!

[@saketmishra1470]

Paul, please help me to make my code as faster you have shown here

[@Charles-m7j]

How to improve it further: use literally anything but VBA.

[@junkertom7766]

Tell me you are a clueless VBA hater without telling that you are a clueless VBA hater.

[@Charles-m7j]

@@junkertom7766 it is literally ranked the worst programming language. Personally I don’t think that is fair because it isn’t a real programming language.

[@markd.9538]

​@@Charles-m7j Ranked... by who? Its a tool for a purpose. Yeah there's better languages out there; yeah its ugly; yeah it has poor object typing, and weak object security in parts... and yeah its not "fun" in the programming sense - but it has exceptionally good fit-for-purpose libraries when you have to crunch spreadsheets and data for insane business bosses who need to work in Office formats and need their little/big problem solved ASAP. Not everyone can be a L33t coder. Sometimes, spreadsheets pay the bills. VBA is ubiquitous - and exceptionally useful - in MANY environments.

[@laurentbosc2896]

@@Charles-m7j ok and what else ? in the real World Vba is probably one of the most used. So this is a very simple view to tell that. And it should ont be taken alone but as one element of the Excel toolbox. With Power Query and power pivot, it gives powerful possibilities very easily, without any extra installation. This is why it is very used and so popular.

[@laurentbosc2896]

And it is a programming language, literally speaking… not comparable to others ok, but it is powerful for other reasons as explained

[@Hughahugha361]

The code is nearly as fast as you deleting comments...

[@Excelmacromastery]

I haven't deleted any comments😀