mit VBA auf vorhandene Tabelle zugreifen...

[FriFra]

Hallo,

ich stehe im Moment vor dem Problem mit VBA auf eine vorhandene Tabelle zugreifen zu müssen. Leider habe ich nur Code zum erstellen einer neuen Tabelle gefunden:

Code: Alles auswählen

'If there is no office running then an office is started up
	Set objServiceManager = CreateObject("com.sun.star.ServiceManager")
	Set objCoreReflection= objServiceManager.createInstance("com.sun.star.reflection.CoreReflection")	
'Create the Desktop
	Set objDesktop = objServiceManager.createInstance("com.sun.star.frame.Desktop")
	
'Open a new empty writer document
	Set objDocument = objDesktop.loadComponentFromURL("file:///C:\myfile.sxw", "_blank", 0, args)

	Set objText = objDocument.getText()
	Set objTable= objDocument.createInstance( "com.sun.star.text.TextTable")

Wie komme ich nun aber an ein vorhandenes Tabellenobjekt?

Ich könnte die Tabelle anhand eines bestimmten Textes in einer Tabellenzelle identifizieren, so ich denn wüsste, wie das funktioniert...


P.S.: Gibt es irgendwo gute Tutorials für OpenOffice und VBA? Der Makrorecorder liefert hier ja leider keine brauchbaren Ergebnisse.

[komma4]

Du kannst eine Tabelle über Namen oder Index ansprechen:

Code: Alles auswählen

oDok = ThisComponent
oTabelle = oDok.getTextTables().getByIndex(0)
' getByName( "meineTabelle" )

Gute Tutorials kenne ich nicht, aber die Beispiele bei Andrew haben mir persönlich immer sehr geholfen

Hilft das weiter?

[Toxitom]

Hey FriFra,

... Gibt es irgendwo gute Tutorials für OpenOffice und VBA? ...

Gibt es. Jede Menge.
Schau dir mal den ersten Thread im Basic-Forum an, dort sind jede Menge Links aufgeführt.
Auch gibt es gute Literatur - also alles, was man braucht

Gruss
Thomas