Foxtable(狐表)用户栏目专家坐堂 → 只导出选择的行


  共有17人关注过本帖树形打印复制链接

主题:只导出选择的行

帅哥哟,离线,有人找我吗?
yangwenghd
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2750 积分:18336 威望:0 精华:0 注册:2013/4/9 10:41:00
只导出选择的行  发帖心情 Post By:2025/5/8 23:15:00 [只看该作者]

老师 我可以把这个改为只导出选中的行吗?

Dim dlg As New SaveFileDialog '定义一个新的SaveFileDialog 
dlg.Filter = "Excel文件|*.xls" '设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
     Tables("采购管理窗口_Table2").SaveExcel(dlg.FileName, "采购管理窗口_Table2") '保存文件
End If

 回到顶部