Die Termine liegen wüst in einer Matrix deren Breite glücklicherweise immer gleich ist, deren Höhe (also Zeilen-Anzahl) von Tag zu Tag variiert.
Meiner Routine, die aus den Volltext-Terminen wieder richtige Daten machen soll, würde ich gern für jeden Tag ein Range-Objekt übergeben, dass genau einen Tag enthält.
Die erste Zeile eines Tages bekomme ich jeweils über die Find-Methode heraus.
Bis jetzt mach ich es so:
Dim rngMo, rngDi As Range
Set RgMo = Range("a:a").Find("Mo").Offset(0, 0).Range("a1:G4")
rngMo.Select
Manchmal sind es aber eben mehr oder weniger als 4 Zeilen
Wie berechne ich die Zeilendifferenz zwischen zwei Range-Objekten?
Wie muss dass aussehen?
Gruß,
Uwe