HERBERS Excel-Forum - das Archiv

Thema: Sverweis - Makro für Rahmen | Herbers Excel-Forum

Sverweis - Makro für Rahmen
Burghard

Hallo,
ich bräuchte mal Hilfe. Ich habe einen Kalender mit 3 x Bedingter Formatierung. In der Bei-spieltabelle (nur Januar) fehlen einige Bezüge, deshalb fehlt die Farbanzeige mittels Bedingter Formatierung, beim vollständigen Kalender klappt alles.
Mein Problem:
Ich möchte per VBA Makro (weil 3x Bedingte Formatierung belegt ist) den Bereich A15 bis G17 per SVERWEIS abfragen.
Wenn das Datum 05.01. (Bereich A15 bis G17) mit dem Kalenderdatum 5.1. übereinstimmt, dann soll um den 5.1. ein Rahmen in fettem Blau geschrieben werden.
Dito für den 20.01.
Bei einer Makro-Lösung für den Januar könnte ich mir das dann wohl für die anderen Monate selbst anpassen.
Ich habe die Beispieltabelle (Kalender_Geb.xls) hochgeladen.
https://www.herber.de/bbs/user/65718.xls
Schönen Gruß
Burghard

AW: Sverweis - Makro für Rahmen
Chris

Servus Burghard,
so wie du das Datum eingetragen hast (05.01.),s. Bsp:
https://www.herber.de/bbs/user/65726.xls
Die Makros stehen in Modul1 und werden über den CommandButton aufgerufen. makro3 löscht die Formate und Makro2 setzt dann die Rahmen, Makro t sucht den jeweiligen Eintrag.
Gruß
Chris
AW: noch kleiner Fehler
Burghard

Hallo Chris,
vielen Dank für die schnelle Hilfe. Es klappt fast perfekt. Allerdings nimmt das Makro nicht die Geburtstage von F15 bis F18 (ich habe einige Geburtstage testweise dazugetragen).
Ich habe eine Datei hochgeladen.
https://www.herber.de/bbs/user/65739.xls
Schönen Gruß
Burghard
AW: noch kleiner Fehler
Chris

Servus,
ich hab das mal angepasst und auch noch die Geschichte mit der bedingten Formatierung berücksichtigt (weiße Felder mit gleichen Zahlen z.B. 30, 31)
https://www.herber.de/bbs/user/65762.xls
Gruß
Chris
AW: klappt!
Burghard

Hallo Chris,
klappt astrein! Vielen Dank!
Schönen Gruß
Burghard
AW: klappt!
Chris

Servus,
hier noch ne kleine Nachbesserung, falls mal ein falscher Wert als datum oder nichts dasteht (gibt sonst einen Fehler):
https://www.herber.de/bbs/user/65798.xls
Gruß
Chris
RE: klappt! (Nachbesserung)
Burghard

Hallo Chris,
vielen Dank für die kleine Nachbesserung und die viele Arbeit!
Schönen Gruß
Burghard