neues Pulldownmenü in Menüleiste

Setup und Komponenten-übergreifende Probleme.

Moderator: Moderatoren

Toxitom
********
Beiträge: 3768
Registriert: Di, 12.08.2003 18:07
Wohnort: Wiesbaden
Kontaktdaten:

Beitrag von Toxitom »

Hallo Werner,

ein Umstieg ist immer gut, aber in speziellen Fällen ist OOo nicht kompatibel.

zu Frage 1.:
Unter Extras - Anpassen und dann in der Karteikarte Menü kannst Du die Menüeinträge nach Deinem Wunsch anpassen, verändern oder neue Menüs erstellen. Hilfe kontaktieren, ist recht aussagekräftig.

Zur Frage 2:
Makros sind nicht kompatibel. Die musst du komplett neu erstellen, wobei sich das Objektmodell von OOo völlig unterscheidet von MS. Der Makro-Rekorder hat bei vielen Aktionen so seine Schwierigkeiten. Das beschriebene Verhalten wundert mich also nicht. Ich verstehe allerdings auch nicht, was du eigentlich mit dem Makro willst. Beschreib das doch mal etwas genauer, dann kann ich dir vielleicht helfen.

Gruss
Thomas
Unterstützer LibreOffice, zertifizierter Trainer und Berater
Bücher: LibreOffice 6- Einstieg und Umstieg
Makros Grundlagen - LibreOffice / OpenOffice Basic
Toxitom
********
Beiträge: 3768
Registriert: Di, 12.08.2003 18:07
Wohnort: Wiesbaden
Kontaktdaten:

Beitrag von Toxitom »

Hallo Werner,

also, das ist leicht.
In OOo Basic gibt es die einfache Methode "loadComponentfromURL( URL, Frame, SearchFlags, FileProperties).
Damit kannst du dein Makro schnell programmieren und dieses dann z.B. mit einem selbst erstellten Menü-eintrag koppeln oder mit einem Icon und diesen auf einer Menüleiste ablegen.
Das Makro lautet z.B. bei einem File:

Code: Alles auswählen

sub OpenProjektA
	Dim doc as Object
	dim dummy()
	datei="file:///d:/Puffer/doc3.sxw"	
	doc=StarDesktop.loadComponentFromURL(datei,"_blank", 0, dummy())
end sub
Hast du mehrere Dateien, die geladen werden müssen, so bietet sich dafür ein Array an:

Code: Alles auswählen

sub OpenProjektB
	Dim doc as Object
	dim dummy()
	adatei=array("file:///d:/Puffer/doc3.sxw",_
				 "file:///d:/Puffer/doc4.sxc",_
			"file:///d:/daten/puffer/doc1.sxw")
	for i=0 to ubound(adatei())
		doc=StarDesktop.loadComponentFromURL(adatei(i),"_blank", 0, dummy())
	next
end sub
Das ganze speicherst du im Modul "[soffice].Standard", dann funktioniert das , wie du möchtest.
Brauchst du Infos über StarBasic-Programmierung, so empfehle ich den "Programmers Guide" für StarOffice7 von Sun. PDF-Datei, ca, 230 S, kostenfrei. Link findest du irgendwo auf der offiziellen OOo Seite (http://de.openoffice.org), musst mal ein bischen blättern.
Gruss
Thomas
Unterstützer LibreOffice, zertifizierter Trainer und Berater
Bücher: LibreOffice 6- Einstieg und Umstieg
Makros Grundlagen - LibreOffice / OpenOffice Basic
Antworten