OpenOffice.info

Danke für die Tips kann ich an anderer Stelle gebrauchen.

Mein Problem in VB6 konnte ich auf diese Weise lösen:

Set oEnum = oDoc.SheetLinks.createEnumeration
While oEnum.hasMoreElements
Set oLink = oEnum.NextElement
cNewLinkSourceForOO = cOO.Convertin(OOPath, cNewLinkSource)
oLink.URL ...

So gehts.

Hi,
ich stehe vor dem problem das ich zwei calc Tabellen miteinander verknüpft habe.
So weit sogut, allerdings werden diese tabellen programmgesteuert aus einer vorlage erstellt und nach bestimmten kriterien
umbenannt. Nach dem umbenennen stimmen näturlich die tabellennamen in den bezügen nicht mehr ...

So sollte es gehen:


Dim oDispatcher As Object

Set oDispatcher = CreateUnoServiceVB("com.sun.star.frame.DispatchHelper")

Public Function CreateUnoServiceVB(strServiceName) As Object
Dim oServiceManager As Object
Set oServiceManager = CreateObject("com.sun.star.ServiceManager")
Set ...

Hallo,
ich stehe vor der Aufgabe eine VB6 Anwendung die Exceltabellen erstellt auf OOo Calc umzustellen.
Dabei bin ich auf ein paar Probleme gestoßen, an denen ich hängen bleibe.

1. Autom. Updaten von Verknüpfungen:

unter VB mit Excel sieht das so aus

alinks = oExl.ActiveWorkbook.LinkSources ...