TXLSFormatSnapshot 应用到
IXLSRange 中的每个单元格,恢复由
CaptureFormat 记录的完整格式
procedure ApplyFormat(AFormat: TXLSFormatSnapshot);
AFormat 不得为 nil。
var Snapshot: TXLSFormatSnapshot; begin Snapshot:= Workbook.Sheets[1].Range['A1', 'D1'].CaptureFormat; Workbook.Sheets[2].Range['A1', 'D1'].ApplyFormat(Snapshot); Snapshot.Free; end;