Wie kann ich diese Formel in VBA schreiben, da ich mehr als diese 7 Abfragen habe, insgesamt sind es 28, das Ergebnis sollim 2 Tabellenblatt dann in Zelle B17 ausgegeben werden
=WENN(GLÄTTEN(Source!$A7)="Artikelnr./Leistungsbez.";ZÄHLENWENN(Source!$A9:A65536;"A:*");WENN(GLÄTTEN(Source!$A7)="Artikelbez./Leistungsbez.";ZÄHLENWENN(Source!$A9:A65536;"A:*");WENN(GLÄTTEN(Source!$A7)="eig. Bestellnr./Leistungsbez.";ZÄHLENWENN(Source!$A9:A65536;"A:*");WENN(GLÄTTEN(Source!$A7)="Lieferantenbestellnr./Leistungsbez.";ZÄHLENWENN(Source!$A9:A65536;"A:*");WENN(GLÄTTEN(Source!$A7)="Artikelgruppe/Leistungsbez.";ZÄHLENWENN(Source!$A9:A65536;"A:*");WENN(GLÄTTEN(Source!$A7)="def.eig.Bestellnr./Leistungsbez.";ZÄHLENWENN(Source!$A9:A65536;"A:*");WENN(GLÄTTEN(Source!$C7)="def.Lieferantenbestnr./Leistungsbez.";ZÄHLENWENN(Source!$A9:A65536;"A:*");0)))))))
Danke für eure Hilfe!