datenpilottabellen aktualisieren (automatisch?)

Antwort erstellen

BBCode ist eingeschaltet
[img] ist ausgeschaltet
[url] ist eingeschaltet
Smileys sind ausgeschaltet
Die letzten Beiträge des Themas
   

Ansicht erweitern Die letzten Beiträge des Themas: datenpilottabellen aktualisieren (automatisch?)

von byteeater » Do, 15.02.2007 13:36

ja jetzt tuts das was ich möchte :)

sorry an das kopieren hatte ich gar nicht gedacht :idea:

ich hab das makro gleich zu Datei sichern zugeordnet, sodaß bei jedem abspeichern die pivottabellen abktualisiert sind. SCHÖN. das macht die sache wesentlich leichter

vielen dank nochmal
lg bernd

von Karolus » Do, 15.02.2007 12:03

Hallo Bernd

Warum hast du nicht einfach Winfrieds Code in deine Basic-oberfläche rüberkopiert ?
Nichts desto trotz sollte dein fünfmaliger Aufruf zur Aktualisierung auch laufen,
falls du aus Basic heraus startest musst du die beiden Zeilen :
Sub Main
End sub
entfernen, weil sonst nur dieses "leere" Makro ausgeführt wird.

Vier der identischen Codezeilen:
dispatcher.executeDispatch(document, ".uno:RecalcPivotTable", "", 0, Array())
kannst du ebenfalls entfernen.

Gruß Karo

von byteeater » Do, 15.02.2007 11:00

so jetzt hab ich s endlich mal geschafft es zu probieren
das kam dabei raus:


REM ***** BASIC *****

Sub Main

End Sub


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

rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:RecalcPivotTable", "", 0, Array())

rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:RecalcPivotTable", "", 0, Array())

rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:RecalcPivotTable", "", 0, Array())

rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:RecalcPivotTable", "", 0, Array())

rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:RecalcPivotTable", "", 0, Array())


end sub



irgendwas klappt da doch noch nicht richtig!

an was kanns liegen?

lg bernd

von byteeater » Di, 13.02.2007 20:21

danke ich werde morgen mal versuchen ob ich das hinkriege da ich überhaupt noch nicht mit makros gearbeitet habe ( :roll: da wirds wohl mal zeit )

und berichte dann

lg bernd

von komma4 » Di, 13.02.2007 18:54

Nun,
ich habe die Aktion "Daten>Datenpilot>Aktualisieren" mit dem Makro-Rekorder aufgezeichnet. Heraus kam der folgende Code, dessen letzte Anweisung auskommentiert wird (REM).
Nehme ich das REM weg und lasse das Makro laufen, dann wird meine Pivottabelle aktualisiert.
Probiere mal, ob das Dir hilft....

Code: Alles auswählen

sub refreshPivot
' recorded 2007-02-13
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 ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:RecalcPivotTable", "", 0, Array())


end sub

von byteeater » Di, 13.02.2007 17:30

Hmm, gar nicht so leicht genauer zu schildern.

eingentlich suche ich wirklich nur einen weg meine 5 vom Datenpilottabellen automatisch aktualisieren zu lassen. das heißt eventuell bei jedem speichern oder bei jedem aufrufen der datei. hauptsache ich muß nicht immer jede datenpilottabelle einzeln anklicken und auf aktualisieren drücken.

weiß nicht was ich da noch genauer schildern soll :oops:

lg bernd

von komma4 » Di, 13.02.2007 01:52

Schildere doch mal Dein Problem genauer, vielleicht auch ohne einen Lösungsweg vorzugeben....?!

datenpilottabellen aktualisieren (automatisch?)

von byteeater » Do, 08.02.2007 07:28

guten morgen.

ich weiß , so gedacht ist es nicht, aber gibt es eine trotzdem eine möglichkeit oder einen trick, wie man datenpilottabellen automatisch aktualisieren lassen kann?
alternativ wäre denkbar, daß man, wenn man eine bestimmte zelle (zb. A1) anklickt, alle datenpilottabellen dieses tabellenblattes sozusagen mit einem klick aktualisiert werden und man nicht jede einzeln aufsuchen muß.

mit makros kenne ich mich leider noch nicht aus. wäre sehr dankbar für hilfe

lg bernd

Nach oben