Postojeci makro koristi Autofilter. Da bi postavili dodatni uslov, a da se ne piše kod iz početka mislim da je najlakše da napraviš pomoćnu kolonu u kojoj ćeš pripremiti podatke za Autofilter prema tvojim uslovima
Znači iz kolone Salesman u kolonu Pom (F kod mene) treba prepisati ime iz istog reda samo u slučaju kada u nastavku liste ne postoji veći datum za istog Customer-a. Za to koristiš sledeću formulu
Code:
=IF(A4<=SUMPRODUCT(MAX((B5:$B$25=B4)*A5:$A$25)),"",C4)
SUMPRODUCT vraća maksimalni datum za pojedinog kupca. Obrati pažnju na korišćenje relativnih i apsolutnih adresa koje nam omogućuje da pretražimo listu od naredne ćelije do kraja.
Kad smo tako pripremili podatke, sada u makrou umesto kolone 3 za autofilter uzimaš kolonu 6(uz naravno proširenje liste podataka rData)
Dodao sam u prepravljenom primeru i forsiranu rekalkulaciju lista Data, jer je kod tebe automatska rekalkulacija isključena.
Potpis
Nije to loše Rembrante, samo što ne bi dodao još malo boje?