By: Shamima Sultana

In reply to Imtiaz.

Hello Imtiaz,

You’re welcome! I understand that working with VBA may seems complex if you’re not familiar with it. Here’s a step-by-step guide to use the VBA code:

To open the VBA editor press Alt + F11.
In the VBA editor, go to Insert >> select Module. This will create a new module where you can paste the VBA code.
Copy and Paste the First Code in the module.

Sub UpdateDateInAllSheets()
Dim ws As Worksheet
Dim dateValue As Variant

' Change "Sheet1" to the name of the sheet where you will enter the date
dateValue = ThisWorkbook.Sheets("Sheet1").Range("A1").Value

For Each ws In ThisWorkbook.Worksheets
If ws.Name <> "Sheet1" Then
ws.Range("A1").Value = dateValue
End If
Next ws
End Sub

Next, in the VBA editor, find Sheet1 (or the name of your sheet where you’ll enter the date) in the Project Explorer on the left side.
You can also Double-click on Sheet1 to open its code window.
Now, copy paste the 2nd code in the Sheet.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Call UpdateDateInAllSheets
End If
End Sub

Make sure to replace “$A$1” with the actual cell reference where you will be entering the date if it’s different.
Now, go back to your Excel sheet. Enter a date in the specified cell (e.g., A1) on Sheet1 and check if the date gets updated in the corresponding cell on all other sheets.

Regards
ExcelDemy