Copy recent date

Panoos64

Well-known Member
Joined
Mar 1, 2014
Messages
822
Hi to all in forum, Im kindly require to provide me support sso that a VBA code, should run through col. "A" and where find the newest date should copying this date in cell "A500".

Please see below an extract.

09/06/2019
15/06/2019
21/06/2019

Based on above extract the code should copying the date "21/06/2019"
Thank you all in advance
 
Last edited:

Some videos you may like

Excel Facts

Remove leading & trailing spaces
Save as CSV to remove all leading and trailing spaces. It is faster than using TRIM().

AlanY

Well-known Member
Joined
Oct 30, 2014
Messages
3,981
Office Version
365, 2019, 2016
Platform
Windows
try

Code:
Sub Recent_date()
    Range("A500").Value = WorksheetFunction.Max(Range("A1:A499"))
End Sub
 

Panoos64

Well-known Member
Joined
Mar 1, 2014
Messages
822
Perfect Alan, thank you so much for your time spent for my project. Hv a great day!
 

AlanY

Well-known Member
Joined
Oct 30, 2014
Messages
3,981
Office Version
365, 2019, 2016
Platform
Windows
you're welcome
 

Watch MrExcel Video

Forum statistics

Threads
1,102,302
Messages
5,486,052
Members
407,529
Latest member
netojose

This Week's Hot Topics

Top