Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

работа с ексель-файлами из ;делфи


gray1 ©   (2002-04-08 12:54:00) 

помогите плиз!
я знаю как сделать новый файл екселя и записать инфу в ячейки:

exl := CreateOleObject("Excel.Application");
WorkBook := exl.Application.WorkBooks.Add;
Sheet := WorkBook.WorkSheets[1];
Sheet.Cells(1,1) := "123";
exl.Application.ActiveWorkBook.Saveas("1.xls");
finally
exl.Application.Quit;

но я абсолютно не знаю как поменять ширину ячейки , шрифт и тд.
можно ли какнить использовать вижуал бейсик для этого?
помогите плз!!!!!!!! где достать инфу по этому вопросу?


Дмитрий Орехов   (2002-04-08 14:33:00) [1]

Sheets.Cells(1:1).Width:=50;
Sheets.Cells(1:1).Font.Dold:=True;
Sheets.Cells(1:1).Font.Italic:=True;
Sheets.Cells(1:1).Font.Size:=12;
Sheets.Cells(1:1).Font.Name:="Courier New";
В Cells я использовал квадратные скобки, но возможно без разницы.


Дмитрий Орехов   (2002-04-08 14:33:00) [2]

Sheets.Cells(1:1).Width:=50;
Sheets.Cells(1:1).Font.Bold:=True;
Sheets.Cells(1:1).Font.Italic:=True;
Sheets.Cells(1:1).Font.Size:=12;
Sheets.Cells(1:1).Font.Name:="Courier New";
В Cells я использовал квадратные скобки, но возможно без разницы.


AFROLOV   (2002-04-08 14:17:00) [3]

exl.Application.ActiveWorkBook.Saveas("1.xls"); - ЭТО у тебя работает? Остальное аналогично.
Должно сработать так
exl.Application.ActiveWorkBook.Range("D7").Select;
Надо указывать полные имена.
А с коллекциями скорее всего придется работать через их функцию(?) Item()


gray1   (2002-04-08 13:52:00) [4]

нефига!!!!!!!!!!!!11
не катит!!!!!!
вот тот бональный пример с изменением ширины ячейки
в вижуале:
Range("D7").Select
Columns("D:D").ColumnWidth = 21.43
как мне это перенести в делфи???????
что бы потом все заработало?
вобщем данный синтаксис не работает!!!!!!!
помогите!!!!!!!!!!!!!


arhelon   (2002-04-08 13:22:00) [5]

Почитай там много чего полезного
http://www.delphikingdom.com/helloworld/index.htm


AFROLOV   (2002-04-08 13:16:00) [6]

VBA использовать можно и нужно. Практически все что ты написал идентично коду на VBA.
"как поменять ширину ячейки , шрифт и тд" -
1. запускаешь запись макроса
2. проделываешь все что тебе надо (меняешь ширину ячейки, шрифт и тд.)
3. открываешь редактор VBA и у тебя есть пример как надо работать с шириной ячейки, шрифтом и прочим.
"где достать инфу по этому вопросу?" - почитать справку по VBA


Наверх

Титульная страница Поиск, карта сайта Написать письмо