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
Dann ist sicherlich die Homepage von Michael für Dich interessant.Deee. hat geschrieben:da ich mich erst seit kurzem mit Makros beschäfftige
Viel Erfolg.
Jürgen