以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]设置字体设置范围代码  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=147171)
--  作者：hanlingli111999
--  发布时间：2020/3/11 11:51:00
--  [求助]设置字体设置范围代码
老师好，设置字体，怎么设置范围，代码咋写，谢谢
--  作者：有点蓝
--  发布时间：2020/3/11 12:14:00
--  
没看懂，截图说明一下
--  作者：hanlingli111999
--  发布时间：2020/3/11 12:23:00
--  
图片点击可在新窗口打开查看Dim Style As XLS.Style = Book.NewStyle
Style.FontBold = True
style.fontsize=10
sheet(1,10).style = Style
我想整个工作表或选定范围字体为10号，上述的sheet(1,10).style = Style仅设置了指定的单元格，怎么修改
--  作者：hanlingli111999
--  发布时间：2020/3/11 13:06:00
--  


以下为帮助上的代码，我复制到我的文件上调试，导不出来呀





Dim ex as New Exporter
ex.SourceTableName = "订单" \'指定导出表
ex.FilePath = "c:\\Data\\订单.xls" \'指定目标文件
ex.Format = "Excel" \'导出格式为Excel
ex.Fields = "日期,客户,数量,单价,产品" \'指定导出字段
ex.Filter = "[产品] = \'PD01\'" \'指定导出条件
ex.Export() \'开始导出
--  作者：hanlingli111999
--  发布时间：2020/3/11 13:16:00
--  
问题已解决，多谢