Как присвоить ячейке процентный формат?

Автор OLEGrsk, 6 января 2016, 15:18

0 Пользователи и 1 гость просматривают эту тему.

OLEGrsk

Всем привет!

Пишу макрос, который на выхлопе выдаёт файл Calc, в который внесены нужные данные и проставлены нужные формулы.
Проблема заключается в следующем: ячейке с формулой необходимо присвоить процентный формат.
Подскажите, как можно это реализовать?

Dim oNewDoc, oCreateSheet as Object

Sub CreateTable

oNewDoc = starDeskTop.loadComponentFromUrl ("private:factory/scalc", "_blank", 0, Array())
oCreateSheet = oNewDoc.sheets(0)
oCreateSheet.getCellByPosition(10,1).formula = "=J2/U2"

End Sub

rami

Цитата: OLEGrsk от  6 января 2016, 13:18Проблема заключается в следующем: ячейке с формулой необходимо присвоить процентный формат.
Добавьте строку кода:oCreateSheet.getCellByPosition(10,1).NumberFormat = 11

OLEGrsk

Цитата: rami от  6 января 2016, 16:18
Цитата: OLEGrsk от  6 января 2016, 13:18Проблема заключается в следующем: ячейке с формулой необходимо присвоить процентный формат.
Добавьте строку кода:oCreateSheet.getCellByPosition(10,1).NumberFormat = 11
Спасибо! То что нужно.