以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 只导出选择的行 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=196522) |
-- 作者:yangwenghd -- 发布时间: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
|