Hallo xlKing, nochmals vielen Dank für deine Hilfe.
Kein Aprilscherz :) und ich wünsche angenehme Ostern.
Ich hatte voreilig gehandelt deine Antworten als "gelöst" zu markieren. Die Zicken, die mir der VBA-Editor präsentierte will ich gar nicht erst auflisten.
Kurz und gut. Ich habe NULL Ahnung VBA-Code zu schreiben. Meine betreffende Excel-Statistik-Mappe habe ich komplett mit dem Makrorecorder
entwickelt und funktioniert für meine Ansprüche hervorragend. Für das vorher genanntes Problem habe ich eine Lösung, die aber mangels
Eleganz verbessert werden soll, um dadurch eine mögliche Fehlerquelle in der Datenerfassung auszumerzen und unnötige manuelle Tätigkeiten
vermeiden soll.
Es folgt der Code, den mir der Makrorecorder präsentiert:
Range("D5").Select
Selection.Copy
Sheets("003-Datenbank").Select
Cells.Find(What:="01.04.18", After:=ActiveCell, LookIn:=xlValues, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
Das gesamte Makro wird von dem Arbeitsblatt aus gestartet, auf dem die Zelle "D5" ausgewählt wurde. Diese Zelle erhält das manuell eingetragene
Datum des Tages, an dem man mit der Mappe arbeitet. Dieses Datum wurde in dem -Sheet("003-Datenbank")- über den Menüpunkt
"Bearbeiten/Finden" gefunden und die Zelle wurde aktiviert.
Gebe ich testweise irgendein anderes Datum in meiner Referenzzelle "D5" ein und starte das Makro wird stets die Zelle mit dem Datum 01.04.18
markiert.
Worauf es also ankommt ist, dass das Makro fähig ist, jedes gesuchte Datum zu finden und die entsprechende Zelle zu markieren, ausgehend vom
dem Datum, das im Sheet("004-Heute"), Zelle "D5" eingetragen wurde.
Ich bin noch optimistisch, dass das gelöst werden kann. :)
|