Главная страница
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.024 c
3-1092131443
natasha
2004-08-10 13:50
2004.09.05
Unicode в Delphi 2


14-1092747539
Del_programmer
2004-08-17 16:59
2004.09.05
ИК порт и счем его едят.......


3-1092053052
Viktor1
2004-08-09 16:04
2004.09.05
В чём разница между IBExpert и IBManager?


1-1092771422
MaxN
2004-08-17 23:37
2004.09.05
Печать


3-1091157284
Fynjy
2004-07-30 07:14
2004.09.05
При попытке редактировать запрос получаю сообщение.