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-ti...@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+unsubscr...@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
