Birthday Excel to GUI Topic is solved

[nik_the_giant]

Okay, I'll try that and hope I use it correctly

[nik_the_giant]

This code shows me only 2 dates with "05" not all...

You already had the technique to find first and last date from @mikeyww's script above. You have to put the elements together:

Code: Select all

xl := ComObjActive("excel.application")
for c in xl.activesheet.usedrange.columns(3).cells
	{
	part := strsplit(c.text,".")
	if (part.2 = "05")
		{
		date := part.3 part.2 part.1
		(date < first || !first) && (first := date, res1 := c.offset(0,-2).text " " c.offset(0,-1).text " " c.text)
		(date > last           ) && (last  := date, res2 := c.offset(0,-2).text " " c.offset(0,-1).text " " c.text)
		}
	}
msgbox % res1 "`n`n" res2

[flyingDman]

You said you wanted "Only the first and the last"/ Please be detailed. In addition, you have all the elements to try yourself. Please show some initiative!.

[nik_the_giant]

Yes, but these are the last two not the first and last,
that's why I don't understand it

You said you wanted "Only the first and the last"/ Please be detailed. In addition, you have all the elements to try yourself. Please show some initiative!.

Here is the Excel and i think it's because the year isn't it?


EDIT// i changed the excel a little bit and it worked

[flyingDman]

Yes, we look at part.3 part.2 part.1. So because it tests for "05" you would only need to test for the day (= part.1)