a) lastIndex =

application("te_todaysDate") =

FormatDateTime(Now(),2) = 28-05-2017

b) lastIndex = 1

lastIndex = 1

1) lastIndex = 1

2) lastIndex = 1

Application ("lastAutoresponderIndex") = 1

RowCnt = 0

3) lastIndex = 1

4) lastIndex = 2