Makro um eine Formel zu vererben

[tomelo]

Hallo zusammen,
ich habe nachstehende Frage schon in calc gestellt und denke mir das es wahrscheinlich mit einem Makro gehen könnte.
Es geht darum das ich eine Rechnung-/Detailauflistungsvorlage suche, (wäre der einfachste weg, da ich Anfänger bin.) oder ich stelle mir solch eine Vorlage selbst zusamme.
Diese Vorlage soll so aufgebaut sein das ich nur 1 Seite erstellen kann oder 2,3,4 .....Seiten. Eine Vorlage nur mit einer Seite zu erstellen, schaff ich noch aber mehrere bekomme ich nur hin wenn ich mit umständlichen einfügen und kopieren händisch arbeite.
Gibt es eine Möglichkeit,dass die untere Zeile mit den Angaben des gesamten Rechnungsbetrages und der Ausweißung der Mwst. immer um eine Zeile weiter nach unten rückt wenn z.B. in der vorletzten Zeile vor dem Rechnungsendbetrag eine Position eíngefügt wird(Was bewirken würde, dass dadurch unendlich viele Seiten entstehen können). Des weiteren sollte die Formel welche in jeder einzelnen Positon die Summe zusammenfasst(z.B.=WENN(D10>0;D10*E10;"")), automatisch mit eingefügt werden, wenn wie oben beschrieben eine zusätzlich Position mit eingefügt wird.
Für dieses Problem suche ich leider eine Lösung/Makro oder eine bereits existierende kostenlose Vorlage.
Und wenn es ein Makro gibt, was muß ich tun um es einzufügen? Bin ja leider unwissend.

Im vorraus besten Dank.
Tomelo

[komma4]

Du fragst nach Allem (Vorlagen, Formeln, Makros) und Nichts (Status "unwissend"): wie soll Dein Posting beanwortet werden können?

Je nachdem, wie viele Rechnungen erstellt werden, kommen unterschiedliche Lösungen in Frage. Äussere Dich mal dazu.

Und: je komfortabler es sein soll, desto mehr Aufwand wirst Du haben.


Zu Deiner Frage über Makros: kennst Du das erste sticky Posting in diesem Forumsbereich?

Oder im ooowiki.de

Zur Frage des Postings:
um Formeln "zu vererben" würde ich wahrscheinlich so etwas benutzen:

Code: Alles auswählen

qFormula = oSheet.getCellByPosition(i,nRow-1).Formula
qValue = oSheet.getCellByPosition(i,nRow-1).Value
qString = oSheet.getCellByPosition(i,nRow-1).String
If qFormula <> qString AND Val(qFormula) <> qValue Then
 oRange = oSheet.getCellRangeByPosition(i,nRow-1,i,nRow)
 oRange.fillAuto(com.sun.star.sheet.FillDirection.TO_BOTTOM, 1) 
[...]

siehe: Komplettes Beispiel von Uros

Ich hoffe, dass dies irgend jemanden weiter hilft.

[tomelo]

Sorry mein Fehler,
unwissend triffts eigentlich ganz gut, hab noch nie vorher in einem forum gepostet. Ich versuche mal mein Anliegen näher zu beschreiben.
ich bin auf der suche nach einer Rechnungsvorlage/Detailauflistungsvorlage, bei der verschiedene Kriterien erfü�t sein müs�n.
1) einfüge�eines Firmenlogos
2) Adressfeld
3) folgende Spalten sollen aufgelistet sein Pos | Artikel-Nr | Beschreibung | Menge | Preis | Summe
4) die erste Seite soll anders aussehen als die nachfolgenden, ohne Adressfeld
5) es soll nach Eingabe der einzelnen Positionen eine Gesamtsumme addiert werden mit der gülti�n Mwst.
6) sollten die einzelnen Positionen nicht mehr auf eine Seite passen, soll ein automatischer Seitenumbruch stattfinden, mit Übert�g Zusammenfassung oben auf der nächste�Seite
7) unten auf jeder Seite sollen die notwendigen Firmendaten stehen.
und zusätzlich�ie Anforderung wie ich sie bei der ersten Anfrage eingestellt habe.
Weiß leider�icht ob diese Beschreibung so ausreicht, falls ihr noch Fragen habt beantworte ich sie gerne.
Gruß Tomelo�