Servus,
hab da mal ein kleines Programm geschrieben...
bin allerdings absoluter Anfänger!
Wie kann ich zB unten bei
oZelle.Formula = "
=Sum(B2^0;B3^0;B4^0;B5^0;B6^0;B7^0;B8^0)"
die Formel so umgestalten das dort nur B2^0 To B8^0 steht oder sowas in der Art.
Und wie kann ich das machen, dass die Formel sich Automatisch erweitert, wenn zB bei B9 und B10... auch Zahlen stehen (also die Tabelle beliebig groß wird)?
Code: Alles auswählen
Sub Test
Dim oCalcDokument as Object
Dim oTabellenblatt as Object
Dim oZelle as Object
oCalcDokument = ThisComponent
oTabellenblatt = oCalcDokument.Sheets(0)
oZelle = oTabellenblatt.getCellByPosition (4,1)
oZelle.Formula = "=Sum(B2^0;B3^0;B4^0;B5^0;B6^0;B7^0;B8^0)"
End Sub
Vielen Dank für eure Hilfe.
Moderation,4: verschoben in BASIC-Bereich, Betreff konkretisiert; bitte CODE-Tags verwenden