woher hast du denn die Funktion?  Selbst geschrieben ja wohl eher nicht.  Verlinke doch bitte die Threads wenn die Aufgabe schon eine Vorgeschichte hat. 

1. einfärben macht man mit bedingter Formatierung, 

2. match() findet nur den ersten Treffer

3. diese Funktion färbt gar nichts grün.

4. du selektierst alle sichtbaren Zellen in  1 ! (einer)  Datenspalte und in der Function läuft die For schleife über alle Spalten der Selection. Das dürfte etwas unglücklich zusammengebastelt sein.