hur.cn - 华软网

 热门搜索

数据窗口导出到excel

  作者:未知    来源:网络    更新时间:2018/8/6
我用saveas() 将数据窗口导出到excel。
因为数据窗口中有的字段是dropdowndw的形式,dropdowndw设置为displaycolom为“名称”,datacolom为“代码”。
这样导出excel后,excel显示的为“代码”,我想导出excel显示的是“名称”,请问该怎么做?

我表达能力太差,不知道大家有没有明白?
谢谢关注!


------华软网友回答------
到这个地方看看(将所见dw内容(包括计算字段)输出到execl中)
http://www.easybetter.com/readarticle/htm/20/2004_1_15_194.html
下载这个pbl(针对6.5的)
------华软网友回复------
用SaveAsAscii("...\.xls")
或 Saveas("...\.xls",HTMLTable!)
------华软网友回复------
作者:郭宝利  来源:原创  日期:2004.07.19 


字段使用了下拉列表框、下拉数据窗口和单选按钮等有代码表的编辑风格时,在数据窗口控件上显示的值和字段实际得到的值并不相同,使用函数GetItemX只能读取这样的字段的真实取值,而不是用户看到的值。如何才能读取用户看到的值?可以使用函数LookUpDisplay。
LookUpDisplay函数不能直接从PowerScript调用,可以在Describe中和Evaluate函数配合使用。因为函数Lookupdisplay不能指定对哪行数据进行操作,它的参数只有一个字段名称,所以必须和Evaluate函数配合使用。该函数的语法是:
Lookupdisplay(columnname)
其中,参数columnname是字段的名称,而不是一个字符串。函数执行错误则返回空字符串。
下面是一个和函数GetItemString相比较的例子。假设在一个数据窗口中定义字段sex的编辑风格为DropDownListBox,定义该字段使用编码表,编码表的定义是显示值“Male”,“Female”分别对应“男”和“女”。然后,在某个按钮的Clicked事件中编写如下脚本:
  MessageBox("getitemstring:" + dw_1.GetItemString(1,"sex"),&
"lookupdisplay:" + dw_1.Describe("Evaluate('lookupdisplay(sex)',1)"))


------华软网友回复------
用dw2xls,方便多多,9有源码,9以前版本可以破解
------华软网友回复------
给我发一个dw2xls,lnny2002@163.com
------华软网友回复------
那位有的那到這來吧﹐好東東大家共享呀﹐謝謝
------华软网友回复------
谢谢,我也想要一份,正找相关的东东呢,wfb.n@163.com.:)
------华软网友回复------
dd
------华软网友回复------
通用的程序没什么意思的

那样无法制作精美的报表 只能简单的把数据导出而已

楼主还是好好学习VBA 自己写代码导出吧 

遇到困难可以联系我:qfkx.com      
华软声明:本内容来自网络,如有侵犯您版权请来信指出,本站立即删除。