Форум: "Основная";
Текущий архив: 2002.04.15;
Скачать: [xml.tar.bz2];
ВнизИзменение формата ячеек Excel Найти похожие ветки
← →
Strannik_ (2002-04-01 18:13) [0]Есть у меня программа:
BeginCol := 1;
BeginRow := 5;
RowCount := form1.StringGrid2.RowCount-1;
ColCount := Form1.StringGrid2.ColCount;
ExcelApp := CreateOleObject("Excel.Application");
ExcelApp.Application.EnableEvents := false;
Workbook := ExcelApp.WorkBooks.Add("c:\bestat\det.xls");
ArrayData := VarArrayCreate([0, RowCount, 0, ColCount], varVariant);
for I := 0 to RowCount do
for J := 0 to ColCount do
ArrayData[I, J] :=Form1.StringGrid2.Cells[j,i];
Cell1 := WorkBook.WorkSheets[1].Cells[BeginRow, BeginCol];
Cell2 := WorkBook.WorkSheets[1].Cells[BeginRow + RowCount - 1, BeginCol +
ColCount - 1];
Range := WorkBook.WorkSheets[1].Range[Cell1, Cell2];
Range.Value := ArrayData;
ExcelApp.Application.Quit;
Мне надо после того как програма кинет данные в Excel, изменить формат ячеек на часы:минуты:секунды
Макрос в екселе
Range("B17").Select
Selection.NumberFormat = "h:mm:ss"
Как мне перевести этот макрос в дельфи код
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.04.15;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.004 c