OpenOffice.info

Sub aufruf()
x = textzuformel("=sum(B1:B10)")
End Sub

Function textzuformel (formel as string)
thisComponent.sheets(0).getCellRangeByName("A1").formulaLocal = formel
textzuformel = "OK"
End Function

[quote]Aber unter welchen Umständen kann eine Funktion denn auch eine Rückgabeaktion liefern?[/quote]

indem man sie beispielsweise mit einem Makro aufruft oder ebend von einem anderen Blatt aufruft, wie Du selbst beschrieben hast.

starte z.B. Makro aufruf(), dieses ruft dann die eigentliche Funktion auf:

[code]Sub aufruf()
x = textzuformel("=sum(B1:B10)")
End Sub

Function textzuformel (formel as string)
thisComponent.sheets(0).getCellRangeByName("A1").formulaLocal = formel
textzuformel = "OK"
End Function[/code]

in obiger Funktion ist das Eintragen der Formel, die Rückgabeaktion, hingegen ist die Rückgabe von "OK" durch die Funktion nur die Ausgabe eines Rückgabewertes.



Gruß
Stephan

[quote="Stephan"][quote]Kann mir jemand sagen was ich machen muss, damit die Funktion überall funktioniert?[[quote]

garnichts, das Gewünschte funktioniert in Calc nicht, da benutzerdefinierte Funktionen, unter den genannten Umständen, stets nur einen Rückgabewert und keine Rückgabeaktion liefern.
[/qu[te][/quote][/quote][/quote]

Danke für die Antworten. Dass sheet(0) Tabelle 1 anspricht habe ich bedacht. Aber unter welchen Umständen kann eine Funktion denn auch eine Rückgabeaktion liefern?
Gruß, Aaron

Hallo aaron,

von Makro hab ich nicht wirklich viel Ahnung, aber
[quote]
[i] thisComponent.sheets([b]1[/b]).getCellRangeByName("Tabelle1.A1").formulaLocal = formel[/i]
[/quote]
besagt doch, das sheets(1) die Tabelle 2 anspricht, und Du aber in Tabelle1 eine Formel eintragen willst. Also wie soll sich Calc denn nun verhalten?

Bedenke bitte, dass die Zählweise bei sheets anders ist, als wie Du sie vor dir siehst. Das 1. Tabellenblatt hat immer die Nummer 0 das 2. dann die 1 und so weiter. Also
Tabelle [color=#0000FF][b]1[/b][/color] ist sheets([color=#FF0000][b]0[/b][/color])
Tabelle [color=#0000FF][b]2[/b][/color] ist sheets([color=#FF0000][b]1[/b][/color])
Tabelle [color=#0000FF][b]3[/b][/color] ist sheets([color=#FF0000][b]2[/b][/color])

Ansonsten kann ich dir nur empfehlen im richtigen Forum "[url=http://de.openoffice.info/viewforum.php?f=18]OOo Basic und Java[/url]" deine Anfrage noch mal neu zu stellen. Ferner, falls noch nicht geschehen, mal bei [url=http://www.dannenhoefer.de/faqstarbasic/index.html]Michael Dannenhöfer[/url] reinschaun.


Gruß
balu

[quote]Kann mir jemand sagen was ich machen muss, damit die Funktion überall funktioniert?[/quote]

garnichts, das Gewünschte funktioniert in Calc nicht, da benutzerdefinierte Funktionen, unter den genannten Umständen, stets nur einen Rückgabewert und keine Rückgabeaktion liefern.



Gruß
Stephan

Hallo,

ich habe ein Makro geschrieben welches einen String als Formel in eine Zelle schreibt:

[i]Function textzuformel (formel as string)
...
thisComponent.sheets(0).getCellRangeByName("A1").formulaLocal = formel
...[/i]

Funktioniert auch, allerdings nur wenn ich diese Funktion in sheet(1) aufrufe. Wenn ich diese Funktion in sheet(0) aufrufe passiert gar nichts.
Wenn ich die Codezeile in
[i] thisComponent.sheets([b]1[/b]).getCellRangeByName("A1").formulaLocal = formel[/i]
ändere, dann kann ich die Funktion in sheet(0) aufrufen, aber nicht mehr in sheet(1)

Kann mir jemand sagen was ich machen muss, damit die Funktion überall funktioniert?????
Nochwas: Wenn ich folgenden Code eingebe, und aus sheet(0) heraus aufrufe, erscheint eine Fehlermeldung: "Basic Laufzeitfehler. Es ist eine Exception aufgetreten. Type: com.sun.star.uno.RuntimeException Message: . "

[i] thisComponent.sheets([b]1[/b]).getCellRangeByName("Tabelle1.A1").formulaLocal = formel[/i]

Schon mal vielen Dank für eure Hilfe,
gruß aaron