OpenOffice.info

Hey Thomas ! - Klasse :P
Ich hatte im Code nicht "Standard", sonder "Folie1" stehen. Das wars. Wär ich nie draufgekommen. Vielen Dank.

So gehts:

sub LabelMitTextfuellen
Dim oDocument As Object
Dim oForm AS Object
Dim oLabel As Object
dim oDrawPage as object

oDocument = ThisComponent
oForm ...

Dank für Deinen Tipp !
Jetzt sieht mein Code so aus:


sub LabelMitTextfuellen
Dim oDocument As Object
Dim oForm AS Object
Dim oLabel As Object

oDocument = ThisComponent
oForm = oDocument.DrawPages(0).Forms.getByName("Folie1")
oLabel = oForm.GetByName( "Beschriftungsfeld" )
oLabel.Label ...

Ein Beispiel habe ich gefunden. Ich verwende nur keinen Dialog. Das Steuerelement (Label, Texbox usw.) liegt direkt auf der Folie. Ein Objekt "Form" gibt es in meinem Fall nicht.

Folgendes Beispiel verwendet einen Dialog. Wie geht es ohne?


Sub write_label
Dim oDocument As Object
Dim oForm As ...

Du schreibst ein Makro, sprichst das Formular an, besorgst dir das Objekt der Textbox, und übergibst den Wert des Inhaltes. Der wird dann angezeigt.

Genau das möchte ich machen. Wie?
Lupo

Ich möchte während einer Präsentation Text- und Beschriftungsfelder nutzen (mit Werten aus einem Makro füllen). In PowerPoint würde die Lösung etwa so aussehen:
TextBox1.Text = "Hallo!"
Wie bekomme ich das mit Impress hin? Habe schon die OOHilfe durchsucht sowie einige OO-Foren. Bin ratlos. Freue ...

Hi !
Ich möchte die Zielwertsuche von Calc via Makro aufrufen. Damit will ich mir das ständige Ausfüllen der Zielwertsuche ersparen.
In Excel funktioniert das mit "GoalSeek". Gibt es eine vergleichbare Funktion in OpenOffice-Basic ? Habe weder in diesem Forum noch in der Programmhilfe Hinweise ...

Betrifft die OOo Version 2.0 (1.9.54).
Bisher konnte man in Impress z. B. Graphiken einfügen und deren Größe mit der Maus anpassen. Sobald ein Objekt (Graphik, Textbox usw.) ausgewählt war, wurde ein grüner Rand mit kleinen Vierecken angezeigt. Diese Funktion ist nun nicht mehr verfügbar ?! Ist das ...

Hi !

In einem SpreadSheet sollen zwei Optionsfelder zur Verfügung stehen.
Wenn das erste Optionsfeld markiert ist, soll die Zelle A1 den Wert '1' erhalten; wenn das zweite gewählt ist, soll die Zelle den Wert '2' annehmen.

Muss ich dafür ein Makro schreiben ?! Eine Funktion wie bei Listboxen ...