طريقة Unmerge

البناء

مثال

var
  Heading: IXLSRange;
begin
  Heading := Workbook.Sheets[1].Range['A1', 'F2'];

  if Heading.MergeCells then
    Heading.UnMerge;

  Workbook.Sheets[1].Range['A1', 'A1'].Value := 'Region';
  Workbook.Sheets[1].Range['B1', 'B1'].Value := 'Amount';
end;

انظر أيضًا