Экспорт в Microsoft Excel (много)

[Yufil]

За свою карьеру программиста выводил в Excel:
через DDE;
через OLE напрямую;
через ActiveX Formula One;
через ActiveX MS Office Spreadsheet ( может быть, ошибаюсь в названии. Была такая)
через файл db3;
через файл HTML;
экспортируя отчёт List & Label;
создавая в Буфере обмена таблицу и вставляя в Excel;

Как можно ещё извратиться ?

[Игорь Столяров]

Как можно ещё извратиться ?

- Есть неплохая библиотека EasyExcel (но за гроши);
- Недавно KREATOR научил великолепному по скорости методу создания XLSX отчётов через XML.

[Yufil]

Это риторический вопрос был, cейчас совсем другими вещами занимаюсь. Но если потребуется - быстро слабаю отчёт на L&L или шлёпну отчёт через питоновский xlsxwriter.

[kreator]

Очередная проблема с OLE Excel. Есть команда:

Код: Выделить всё

LOC:OLE{'Selection.Format.Fill.ForeColor.Transparency'} = 0.8

На одних компах работает, на других нет. Проблема в нецелом значении. Целое работает всегда. Проблема с вещественными числами есть и в других командах. Собрали немного статистики. От версии офиса не зависит (посмотрели 2010 и 2007). Даже есть такое - Офис не только одной версии, даже одного билда, на одном компе работает, на другом нет. Операционка - везде Win7-64.
И риторический вопрос - где собака порылась?

[RaFaeL]

В запятой? А точнее в региональных настройках?

[kreator]

ХЗ. Запятую Кларион не пропустит. Региональные настройки проверили - нет разницы между компами, где работает и где нет. Сейчас дома на 2007 Excel'е попробовал сделать макрос по рисованию прямоугольника, хотел посмотреть - может по другому сделать синтаксис. Так вот - макрос пустой.

[Дед Пахом]

Код: Выделить всёLOC:OLE{'Selection.Format.Fill.ForeColor.Transparency'} = 0.8

А вот так?

Код: Выделить всё

LOC:OLE{'Selection.Format.Fill.ForeColor.Transparency=8/10'} 

Или так:

Код: Выделить всё

LOC:OLE{'Selection.Format.Fill.ForeColor.Transparency'}='8/10' 

[gopstop2007]

ХЗ. Запятую Кларион не пропустит. Региональные настройки проверили - нет разницы между компами, где работает и где нет. Сейчас дома на 2007 Excel'е попробовал сделать макрос по рисованию прямоугольника, хотел посмотреть - может по другому сделать синтаксис. Так вот - макрос пустой.

а разве в макросе не так?

Код: Выделить всё

   With Selection.Format.Fill  
       .Visible = msoTrue  
       .ForeColor.RGB = RGB(85, 142, 213)  
       .Transparency = 0.5  
       .Solid  
   End With   

[kreator]

а разве в макросе не так?

В макросе так. Только в Excel 2010. А в 2007 что-то ничего макрос не пишет. Причём попробовал и на работе и дома.

А вот так?

Код: Выделить всё

LOC:OLE{'Selection.Format.Fill.ForeColor.Transparency=8/10'}

Пробовал вот так:

Код: Выделить всё

LOC:OLE{'Selection.Format.Fill.ForeColor.Transparency=0.8'} 

Не работает. Но и не должно.

Или так:

Код: Выделить всё

LOC:OLE{'Selection.Format.Fill.ForeColor.Transparency'}='8/10'

Попробую в понедельник. Но вот такой код не заработал:

Код: Выделить всё

LOC:OLE{'Selection.Format.Fill.ForeColor.Transparency'}='0.8'

Какая-то хрень с настройками Офиса. То что мы собрали статистику - работает/не работает - 50/50. Даже если найдём причину, это нам мало поможет. Проверить сотни компов и переставить на них Офис нереально. Пытаемся поставить костыль.
Конкретная задача решаемая. В задаче полупрозрачные прямоугольники закрывают ячейки с датами, показывая процент выполненной работы. Но ячейка может быть закрыта частично. Как всегда решили схалявить. Придётся разбивать сутки на несколько ячеек, их объединять и красить сами ячейки.
И генеральный путь - отказываться от OLE.

[gopstop2007]

В макросе так. Только в Excel 2010. А в 2007 что-то ничего макрос не пишет. Причём попробовал и на работе и дома.

Сбросьте весь макрос или excel лист с макросом.