![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Новичок
Джуниор
Регистрация: 10.10.2008
Сообщений: 1
|
![]()
Delphi7
ComObj Excel, Column, Sheet:variant; Excel:=CreateOleObject('Excel.Appli cation'); Excel.Visible:=True; Excel.Workbooks.add(-4167); Excel.Workbooks[1].worksheets[1].name:='Название док-та'; Column:=Excel.workbooks[1].worksheets['Название док-та'].Columns; Column.Columns[1].ColumnWidth:=20; Column:=Excel.workbooks[1].worksheets['Название док-та'].rows; Column.rows[2].Font.Bold:=true; Column.rows[1].Font.Bold:=true; Column.rows[1].Font.Color:=clBlue; Column.rows[1].font.size:=14; Sheet:=Excel.workbooks[1].worksheets['Название док-та']; Sheet.Cells[1,2]:='Ввод'; =================================== ====================== Помогите с кодом для форматирования таблиц- с встроенными компонентами ExcelApp, ExcelWorkbook, ExcelWorksheet не разобрался, там нужны дополнительные параметры для создания и редактирования таблицы, пришлось делать все по книге, прописывать код. Кроме вышеперечисленных команд ничего не знаю Т_Т, поэтому обратился к вам. Требуемые команды: Выравнивание текста в ячейке Заливка ячейки Заливка текста !!!Границы ячейки (Top,Bottom,Left,Right Borders) и их цвета А если не лень) помогите разобраться с ExcelApp, ExcelWorkbook, ExcelWorksheet Для создания таблицы [ ExcelApplication1.Workbooks.add(-4167); ] требуются доп. параметры, неизвестно какие. Желательно вывести пример с ними... Заранее благодарен |
![]() |
![]() |
![]() |
#2 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
![]()
просто совет...
запускайте Excel (просто ручками) - Сервис - Макросы - Начать запись потом выполняйте то, что Вы хотите сделать (хоть заливайте ячейку, хоть новую книгу создавайте..) После этого - Остановить запись. Сервис - Макросы - Открыть редактор VisualBasic Alt-F11 читаете там код VBA - перекладываете его на синтаксис Дельфи... |
![]() |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Оформление Технических Условий | funnydoc | Microsoft Office Word | 16 | 16.01.2009 14:10 |
оформление | FIIR | Помощь студентам | 1 | 16.06.2008 20:40 |
оформление текста | eks-s | Общие вопросы Delphi | 4 | 25.04.2008 13:52 |