Code
12.03.2004 12:46:13
Harald
ich möchte für 2 Fälle Zeileninhalte per VBA löschen.
Fall 1:
In Zelle A2 bis max. A8 steht das Tagesdatum (z.B. 20040309)
Die Datei für diesen Tag heißt NIO_FS_20040309
Nun kommt es häufiger vor, dass sich in A2 bis A8 andere Datumsangaben einschleichen :-( (z.B. 20040309). Liegt wohl an der Quelldatenbank von Oracle.
Wie auch immer.
Sollte in A2:A8 ein Datum stehen, dass nicht mit der Datumsangabe im Dateinamen übereinstimmt ( =VALUE(MID(CELL(""Dateiname""),25,8)) ) sollen die Zeileninhalte dieser Zeile gelöscht werden (clearcontents)
Fall 2:
In Zellen B2 bis max B8 stehen Zahlen von 0 bis 4 (Doppelnennung möglich).
Ich benötige lediglich die Zeilen mit den Angaben 1, 2 und 3.
Die restlichen Zeileninhalte ebenfalls löschen und die übrig gebliebenen Zeilen in der Reihenfolge 1,2,3 direkt untereinander stellen, da ein Teilergebnis-Makro folgt.
Habs per Recorder versucht und auch manuell...ich kriegs nicht zum Laufen.
Dim Gruß as Nett
Harald