Главная страница
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.038 c
3-1092304333
User2
2004-08-12 13:52
2004.09.05
IDENTITY


14-1092567831
Rus_LAN
2004-08-15 15:03
2004.09.05
FireBird (Документация)


10-1035224514
Прохожий
2002-10-21 22:21
2004.09.05
OMNIORB и C++ Builder


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


4-1090356969
[ping]VIN
2004-07-21 00:56
2004.09.05
GetLogicalDrivers