timevalue000001

  1. M

    Loading dots splash screen on Workbook_Open

    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...
  2. T

    Simpler Macro required

    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...
  3. R

    Is there a VBA error message that allows code to continue executing?

    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...
  4. M

    Excel 2016 - VBA - Troubleshooting Macro that Should Work But Isn't Working?

    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...
  5. H

    Sendkey Button Select

    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...
  6. V

    countdown timer that continues counting past zero

    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 -...

Some videos you may like

This Week's Hot Topics

  • Sort code advice please
    Hi, I have the code below which im trying to edit but getting a little stuck. This was the original code which worked fine,columns A-F would sort...
  • SUMPRODUCT with nested If statement
    Hi everyone, Hope you're all well. I'm hoping someone will be able to point me in the right direction with a problem I'm having with a SUMPRODUCT...
  • VBA - simple sort is killing me!
    Hello all! This should be so easy, but not for me, apparently! I have a table of data that can be of varying lengths and widths. My current macro...
  • Compare Two Lists
    I have two Lists and I need to be able to Identify differences between them. List 100 comes from a workbook - the other is downloaded form the...
  • Formula that deducts points for each code I input.
    I am trying to create a formula that will have each student in my class start at 100 points and then for each code that I enter (PP for Poor...
  • Conditional formatting formula required for day of week and a value
    Hi, I have a really simple spreadsheet where column A is the date, column B is the activity total shown as a number and column C states the day of...
Top