LibreOffice-Forum

Da ich nach 4 Jahren noch mal zur gleichen Frage gekommen bin und jetzt eine Antwort gefunden habe, hier die Lösung: Sub GeheZuFolieZufall Dim oDoc As Object Dim oPresentation As Object Dim oSlides As Object Dim oSlide As Object oDoc = ThisComponent oPresentation = oDoc.Presentation() oController = ...

Super! Vielen Dank. Das Thema Fehler etc. habe ich leider immer verschludert... Muss mich wohl mal damit beschäftigen...
Danke

jkl

Hier der Code: Function Grossschreibung(x) myDoc=ThisComponent.currentcontroller.activesheet For i = 5 to 36 myDoc.getCellRangeByName("J"&i).string = UCase(myDoc.getCellRangeByName("J"&i).string) Next i End Function Ich brauche eine Funktion, die Eingaben in der gleichen Zelle umwandelt und nicht an...

Hallo, ich habe ein Dokument (Calc) erstellt, in dem ich in einer Zelle die Formel =GROSSSCHREIBUNG(J5:J35) eingefügt habe. Dadurch wird bei Änderungen im Bereich J5:J35 ein Makro gestartet, welches die kleinen Buchstaben in Großbuchstaben ändert. Das Makro funktioniert auch. Leider bekomme ich beim...

Danke, für die Antwort. Nach acht Jahren ist die Frage nicht mehr ganz so brennend.... Trotzdem Danke!!!

jkl

Hi, ich suche eine Möglichkeit Folien automatisch zu mischen oder eine zufällige Folie aufzurufen. Ziel ist es aus einer überschaubaren Menge an Folien immer zufällig eine auszuwählen oder es zumindest so erscheinen zu lassen. Ich hätte gedacht, es ist einfach beim Folienübergang ein Macro zu starte...

Hi, ich empfehle http://www.dannenhoefer.de/faqstarbasic/WiekannmaneineVorlageffnen.html#Zweig140 : Nach dem Öffnen einfach direkt mit folgendem Code speichern (sName sollte vorher als String festgelegt werden): Sub Tabelle_speichern Dim Dummy() oNewURL = converttourl(sPfad & sName & ".odt" ) oWoche...

Hallo, ich nutze schon lange ein Makro zum Drucken. Dabei arbeite ich mit folgendem Code (nicht vollständig): Dim Props Dim sDrucker as String Props=oWochenplan.getPrinter() sDrucker=Props(0).value Dim arg(2) as new com.sun.star.beans.PropertyValue arg(0).name="Name" arg(0).value = "<" & sDrucker & ...

Hallo,

danke für die Antwort. Habe leider keine Benachrichtigung bekommen und die Antwort erst jetzt gesehen.

Also deine Datei funktioniert. Scheint also als wäre das Problem bei mir... Werde meine Datei mal überarbeiten....

Danke trotzdem

jkl

Hallo, ich habe mir einige Vorlagen erstellt, die automatisiert Dokumente erstellen. Seit heute (bemerkt) stellt meine Tastatur in LibreOffice reproduzierbar nach Ausführen des u.g. Makros den Dienst ein. Nur in LibreOffice, dort aber in allen offenen Dokumenten. Erst nach Neustart funktioniert sie ...