19.07.2007, 08:30

Christoph Jopp, Marion Exner

Funktion im Eigenbau

Mit Calc können Sie auch eigene Funktionen basteln. Damit können Sie zum Beispiel den Wert einer Zelle überwachen, die eventuell außerhalb des sichtbaren Bereichs liegt. Calc soll in unserem Beispiel eine Warnmeldung ausgeben, wenn der Betrag in einer Zelle, die den Gewinn aus einem Projekt anzeigt, unter einen bestimmten Wert fällt.
Dazu weisen wir in der Ausgaben-Tabelle einer Zelle die passende Funktion zu. Die kleine Funktion erstellen Sie im Basic-Editor, den Sie über "Extras, Macros,Macros" verwalten, OpenOffice.org Basic" erreichen. Unter "Meine Macros, Standard" ist "Module 1" eventuell bereits markiert, und Sie müssen nur noch auf "Bearbeiten" klicken.
Die vorhandenen Zeilen "Sub Main" und "End Sub" können Sie einfach löschen. Die Funktion im Beispiel besteht aus folgendem Code:
Mit "Function" und "End Function" beginnen und beenden Sie jede Funktion. Direkt hinter "Function" vergeben Sie den Namen, den Sie auch in Calc als Funktionsnamen eintragen können, hier "VORSICHT". In den anschließenden Klammern übergeben Sie der Funktion zwei Parameter, die Sie ebenfalls beim Eintragen der Funktion in Calc benutzen.
Die Parameter trennen Sie durch ein Komma. Die ganze Funktion besteht aus einer Bedingung zwischen "if" (wenn) und "End if" . Ist die Bedingung erfüllt, also der erste Parameter kleiner als der zweite, wird per "Msg Box" ein Dialog ausgegeben, der aus der Verkettung eines Textes und der Parameterwerte mittels "+"Zeichen besteht.
Speichern Sie die Funktion durch einen Klick auf das Speichern-Symbol, schließen Sie den Editor, und kehren Sie in Ihr Tabellendokument zurück. Wählen Sie nun die Tabelle aus, in der die Meldung erscheinen soll, in unserem Beispiel bei den Ausgaben des Projekts.
Markieren Sie eine leere Zelle, geben Sie "=VORSICHT(" ein, und klicken Sie in der Gewinn-/Verlust-Tabelle auf die Zelle mit dem Gesamtgewinn. In der Eingabezeile ergänzen Sie hier jetzt nach einem Semikolon ";" den gewünschten Grenzwert für die Warnung. Testen Sie die Funktion, indem Sie probeweise einmal einen hohen Grenzwert eingeben.
Lesen Sie auf der nächsten Seite:
Diskutieren Sie mit anderen Lesern über dieses Thema:
PC-WELT-Experten lösen Ihr PC-Problem
Immer informiert mit dem PC-WELT Newsletter
Best-of PC-WELT   PC-WELT Apps
PC-WELT Business-IT   PC-WELT Community
Facebook-Freunde empfehlen
3x PC-WELT testen!
Ja, ich teste 3x die PC-WELT mit DVD für nur 11,90 € (19,- Sfr). Den 4 GB USB-Stick erhalte ich gratis dazu.
PC-WELT 6/ 2012
Anrede:
Vorname:
Nachname:
Straße/Nr:
PLZ/Ort:
Land:
E-Mail:
Nur wenn ich innerhalb von 2 Wochen nach Erhalt der 3. Ausgabe nichts von mir hören lasse, möchte ich die PC-WELT mit DVD zum gleichen Preis weiterbeziehen (D: 55,80 €/Jahr, EU: 64,80 €/Jahr, CH: 103,70 Sfr/Jahr). Nach dem Testzeitraum ist der Bezug jederzeit kündbar.
Ich bin damit einverstanden, dass die IDG Tech Media GmbH und ihre Partner mich per E-Mail über interessante Vorteilsangebote informieren.
- Anzeige -
Angebote für PC-WELT-Leser

PC-WELT Verleihshop
Keine Abogebühren oder unnötige Vertragsbindungen. DVDs und Spiele bequem von zu Hause aus leihen.

Tarifrechner
Der PC-WELT Preisvergleich für Strom, Gas und DSL. Hier können Sie Tarife vergleichen und bequem viel Geld sparen.

PC-WELT Preisvergleich
In unserem großen Preisvergleich finden Sie die günstigsten Preise und alle redaktionellen Tests auf einen Blick.

- Anzeige -
Marktplatz
DELL

Dell Vostro 3550 Business Notebook
Komfort eines erweiterten Arbeitsbereichs, ohne mobile Anforderungen zu beeinträchtigen.

Congstar

congstar Full Flat nur noch 39,99€
Endlos in alle dt. Netze telefonieren, beste D-Netz-Qualität.

Congstar

Der günstige Tarif für Vielsurfer
congstar Smart 100. Surfen und telefonieren im besten D-Netz.

CosmosDirekt

CosmosDirekt Riesterrente
Mit der Riester-Rente privat mit hohen staatlichen Zulagen fürs Alter vorsorgen.

224676
Content Management by InterRed