VBA Verweis & Finden Funktion
23.07.2014 10:41:10
JesseB_90
ich habe folgendes Problem welches ich per VBA lösen möchte, da ein Formelabgleich Ewigkeiten dauert.
Beispieldatei: https://www.herber.de/bbs/user/91658.xlsx
Zum Problem:
Es soll ein Arbeitsplan (im Beispiel A1:D3) aus einer Liste entstehen (A8:D11). Die Termin sind aufgelistet und haben folgende Werte Terminname, Anfangsdatum, Enddatum und Teilnehmer. Jeder Termin kann entweder ein oder mehrer Teilnehemer haben. Man hat aber nicht jeden Tag einen Termin. Des Weiteren gibt es Termine, die storniert wurden, allerdings trotzdem aufgeführt werden müssen.
Bisher löse ich das Problem auf folgende Weise:
=VERWEIS(9;1/FINDEN($A9;Termine'!$H$1:Termine'!$H$1000)/(Termine'!$C$1:Termine'!$C$1000=BU$3); Termine'!$G$1:Termine'!$G$1000))
Mit einer Menge Wenn-Abfragen werden dann noch Fehler-Meldungen und die Stornomeldung rausgenommen. Der Code ist ca 1600 Zeichen lang. Bei knapp 3500 Zellen könnt ihr euch sicher vorstellen, dass dies nicht ganz schnell läuft.
Ich hoffe ihr könnt mir helfen und ich danke euch im Voraus :)
Schönen Gruß
Jesse