excel如何粘贴公式?高手请进(贴了几天未解决,高手烦请帮忙) (200分)

D

dansl

Unregistered / Unconfirmed
GUEST, unregistred user!
我在程序中用excel制报表,因数据是循环填入,想直接在excel中计算,填写计算公式
后,想利用excel本身的粘贴公式功能完成公式填写(因为要利用相对引用与绝对引用),
不知那位高手知道如何写?我用宏录制了vba的语法,不知如何用在delphi中
Selection.PasteSpecial Paste:=xlFormulas, Operation:=xlNone,
SkipBlanks:= False, Transpose:=False
 

ExcelApp.ActiveSheet.Range[ 'A1:E2' ].Copy;
ExcelApp.ActiveSheet.Cells[8,1].PasteSpecial;
 
to wuxiaoyong 你的方法是COPY内容(数据),我要COPY公式,也就是说
Paste:=xlFormulas, 如何加入程序中.
 
ExcelApp.ActiveSheet.Range[ 'A1:E2' ].Copy;
ExcelApp.ActiveSheet.Cells[8,1].PasteSpecial;

它可以把内容、公式、格式一块COPY!
 
接受答案了
 
顶部