Как скопировать страницу? |
Previous Top Next |
Code: |
{ ... } var After: OleVariant; Sh: _Worksheet; begin Sh := Excel.Worksheets['Sheet1'] as _Worksheet; After := Excel.Workbooks[1].Sheets[3]; Sh.Copy(EmptyParam, After, lcid); { ... } |
©Drkb::04388
Взято с Delphi Knowledge Base: http://www.baltsoft.com/