Синтаксис для объекта Excel. Изменить форматирование номера - PullRequest
Новая
       8

Синтаксис для объекта Excel. Изменить форматирование номера

2 голосов
/ 05 марта 2012

Я сделал приложение, которое извлекает записи из SQL Select в Excel.
Я хотел бы изменить форматирование чисел в столбцах Excel перед сохранением.Я сделал объект EXCEL OLE, затем записал в него данные 

Excel_Sheet.Cells[i + j,k] =  s_col

Я хотел бы изменить формат чисел в зависимости от типа столбца.Я уже знаю, как получить тип столбца, но мне не повезло с изменением числового формата.

Я использовал их: чтобы сделать заголовки полужирными и изменить ширину в зависимости от данных, используя AutoFit. Все, что я имеюнайдено в интернете: 

Excel_Sheet.Range(s_into_row + String(j) + ":" +s_into_col + String(j)).Select
Excel_Obj.Selection.Font.Bold = True

Excel_Sheet.Range("A"+String(j)+":A"+String(j)).Select
Excel_Sheet.Columns(s_into_row + ":" + s_into_col ).EntireColumn.AutoFit

Я использую powerbuilder

Ответы [ 2 ]

2 голосов
/ 05 марта 2012

У меня есть некоторый код в проекте, который выглядит примерно так: 

choose case lower(ls_coltype)
    case "char"
        lole_Excel.Selection.NumberFormat = "@"
    case "date"
        lole_Excel.Selection.NumberFormat = "mm/dd/yyyy"
    case "int", "long", "ulong"
        lole_Excel.Selection.NumberFormat = "0"
    case "time"
        lole_Excel.Selection.NumberFormat = "h:mm AM/PM"
    ...
end choose

, где ls_coltype - это тип столбца с "(" и всем после удаления.

1 голос
/ 05 марта 2012

Сид, я не работал с Powerbuilder, но ты пробовал что-то вроде

Excel_Sheet.Columns(s_into_row).NumberFormat = "0.00"

НТН

Sid

...