prevent running macro if lastrows doesn't contain DATE(TODAY)

[Omran Y]

Hello,
I need procedure before call the main macro . if the last row doesn't contain date(today), then should show message box " the DATE is not TODAY" for lastrow " and exit sub , otherwise call my macro.
the DATE(TODAY) will be in MAIN sheet.
thanks

 

[My Aswer Is This]

You said:
" if the last row doesn't contain date(today)"

The last row in what column?
Do you mean last row in column A with data?

 

[Omran Y]

sorry !
the column A.

 

[My Aswer Is This]

So, you want to run one Macro to see if today's date is in last row of column A on sheet named "Main Sheet". And if so, run another Macro,
So, what does the other Macro do?

And how is today's date entered into last row?

 

[Omran Y]

So, what does the other Macro do?

will calculate for specific cells between two sheets.
date formatting will be dd/mm/yyyy

 

[My Aswer Is This]

With limited knowledge of exactly what you want try this:
Script looks down Column A of active sheet to see if today's date is in last filled cell in column A

Sub RectangleSingleCornerSnipped1_Click()
Dim Lastrow As Long
Lastrow = Cells(Rows.Count, "A").End(xlUp).Row
If Cells(Lastrow, 1).Value = Date Then
MsgBox "Yes Today is " & Date
Else
MsgBox "Not Today"
End If
End Sub

 

[Omran Y]

perfect !
this is what I want it .
much appreciated for your help.

 

[My Aswer Is This]

perfect !
this is what I want it .
much appreciated for your help.

Glad I was able to help you.
Come back here to Mr. Excel next time you need additional assistance.