Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.02.06;
Скачать: CL | DM;

Вниз

Помогите с диапазоном в Excel-e.   Найти похожие ветки 

 
tytus   (2005-01-21 12:24) [0]

Добрый день мастера. Есть такой код:
procedure TForm1.Button1Click(Sender: TObject);
begin
Excel.SheetsInNewWorkbook[0]:=1;
Excel.Workbooks.Add(EmptyParam,0);
Excel.Cells.Item[1,1].Columns.ColumnWidth:=6;
Excel.Cells.Item[1,2].Columns.ColumnWidth:=40;
Excel.Cells.Item[2,2].Rows.RowHeight:=30;
Excel.Cells.Item[1,3].Columns.ColumnWidth:=20;
Excel.Cells.Item[1,2].Value:="Тестирование Excel";
Excel.Range["A1:C3"].Borders.LineStyle:=xlDouble;///?????
Excel.Visible[0]:=true;
end;
Так вот никак не получается описать диапазон
["A1:C3"],["A1:C3"]- в справке по Excel (VBAXL10) пишеться как
["A1:C3"] а в делфи не получается.
Без ///???? все работает нормально.
Excel- компонент TExcelApplication.


 
Sash ©   (2005-01-21 12:46) [1]

["A1:C3"] в дельфи будет ["A1:C3"]
попробуй так:
Excel.Range["A1:C3"].Select;
Excel.Range["A1:C3"].Borders.LineStyle:=xlDouble;


 
tytus   (2005-01-21 14:20) [2]

>Sash
Не работает. Пишет Not enough actual parametrs.


 
Style ©   (2005-01-21 14:26) [3]

Я просто число указывю и все работает..
Excel.Range["A1:C3"].Borders.LineStyle := 7;
можеть ему xlDouble не нравится??


 
tytus   (2005-01-21 14:37) [4]

>Style;
Нет. Как раз после ...С3"] и ругается Not enough actual parametrs...


 
Style ©   (2005-01-21 14:56) [5]

Может так?

Excel.Range[
 Excel.Cells.Item[1,1],
 Excel.Cells.Item[3,3]
          ].Borders.LineStyle := 7;


 
tytus   (2005-01-21 15:10) [6]

>Style;
OK, помогло. Спасибо. В хелпе так и пишется, что это второй
синтаксис свойства Range.


 
Yr2   (2005-01-21 16:09) [7]

to tytus:
вообще-то это пишется так: Range["A1", "C3"]



Страницы: 1 вся ветка

Текущий архив: 2005.02.06;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.058 c
14-1105818338
DeadMeat
2005-01-15 22:45
2005.02.06
Неубиваемые процессы


1-1106278856
Ната
2005-01-21 06:40
2005.02.06
Как динамически создать кнопку?


6-1101290910
Титков Эдуард
2004-11-24 13:08
2005.02.06
Звонилка!


1-1106074983
D-alone
2005-01-18 22:03
2005.02.06
Быстрое умножение булевых матриц


14-1105804196
Беспечный_Ангел
2005-01-15 18:49
2005.02.06
Создание и работа с ISO образом