OpenOffice.info

wie kann ich diese Formel die in Excel einwandrei funktioniert

Function letzterWert(Bereich As Range) As Variant
Dim Zelle As Object
For Each Zelle In Bereich
If Zelle <> "" Then letzterWert = Zelle
Next
End Function

dann ein aufruf in einer Zelle =letzterWert(Bereich)

an Openoffice anpassen da es die Funktion for each nicht gibt
Ziel ist es den letzen wert einer Zeile zu erhalten in der aber auch Leerzellen vorhanden sind

Hallo
Mit zb. der Calc-formel: als Matrix-funktion abgeschlossen erhälst du die letzte gefüllte Zelle in A1:K1

Gruß Karo

erstmal Danke komme aber trotzdem nicht weiter
habe zum Test von A1 bis D4 jeweils Zahlen (A1=1,B1=leer,C1=3,D1=4) und deine formel etwas abgeändert =INDIREKT(ADRESSE(1;MAX(ZEILE(A1:D1)*(A1:D1<>""))))
es kommt aber immer der wert 1 heraus, es soll aber der letzte Wert (4) angezeigt werden

mfg micha

Hallo
Der Formelteil: MAX(ZEILE(A1:D1)*(A1:D1<>"")
kann eben nichts anderes als 1 zurückgeben -> Daher gibt die ganze Formel immer den Inhalt von A1 zurück

Ändere ZEILE um in SPALTE und vergiss nicht als Matrix abzuschliessen.

Gruß Karo