611
社区成员
发帖
与我相关
我的任务
分享datawindow转存到excel
有一报表(datawindow)，标题，表头、细节、表尾都有，该报表有3页纸（有时有10多页），我想将该报表转存到EXCEL中打印，希望在转存时，标题、表头、细节、表尾都能同时转存，转存到EXCEL后要求每页分开。
...全文
请发表友善的回复…
发表回复
taobujue 2003-05-19
- 打赏
- 举报
up
keats 2003-05-19
- 打赏
- 举报
用VBA
lbx1979 2003-01-20
- 打赏
- 举报
可以用ole自己存,不过太麻烦了
xiaobzg 2003-01-20
- 打赏
- 举报
这样的贴子很多，找一下吧
不过将所有的格式存储下来好像还没有很好的解决办法
不过将所有的格式存储下来好像还没有很好的解决办法
wgy2008 2003-01-20
- 打赏
- 举报
int filevalue
string filepath,filename
filevalue = getfilesavename("选择文件",filepath,filename,+"excel",+"excel files(*.xls),*.xls")
if filevalue = 1 then
dw_1.saveas(filepath,excel!,true)
end if
string str_excel_path
registryget("hkey_local_machine\software\microsoft\windows\currentversion\app paths\excel.exe","path",regstring!,str_excel_path)
run(str_excel_path,normal!)
string filepath,filename
filevalue = getfilesavename("选择文件",filepath,filename,+"excel",+"excel files(*.xls),*.xls")
if filevalue = 1 then
dw_1.saveas(filepath,excel!,true)
end if
string str_excel_path
registryget("hkey_local_machine\software\microsoft\windows\currentversion\app paths\excel.exe","path",regstring!,str_excel_path)
run(str_excel_path,normal!)
iwithyou 2003-01-20
- 打赏
- 举报
看saveas
