Access交流中心

北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |

如何导出已筛选的数据

子煜  发表于:2012-02-29 11:50:18  
复制

详见附档,当按条件筛选后,如何导出子窗体里已筛选的数据呢?

已经做了个导出代码,但每次导出都是全部数据,请高手帮看下代码哪有错?

 

 

点击下载此附件

 

Top
瞿丽忠 发表于:2012-02-29 12:49:32

'strSQL = "SELECT Q_FGB.* FROM Q_FGB"
'If Me.F_FGB2.Form.FilterOn = True And Me.F_FGB2.Form.Filter <> "" Then
   'strSQL = strSQL & " Where " & Me.F_FGB2.Form.Filter
'End If

改为

 

strSQL = Me.F_FGB2.Form.RecordSource

 

 

你未使用筛选器 FILTER, 而是直接在数据源上筛选



纵云梯 发表于:2012-02-29 14:06:44

瞿丽忠说得对,因为你筛选子窗体的方法是直接修改子窗体的数据源,但却没有用到Filter方法;但但你在导出时却用了子窗体的Filter,但你要知道你之前筛选没用Filter方法,所以filter一直是空的,之后就会直接影响你的导出无效。

 

决绝方法有而,第一就好像瞿丽忠说说的筛选和导出都用改变数据源的方法;第二就是筛选和导出都用Filter方法。两种都可以,看你喜欢用那种。

 

这里是Filter方法的例子:点击下载此附件



子煜 发表于:2012-02-29 14:28:13
哪个速度 快些呢?

纵云梯 发表于:2012-03-01 08:12:47

都差不多,二十万个记录以上改子数据源方法理论上快一点点。



总记录:4篇  页次:1/1 9 1 :