Date: prev next · Thread: first prev next last
2016 Archives by date, by thread · List index


Hallo

Der folgende Code gespeichert in einer Datei im Pfad:

<dein_benutzerverzeichnis>/Scripts/python/<irgendein_name>.py

wird alle Zellbereiche mit der Zellvorlage "input" im aktuell selektierten (einzelnen)Bereich "leeren".

*x- - - - - - - - - - - - - > Schnipp < - - - - - - - - - - - -x*

def main():
    doc = XSCRIPTCONTEXT.getDocument()
    selection = doc.CurrentSelection
    for cellrange in iterate(selection.getUniqueCellFormatRanges()):
        if cellrange.CellStyle == 'input':
            cellrange.clearContents(15)

def iterate(enumerable):
    enum = enumerable.createEnumeration()
    while enum.hasMoreElements():
        yield enum.nextElement()

*x- - - - - - - - - - - - - > Schnipp < - - - - - - - - - - - -x*



Am 13.01.2016 um 18:06 schrieb Franklin Schiftan:
Hallo miteinander,

am 13.01.2016 um 09:40 Uhr schrieb Werner Tietz <werner-tietz@arcor.de>

Hallo

@Franklin
Wenn du schon VBA Gedichte ablieferst, solltest du auch die initiale
Zeile mitliefern:

*x- - - - - - - - - - - - - > Schnipp < - - - - - - - - - - - -x*
Option VBAsupport 1

...
*x- - - - - - - - - - - - - > Schnipp < - - - - - - - - - - - -x*

Hey, super, mit dieser vorangestellten Zeile funktioniert der
Excel-Code tatsächlich auch in LibO - sofern in diesem Fall hier der
Excel-Code im aktuellen Arbeitsblatt gespeichert ist.

Weiß jemand evtl., was man wo und wie hier am Code vielleicht noch
ergänzen oder ändern müsste, damit er auch läuft, wenn er nicht in
der aktuellen Arbeitsmappe, sondern unter 'Meine Makros'
abgespeichert wird?

Ansonsten bleibt er halt bei der Zeile

    For Each zelle In ActiveSheet.UsedRange

erstmal stehen, weil er offensichtlich nicht weiß, was gerade als
'ActiveSheet' anzusehen ist.

Werner



--
Liste abmelden mit E-Mail an: users+unsubscribe@de.libreoffice.org
Probleme? http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: http://listarchives.libreoffice.org/de/users/
Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert

Context


Privacy Policy | Impressum (Legal Info) | Copyright information: Unless otherwise specified, all text and images on this website are licensed under the Creative Commons Attribution-Share Alike 3.0 License. This does not include the source code of LibreOffice, which is licensed under the Mozilla Public License (MPLv2). "LibreOffice" and "The Document Foundation" are registered trademarks of their corresponding registered owners or are in actual use as trademarks in one or more countries. Their respective logos and icons are also subject to international copyright laws. Use thereof is explained in our trademark policy.