VBA: Find latest date in row and return header and data

[omnivl]

I have a header and rows of data that looks like so:

Status	Contract Number	Comments	Advertised	Closed	Evaluated	Contract Value	Awarded
Executed	1	waiting on david	20/11/17	30/11/17	1/12/17	$50,000
Open	2	Finalising contract	10/11/17	16/11/17
Open	3	not sure	5/11/18	10/11/18	13/11/18	$21,000	15/11/18

<tbody>
</tbody>

Firstly i need to look at status, if the status is "Executed" then ignore and go to the next row. It then needs to find the latest date entered for that row, in row 2 this would be 16/11/17, it needs to then put into an array the contract number "2", then comments "Finalising contract" then the date 16/11/17 followed by the latest date header Closed

Once they are in an array i need to print them to sheet1 in the workbook for example

Contract Number: 2, Closed - 16/11/17, Finalising contract

Contract Number: 3, Awarded - 15/11/18, not sure

<tbody>
</tbody>

Any help would be really appreciated!

Thanks
Ben

 

[Keebellah]

Hi, how about attaching a sample file? Makes it easier than retyping and explaining

 

[omnivl]

Hi Keebellah

Thanks for your interest in helping me, got a bit confused tried worksheet function max, arrays but could not figure it out.
Attached filehttps://we.tl/t-SUke5U9d96

 

[Keebellah]

Which columns are the columns you want to check the date?
There is a whole range with dates and some non-date values in between.
I adde a column with this formula but since I don't know the whole range:

=IF($A2="Executed","",MAX(AQ2,AO2,AN2,AM2,AK2,AJ2,AI2,AH2,Q2,R2,S2,T2,U2,V2,W2))