Here is a cool count-down timer application made in VBA to remind you about our VBAClasses registration closing time!
I know it is blindingly awesome. So I will give you a few seconds before reading further.
….
Back already? Great.
I was thinking of ways to tell you that you have got less than 3 days to join our VBA Class. Then it struck me, why not make an Excel workbook to tell you how much time you have got? So I did just that.
Here is a video demo of how the VBA application works (watch on YouTube):
Download the VBA Classes Count-down Timer Workbook:
Click here to download the workbook. Please enable macros to see it.
PS: You must drag and drop this file in to Excel 2007 or above to see it.
How does the Count-down Timer Work?
First, I must tell you about its limitations:
- This workbook assumes that your computer is located at the hotspot (or city) you have chosen.
- The current time is fetched from your computer’s local time using NOW() formula.
Now, the basic construction of this workbook can be broken down to 3 parts:
- Hotspot / City Selection
- Countdown Timer
- Formatting
Hotspot / City Selection:
- I took an outline map of world and put it in an empty sheet. On top of this I have added 9 hotspots by drawing nine circles.
- I have named these hotspots spot1, spot2…,spot9
- As you can guess, each of these spots correspond to one time zone, from PST to Australian Time.
- I have assigned macros to each of them. The macros would just modify a cell named valSpot with the name of the spot on which I clicked.
- Based on the clicked spot, I fetched the corresponding closing time from a table like this:
- Then, I calculated the time left by subtracting current time from closing time.
- A similar logic is used for City selection.
Countdown timer:
- I have inserted a check box and linked it to a cell named showTimer
- I have also assigned a macro startTimer to the checkbox.
- The startTimer macro would call a different macro named – countDownTime()
- In this, I wrote a while loop that would check if the showTimer is true and ask Excel to update the currentTime once every second
- The code can be examined from the downloaded file.
Formatting:
I am leaving this to your imagination.
Bottom line: Join our VBA Classes
Of course, the whole point of this is very simple.
If you want to learn VBA, then please join our VBA classes. We will be closing registrations in 3 more days. After that we will be busy for next few months teaching VBA to those of you who joined us.
Click here to join our VBA Classes.
PS: When you join our VBA Class, you get to learn how this timer app is constructed in a detailed 40 minute lesson. That is just one of the many lessons in our class. So, join us already.
10 Responses to “Multiple Find Replace with Power Query List.Accumulate()”
Note: The text-formula above miss a -1. The video is correct.
😀 sorry, I made the exact same mistake as you did - initially - in the video. {0..3} is one thing, and Table.RowCount(replacements) -->3 items ={0,1,2} is another thing.
1st question : you've created a new column to put the replacements in. how ca we replace in the original column without creating a new one ?
2nd question : how can we replace the value in the entire cell and not only the text (Using ReplaceValue instead of text.Replace) ?
Thanks you in advance
Chandoo, I would be very interested to have your answers in both Yassine's questions!
Thank you for sharing,
Vassilis
Thank you for this! I was just doing an assignment where I was having to replace words with other words in my Excel sheet. We are starting with the basics in my class, so I know I don't have a huge list that I would need to find and replace, but this is something that could be useful down the road for me!
Hi
This is nearly perfect for my needs thank you, however I would like just the "replace" to be the result if possible please, I have tried in vain adjusting the formula without success.
Thank you in advance
Thank you! Awesome tip, and very flexible, too.
My find/replace values were in non-adjacent columns of a table containing a bunch of other data. Worked prefectly and I am now a tiny bit less clueless.
Hi!!!
I have the same question that Yassine did.
I need to replace the values in the same column. I don't want to create a new column e then have to remove the old column.
How could I could that?
That's a real fun article. It inspired me to delve deeper into the topic of List.Accumulate. I can see how the function works, but it takes an additional step to imagine how one can use it for more complex applications.
Your example also made it into my article, together with some other use-cases. Would be great to get your opinion on which other areas you would include in the article.
Let me drop the link to the page so others can too find it for further reading: https://gorilla.bi/power-query/list-accumulate/
Expression.Error: The name 'replacements' wasn't recognized. Make sure it's spelled correctly.