- 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=11102)
-- 发布时间：2011/7/7 21:47:00
-- Excel打印文字在出现空格,跳到下一行
Excel打印文字在出现空格,跳到下一行
列:
表内资料: 修理冷气 换日本翻新冻cail一个 方哇呶 抽真空入环保雪种 入134a泵油
(打印成多行)
修理冷气
换日本翻新冻cail一个
方哇呶
抽真空入环保雪种
入134a泵油
-- 发布时间：2011/7/7 22:05:00
--
Dim st As String ="修理冷气 换日本翻新冻cail一个 方哇呶 抽真空入环保雪种 入134a泵油"
Dim Book As New XLS.Book \'定义一个Excel工作簿
Dim Sheet As XLS.Sheet = Book.Sheets(0) \'引用工作簿的第一个工作表
For n As Integer = 0 To st.split(" ").Length-1 \'向工作表的单元格中设置值
Sheet(n, 0).Value = st.split(" ")(n)
Next
Book.Save("c:\\reports\\test.xls") \'保存工作簿
Dim Proc As New Process \'打开工作簿
Proc.File = "c:\\reports\\test.xls"
Proc.Start()
-- 发布时间：2011/7/7 22:11:00
-- 请问代码放在何处
请问代码放在何处?
-- 发布时间：2011/7/7 22:15:00
--
多看看帮助文件.不然就是别人给出了代码,你还是不知怎么用
以上代码一看就是用在按钮里的