wenn man denkt, man kommt zurecht, wird man eines besseren belehrt.
Ich würde mich freuen, wenn mir jemand entweder mein Brett vor'm Kopf wegnimmt, oder mir mit einer Lösung geholfen wird.
Ich habe eine Arbeitsmappe.
Darin gibt es ein Tabellenblatt - Tabelle 1.
Auf diesem steht in Zelle C2 (wäre flexibel) das aktuelle Datum, welches als Datum kurz formatiert ist.
In Zeile 1 stehen ab Spalte E (oder 5) fortlaufend die Daten des Jahres, angefangen mit 01.01.2021 bis eben Silvester, ebenfalls formatiert als Datum kurz. Weil ich es ein wenig nett halten möchte, berechne ich 01.01.2021 per Formel =Datum(Jahr(Z2S3);1;1) und die entsprechenden Folgedaten per =ZS(-1)+1.
Soweit ist alles gut und funktioniert.
Nun möchte ich per VBA eine Variable mit der Adresse (und vielleicht direkt auch die Spaltennummer) ausgibt, in der das Datum aus C2 und der zugehörige Match aus Zeile 1 übereinstimmen.
Ich habe aus einer anderen Datei einen Code genommen, der dort genau macht, was er soll (auch wenn es ggf nicht die schönste Lösung ist). Allerdings habe ich dort keine Daten sondern Zahlen.
Ich habe heute beinah den ganzen Vormittag nach einer Lösung gesucht und vieles ausprobiert (nur leider nicht alles aufbewahrt).
Meist bekomme ich (mit der aktuellen Lösung) einen Laufzeitfehler 91 mit Hinweis "Objektvariable oder with-blockvariable nicht festgelegt". Das bringt mich leider auch nicht weiter, weil ich die angebotene Hilfe nicht entknotet bekomme.
Schreibe ich das Datum in dieselbe Zeile, in der ich Suche, macht der Code, was er beinah soll. Er zeigt mir die Zelle, in die ich das Datum eingetragen habe (Bsp. cells(1,60). Nicht aber die aus dem Kalender.
Anbei noch mein Konstrukt in einer Beispieldatei.
https://www.herber.de/bbs/user/143380.xlsm
Vielen Dank schonmal für Unterstützung.
Gruß