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

Вниз

как в Excel сделать заголовок столбца (по середине) и   Найти похожие ветки 

 
ceval ©   (2004-08-17 12:18) [0]

Подскажите пожалуста как в Excel сделать заголовок столбца (по середине) иданные в столбце по центру.
Пробывал  делать так :

  xl.Cells[x,1].alignment:=tacenter;

Выдает ошибку


 
46_55_41_44 ©   (2004-08-17 12:26) [1]

const
xlVAlignBottom=-4107;
xlVAlignCenter=-4108;
xlVAlignDistributed=-4117;
xlVAlignJustify=-4130;
xlVAlignTop=-4160;
Function SetVerticalAlignment (sheet:variant;range:string;
 alignment:integer):boolean;
begin
SetVerticalAlignment:=true;
try
 E.ActiveWorkbook.Sheets.Item[sheet].Range
  [range].VerticalAlignment:=alignment;
except
 SetVerticalAlignment:=false;
end;
End;


 
46_55_41_44 ©   (2004-08-17 12:26) [2]

xlVAlignCenter=-4108


 
46_55_41_44 ©   (2004-08-17 12:28) [3]

А это горизонтально:
const
xlHAlignCenter=-4108;
xlHAlignDistributed=-4117;
xlHAlignJustify=-4130;
xlHAlignLeft=-4131;
xlHAlignRight=-4152;
xlHAlignCenterAcrossSelection=7;
xlHAlignFill=5;
xlHAlignGeneral=1;
Function SetHorizontalAlignment (sheet:variant;range:string;
 alignment:integer):boolean;
begin
SetHorizontalAlignment:=true;
try
 E.ActiveWorkbook.Sheets.Item[sheet].Range
  [range].HorizontalAlignment:=alignment;
except
 SetHorizontalAlignment:=false;
end;
End;



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

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

Наверх




Память: 0.47 MB
Время: 0.11 c
1-1093087148
Гость...
2004-08-21 15:19
2004.09.05
Listbox


4-1090566377
Form_1
2004-07-23 11:06
2004.09.05
Неправильное преобразование?


14-1092340519
sk707
2004-08-12 23:55
2004.09.05
Что подарить человеку на день рождения у которого все есть...


14-1092851409
Piter
2004-08-18 21:50
2004.09.05
Подскажите элемент HTML


4-1090158433
Dio
2004-07-18 17:47
2004.09.05
Работа с Hard