timevalue000001

I have a code for "Bubbles" imitation while loading a workbook. I was trying to make them appear on Workbook_open but something is wrong and my code does not work correct. Dots are not running. I think the problem in current code is with Application.OnTime Now + TimeValue("00:00:01") If I...

Afternoon All, I have the following Macro for the sample Table below. I would like the Macro to loop until it reaches the end of the table, at the moment i have the shortcut entered at the end but this requires me to be infront of the computer at all times to end the macro by pressing ESC...

I'm creating an automated sheet for a rather rude colleague and as a bit of fun I've made it so if she types an incorrect value in a table, the table then flashes red and blue like police lights, I want to have a pop-up box that informs her the value is incorrect but the issue is this interrupts...

I have an Excel 2016 VBA macro that changes the "Office Theme" under: File>Account>Office Theme; to the next theme. This macro should work as when I try and perform the macro's sequence of actions manually the sequence of actions is successful in changing the "Office Theme" - would anyone might...

Good Morning All, I have a sendkeys project I am nearing completion, the only issue I have currently is I get stuck on a section of the application that requires you to hit the select button. I searched google but for the most part found no solid solution. Is it possible to include a Left Click...

Hi all. looking for help with countdown timer codes that continue counting pass zero. found these codes Sub starttimer()Application.OnTime Now + TimeValue("00:00:01"), "nexttick" End Sub Sub nexttick() If Sheet1.Range("B1") = 0 Then Exit Sub Sheet1.Range("B1").Value = Sheet1.Range("B1").Value -...