//将第一行合并,并设置其属性
m_WorkSheet.Range['A1','J1'].Merge('True');
m_WorkSheet.Range['A1','J1'].Cells.Value := '表名称';
with m_WorkSheet.Range['A1','J1'].Font do
begin
Name := '黑体';
FontStyle := '常规';
Size := '12';
end;
m_WorkSheet.Range['A1','J1'].VerticalAlignment := 'xlBottom';执行到最后一行的时候会出错,说“类Range不允许设置VerticalAlignment”,我的本意是想设置被合并后单元格的垂直对齐方式为“xlBottom”。咋办呢?
m_WorkSheet.Range['A1','J1'].Merge('True');
m_WorkSheet.Range['A1','J1'].Cells.Value := '表名称';
with m_WorkSheet.Range['A1','J1'].Font do
begin
Name := '黑体';
FontStyle := '常规';
Size := '12';
end;
m_WorkSheet.Range['A1','J1'].VerticalAlignment := 'xlBottom';执行到最后一行的时候会出错,说“类Range不允许设置VerticalAlignment”,我的本意是想设置被合并后单元格的垂直对齐方式为“xlBottom”。咋办呢?
then
...
m_WorkSheet.Range['A1','J1'].VerticalAlignment := 3;