I wish to perform some complex arithmetic operations on several variables.
One such variable is "Firsta" as in the attachment below. I wish to enter
the values of Firsta (and others) into cells in Calc. The only method I
have found for entering data into cells is the dispatcher statement using
"uno:EnterString". This I am using from the Macro recorder script.
The issue appears to be that "uno:EnterString" requires a string as its
parameter. If the parameter is a numeric (an integer in my case), the cell
is left empty.
How to enter an integer value from LO Basic into a cell without having to
klutzy-convert it to a string? Is there an equivalent to Calc's
"Text(ref, format)" function that will execute in Basic?
I've searched Andrew's book (very good book) and other web resources about
uno (very bad resources mostly). Andrew's book, however, doesn't include
the EnterString method in its uno chapter.
LO v3.4.4 on Windows XP Pro
~~~~~~~begin code fragment~~~~~~~~~~~~~~~~~
~~~~~~~this code works OK only because of the number-to-string
conversion~~~~~~~~~~~~~~~~~
Things = 9
Do
' WriteTriplet0
dim args5(1) as new com.sun.star.beans.PropertyValue
args5(0).Name = "By"
args5(0).Value = 1
args5(1).Name = "Sel"
args5(1).Value = false
dispatcher.executeDispatch(document, ".uno:GoDown", "", 0, args5())
Select Case Firsta
Case 1
args1(0).Value = "1"
Case 2
args1(0).Value = "2"
Case 3
args1(0).Value = "3"
Case 4
args1(0).Value = "4"
End Select
dispatcher.executeDispatch(document, ".uno:EnterString", "", 0, args1())
Firsta = Firsta + 1
Loop While Firsta <= Things
~~~~~~~end code fragment~~~~~~~~~~~~~~~~~
--
David S. Crampton
--
For unsubscribe instructions e-mail to: [email protected]
Problems? http://www.libreoffice.org/get-help/mailing-lists/how-to-unsubscribe/
Posting guidelines + more: http://wiki.documentfoundation.org/Netiquette
List archive: http://listarchives.libreoffice.org/global/users/
All messages sent to this list will be publicly archived and cannot be deleted
