OpenOffice.info

sub speichertest
rem ----------------------------------------------------------------------
rem define variables
dim document   as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

rem ----------------------------------------------------------------------
dim args1(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = "FilterName"
args1(0).Value = "writer8"

dispatcher.executeDispatch(document, ".uno:SaveAs", "", 0, args1())

end sub

Hey Sigmund,

wenn Du den "Speichern unter" Dialog angezeigt baen möchtest, so brauchst Du einen Dispatcher-Code. Oder Du baust IHn die komplett selbst, das sit aber viel Aufwand...Hihi.

Am einfachsten: Zeichne Dir das Makro auf. Im Code dann musst Du allerdings die Zeilen mit der URL rauslöschen oder auskommentieren - sonst öffnet sich kein Dialog.

So sollte der Code aussehen:

[code]sub speichertest
rem ----------------------------------------------------------------------
rem define variables
dim document as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

rem ----------------------------------------------------------------------
dim args1(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = "FilterName"
args1(0).Value = "writer8"

dispatcher.executeDispatch(document, ".uno:SaveAs", "", 0, args1())

end sub[/code]

Warum bei Dir *.ott voreingestellt ist...??? keine Ahnung. Musste mal ein wenig durch die Optionen schauen - möglicherweise haste das dort irgendwo vordefiniert.

Vielleicht hilft es

Gruss
Tom

Hallo,

ich schätze der folgende Link hilft Dir weiter:
[url]http://www.dannenhoefer.de/faqstarbasic/Wiekannmaneinenffnen-oderSpeichern-Dialo.html#Zweig146[/url]

Die FAQ wird zwar nicht mehr fortgeschrieben hat aber viele Beispiele für den Anfang. Ich habe den Link mal auf das Öffnen des FilePickers gesetzt.

Mfg, Jörn

Ich will so vorgehen: Desktop (rechter Mausklick)
[attachment=0]Datei-neu.JPG[/attachment]
Dann erstellt Writer mir eine neue [b]odt[/b]-Datei, die automatisch so heißt:
[b]OpenDocument Text (neu).odt[/b]. Danach benenne ich die Datei (auf dem Desktop)
um: in, z.B., [b]Name.odt[/b].

Dann habe ich ein [b]Makro [/b]erstellt. Ich nenne das Makro [b]„Dateiname“[/b].
Das kann das Makro alles:
1.Cursor setzen (Schriftart: Arial, Schriftschnitt: fett, Größe: 10 pt, zentriert)
2.Einfügen
3.Feldbefehl
4.Andere...
5.Dateiname
6.Einfügen
7.Schließen
Bis hier habe ich es hingekriegt. Das war nicht schwer!
Wie ich ein Makro, als Symbol in der Symbol-Leiste einfügen kann, weiß ich-
dank FORUM Mitglied „F3K Total“ - jetzt auch schon.

[u]So soll das Makro weitergehen:[/u]
[b]8[/b].Datei speichern unter... [b][b][color=#FF0000]als odt-Datei auf dem Desktop[/color][/b]
[/b]
[b][color=#0000FF]1.Problem:[/color][/b] Das Fenster [b]Speichern unter...[/b] wird aber [b][size=150][color=#FF0000][color=#0000FF]nicht [/color][/color][/size][/b]geöffnet
[b][color=#0000FF]2.Problem:[/color][/b] Wenn ich manuell so vorgehe: [b]Speichern unter...[/b] bietet mir Writer an:
ODF Textdokumentenvorlage [b](.ott) (*.ott)[/b]
Ich verstehe nicht, warum Writer mir die Dateiendung [b].ott [/b]und nicht [b].odt[/b] anbietet.
[b][color=#0000FF][color=#0000FF]3.Problem:[/color][/color][/b] wenn ich Punkt: [b][color=#0000FF]2.Problem[/color][/b] ausführe, dann habe ich [b]2[/b] odt-Dateien
auf dem Desktop. Ich will ja aber nur [b]1 Datei[/b] haben.

Ich war nicht faul, ich habe lange versucht, dieses Makro hinzukriegen.
Wäre nett, wenn jemand eine Lösung für mein Makro hätte.
[u]Anmerkung: [/u]Ich habe noch nie in „OpenOffice Basic“ programmiert.
Kann mir jemand eine gute Quelle (einfache Anleitungen) für „OpenOffice Basic“ Programmierung nennen?
Danke schön
Sigmund Keller