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.

Reply via email to