I don't know if this has been answered, and hopefully the solution is fairly
simple. I have a spreadsheet with text in it. I'm able to get the text and
display it using a MsgBox or even copy it to another cell. However, whenever
I try to assign it to a string, I get the following error:
Action not supported.
Invalid Procedure call.
Here's a small sample of text
Sub Main
Dim t as Object
Dim s as String
Dim data as String
t = ThisComponent.sheets.getByName("Sheet1")
s = "This is arbitrary text"
MsgBox("Here are the first four letters of s: " & Mid(s,0,4))
data = t.getCellByPosition(0,2).getString()
MsgBox("The text in A:3 is: " & data)
MsgBox("The first four characters of data are: " & Mid(data,0,4)
End Sub
Everything works except the last line. It blows up with the error message
above. The second-to-last MsgBox displays the value of the cell and it's
correct. The text is about 20 characters long.
Is this an issue of Mid() not accepting the return value from getString()?
Any help is greatly appreciated.