OpenOffice.info

Sub Main
    msgbox thisComponent.sheets(0).getCellRangeByName("B1").string
End Sub

... und wenn du es kürzer willst:
[code]Sub Main
msgbox thisComponent.sheets(0).getCellRangeByName("B1").string
End Sub[/code]
Gruß R

Sub Main

myDoc = thisComponent
mySheet = myDoc.sheets(0)
mycell = mysheet.getCellByPosition(1,1)
mytext = mycell.string

print "Zelle B2 = " & mytext

End Sub

Hallo Jambo,

versuch doch mal dies hier ;)

[code]
Sub Main

myDoc = thisComponent
mySheet = myDoc.sheets(0)
mycell = mysheet.getCellByPosition(1,1)
mytext = mycell.string

print "Zelle B2 = " & mytext

End Sub[/code]

Hallo DocTaxon,

schau dich doch mal bei Michael Dannenhöfer um, dort findest Du das was Du brauchst.
[url=http://www.dannenhoefer.de/faqstarbasic/Tabellen-Calc.html#Zweig7]7. Tabellen - Calc[/url]
[url=http://www.dannenhoefer.de/faqstarbasic/Zellen.html#Zweig162]7.1 Zellen[/url]



Gruß
balu