OO-Snippets: ColumnAndRowAttributes

Commons

Keywords
LanguageooRexx
ApplicationCalc
AuthorsMichael Hinz
Supported Versions2.0.x  
Supported OSWin32  
QuestionHow can i change column and cell attributes(change color and make it invisible)
Answer

Code-Snippet-Listing (snippet-source)

/* get the desktop  (an Xdesktop object) */
oDesktop = UNO.createDesktop()   
xComponentLoader = oDesktop~XDesktop~XComponentLoader      --get componentLoader interface
                                                      
/* open a blank calc file */
url = "private:factory/scalc"
xCalcComponent = xComponentLoader~loadComponentFromURL(url, "_blank", 0, .UNO~noProps)


/* get first sheet in spreadsheet */
xDocument = xCalcComponent~XSpreadSheetDocument
xSheet = xDocument~getSheets~XIndexAccess~getByIndex(0)~XSpreadSheet

/* insert  value into cells */
CALL UNO.setCell xSheet, 0, 4, "This row will be deleted!"

/* get rows and columns */
xColumnRowRange = xSheet~xColumnRowRange~getColumns()
xColumn = xColumnRowRange~getByIndex(3)

xColumnRowRange = xSheet~xColumnRowRange~getRows()
xRow = xColumnRowRange~getByIndex(4)

CALL syssleep 3

/* set properties of columns and rows */
xColumn~xPropertySet~setPropertyValue("CellBackColor", box("int", "006666"x ~c2d))

CALL syssleep 4

xRow~xPropertySet~setPropertyValue("IsVisible", Boolean (false))

::requires UNO.cls       -- get UNO support

Changelog

DateUserModification

and