Step 5: As we know, every IF condition always needed an Else condition. This statement will pop-up under Message Box as soon as the If a condition is true. MsgBox ('Hey! You need to pay your EMI today.') If Sheets('HomeLoan_EMI').Range('A1').Value = Date Then Step 4: Add a statement to be executed for the condition which is true. If Sheets('HomeLoan_EMI').Range('A1').Value = Date Then End Sub Step 3: Now, use Then on the same line after IF so that we can add a statement which will execute as long as if-condition is true. If Sheets('HomeLoan_EMI').Range('A1').Value = Date Step 2: Use If condition to assign the value of the current date in cell A1 of worksheet HomeLoan_EMI. Step 1: Insert a new module and define a new sub-procedure named auto_open() to create a macro. auto_open() allows your macro to run automatically every time you open the worksheet. Let’s see step by step how we can do that. Suppose I have a worksheet and I need a system to show me a message “ Hey! You need to pay your EMI today.” Every time I open my sheet and the value in cell A1 is the current system date. You can also use Cells.Value function to get the date value in a particular cell of your excel sheet. This is the simplest example of getting the current date. You may be getting a different date at the time you run this code, based on your system date. Note that, the date shown here in the screenshot is the date I have run this script at.

You’ll be able to see a Message Box as shown in below screenshot with the current date. Step 6: Hit F5 or run button manually to Run this code. Step 5: Use MsgBox to be able to see the current system date under Message Box prompt. You just need to add DATE in order to assign the date value. Step 4: Using the assignment operator, assign a value of the current system date to the variable newly created. Since, we are about to assign a date value to the variable, make sure you are defining it as a date.

Step 3: Define a variable named CurrDate which can hold the value of the current date. Step 2: Define a sub-procedure to write create and save a macro.

Vba insert current date in excel