OpenOffice.info

Verfasst: **Do, 15.09.2011 12:02**

Hallo.
Ich habe eine wahrscheinlich relativ triviale Frage auf die ich allerdings bisher nirgens eine Antwort gefunden habe.
Ich möchte (autmomatisch) über alle Zeilen einer Spalte in einer Tabelle eine Summe ziehen.

Im Moment habe ich in meinem Summenfeld folgendes stehen:
=sum(<Leistungen.E2:E6>)

Ich hätte gern so was wie:
=sum(<Leistungen.E2:E(ANZAHL-DER-ZEILEN-IN-E)>)
damit ich nicht jedesmal meine summenfunktion anpassen muss wenn ich zeilen hinzufüge oder lösche.

Geht das?

Danke.
Markus

Verfasst: **Do, 15.09.2011 12:17**

quarkus hat geschrieben:Geht das?

Eine solche Funktion ist nicht eingebaut, aber...

Wenn es um die Ausgabe der Summe in der Kopfzeile einer WRITER-Tabelle geht, dann hab' ich ein Makro dafür

Code: Alles auswählen

REM*****BASIC*****
Sub setTableSumRow
Dim oVCurs
Dim oCurCell
Dim oTable
Dim lCount as Long ' Row counter

oVCurs = ThisComponent.getCurrentController().getViewCursor()

REM Is the cursor in a table?
If IsEmpty(oVCurs.TextTable) Then
Print "The cursor is NOT in a table"
Exit Sub
End If

oTable = oVCurs.TextTable
lCount= oTable.getRows.Count 

oCell = oTable.getCellByPosition(1,0)
oCell.setFormula ("=Sum <B2:B" & lCount & ">" )
End Sub

In der letzten Zeile ist natürlich noch die Formel zu ändern.
Ausserdem der Spaltenindex in .getCellByPosition: 1=B, 4=E

Kommst Du damit zurecht?

OpenOffice.info

SUMME über ALLE Zeilen einer Tabelle

SUMME über ALLE Zeilen einer Tabelle

Re: SUMME über ALLE Zeilen einer Tabelle