hier die Fortsetzung zu dem bereits archivierten Teil deiner Frage
https://www.herber.de/forum/archiv/884to888/t886748.htm#888128
Zur Überprüfung, ob in dem Eingabebereich bereits Einträge vorhanden sind kannst du die Funktion ANZAHL (zählt Zellen mit numerischen Werten (Zahlen, Datum, Zeit)) oder ANZAHL2 (zählt Zellen mit beliebigen Inhalten) verwenden.
im Code schaut die Formelberechnung mir ANZAHL für HA-Mitarbeiter dann so :
Case "HA"
TabName = Periode
Formel = "=IF(COUNT('" & Left(Datei, PosLast) _
& "[" & Mid(Datei, PosLast + 1) & "]" & Periode _
& "'!R9C2:R36C6)>0,""X"","""")"
Für ANZAHL2 ist die englische Bezeichnung COUNTA
Kleiner Tipp um Formel-Text in VBA zu erzeugen:
Zeichne die Eingabe der entsprechenden Formel mit dem Makro-Recorder auf. Dann hast du das Grundgerüst des Codes für die Formel zusammen - insbesondere auch die Englische Bezeichnung der verwendeten Funktionen. Anschließend muss man sich "nur" noch um die Teile kümmern, die das Makro variabel ändern soll, wobei die Formel dann aus entsprechenden "Textbrocken" zusammengebastelt werden muss. Eine Besonderheit sind dabei Anführungszeichen " in der Formel. Diese müssen im VBA-Code jeweils verdoppelt werden.
Gruß
Franz
P.S.
Wo ist denn "deine Gegend" damit ich mir mein Freigetränk abholen kann.