von turtle47 » Mo, 09.02.2009 15:47
Hallo Daniel,
Code: Alles auswählen
Sub Text_Len
oDoc = thisComponent
oTables = oDoc.getTextTables
oTable = createunoservice("com.sun.star.text.TextTable")
oTable=oTables.getByIndex(0)'Erste Tabelle
oCellString = oTable.getCellByPosition(0,0).string 'Zelle A1
msgbox Len(oCellString)
End Sub
sollte gehen.
Deee. hat geschrieben:da ich mich erst seit kurzem mit Makros beschäfftige
Dann ist sicherlich die
Homepage von Michael für Dich interessant.
Viel Erfolg.
Jürgen
Hallo Daniel,
[code]Sub Text_Len
oDoc = thisComponent
oTables = oDoc.getTextTables
oTable = createunoservice("com.sun.star.text.TextTable")
oTable=oTables.getByIndex(0)'Erste Tabelle
oCellString = oTable.getCellByPosition(0,0).string 'Zelle A1
msgbox Len(oCellString)
End Sub[/code]
sollte gehen.
[quote="Deee."]da ich mich erst seit kurzem mit Makros beschäfftige[/quote]
Dann ist sicherlich die [url=http://www.dannenhoefer.de/faqstarbasic/index.html]Homepage[/url] von Michael für Dich interessant.
Viel Erfolg.
Jürgen