OpenOffice.info

Hallo komma 4,

es funktioniert.Aber was komisch ander Sache ist,ich mußte das Makro mit der Hand eintippen über das normale einkopieren ging es nicht.

Danke für Deine Bemühungen.

Gruß

Hallo Komma 4,

mein Betriebssystem: XP; OpenOffice 3.3.0

Der Fehler beginnt schon in der ersten "oLink zeile" (Fettdruck)

Sub refreshAllSheetLinks()
oEnum = thisComponent.AreaLinks.createEnumeration
while oEnum.hasMoreElements
[b]oLink = oEnum.NextElement[/b]
oLink.refresh
wend
oEnum = thisComponent.SheetLinks.createEnumeration
while oEnum.hasMoreElements
oLink = oEnum.NextElement
oLink.refresh
wend
oEnum = thisComponent.DDELinks.createEnumeration
while oEnum.hasMoreElements
oLink = oEnum.NextElement
oLink.refresh
wend
End Sub

verändere ich das Makro wie Folgt kommt der Fehler in der nächsten "olink-Zeile" (Fettdruck)

Sub refreshAllSheetLinks()
oEnum = thisComponent.SheetLinks.createEnumeration
while oEnum.hasMoreElements
[b]oLink = oEnum.NextElement[/b]
oLink.refresh
wend
oEnum = thisComponent.DDELinks.createEnumeration
while oEnum.hasMoreElements
oLink = oEnum.NextElement
oLink.refresh
wend
End Sub

Naja und das geht so weiter. Ich habe das Makro über "Makro ausführen" ausprobieren wollen,vieleicht ist das der Fehler ?


Gruß Hansi

Das Makro läuft hier bei einer CALC-Datei ohne Probleme.


Welche der drei [color=#008000]oLink[/color]-Anweisungen wird bemängelt?

Welche OOo Version hast Du?
Welches Betriebssystem?

Hallo ,

ich habe hier im Forum diesen älteren Beitrag gefunden,da ich vor dem selben Problem stehen.

"Verknüpfung aktualisieren - AUTOMATIK?"

Das Makro habe ich mir auch runtergeladen,aber leider bringt er mir immer das in den "olink..." Zeilen ein Syntaxfehler wäre.Da ich das Marko kopiert habe,ist auch ein Schreibfehler meinerseits auzuschließen.

Kannst du mir da weiterhelfen???

Gruß

goto http://development.openoffice.org/ und hole Dir das SoftwareDevelopmentKit (SDK)

Super Beitrag! :-) Herzlichen Dank, das funktioniert perfekt.
Gibt es irgendwelche Quellen, wo man die benötigten Befehle nachschlagen kann? So ne Art Syntaxlexikon?

Sub refreshAllSheetLinks()
oEnum = thisComponent.AreaLinks.createEnumeration
while oEnum.hasMoreElements
   oLink = oEnum.NextElement
   oLink.refresh
wend
oEnum = thisComponent.SheetLinks.createEnumeration
while oEnum.hasMoreElements
   oLink = oEnum.NextElement
   oLink.refresh
wend
oEnum = thisComponent.DDELinks.createEnumeration
while oEnum.hasMoreElements
   oLink = oEnum.NextElement
   oLink.refresh
wend
End Sub 

Willkommen im Forum.

Versuche mal den Einsatz des folgenden Makros (zum Aktualisieren aller Arten von Verbindungen!):
[code]Sub refreshAllSheetLinks()
oEnum = thisComponent.AreaLinks.createEnumeration
while oEnum.hasMoreElements
oLink = oEnum.NextElement
oLink.refresh
wend
oEnum = thisComponent.SheetLinks.createEnumeration
while oEnum.hasMoreElements
oLink = oEnum.NextElement
oLink.refresh
wend
oEnum = thisComponent.DDELinks.createEnumeration
while oEnum.hasMoreElements
oLink = oEnum.NextElement
oLink.refresh
wend
End Sub [/code]
Quelle: [url=http://www.oooforum.org/forum/viewtopic.phtml?t=24192]oooforum.org Villeroy, 2006-12-04 21:37[/url]

Viel Erfolg!

Hallo,
ich versuche eine Textdatei per Verknüpfung in eine CALC-Tabelle einzubinden. Ich kann diese auch über Menü "Bearbeiten/Verknüpfungen" aktualisieren.
Da ich das gerne automatisiert machen würde oder zumindest mit einem Tastendruck bin ich auf der Suche nach einer Lösung.
Im Menü "Bearbeiten/Verknüpfungen" sind die Knöpfe für automatisch und manuell GRAU, das heißt ich kann leider nichts einstellen.
Daher vermute ich, dass das mit Datei-Verknüpfungen nicht geht.
Mit Makro aufzeichnen komme ich auch nur in das Dialogfeld, wo ich dann die Aktualisierung manuell auslösen muss.
Bin ich nur blinde oder kann man die Aktualisierung nicht automatisieren?
Hannes