以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于导出EXCEL问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=147818)

--  作者:裴保民
--  发布时间:2020/3/25 0:36:00
--  关于导出EXCEL问题
导出EXCEL数据时,已经设置好格式,问什么导出来的数据不带格式呢?(数据字体本来是加粗红色的导出来的不是)
--  作者:有点蓝
--  发布时间:2020/3/25 8:35:00
--  
怎么设置的格式,又是怎么导出的execl。能不能一次就把问题说明白!
--  作者:裴保民
--  发布时间:2020/3/25 8:42:00
--  
Dim dlg As New SaveFileDialog \'定义一个新的SaveFileDialog 
Dim flg As New SaveExcelFlags
dlg.Filter= "Excel文件|*.xlsx" \'设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮
     Tables("按账户查账窗体_azhcxTable").SaveExcel(dlg.FileName, "按账户查账",flg.CellStyle=True )  \'保存文件
End If