作者fumizuki (蒙面加菲狮)
看板Visual_Basic
标题Re: [VB6 ] 如何把text档里面的资料弄到EXCEL去??
时间Tue Sep 12 22:39:53 2006
※ 引述《bb7 (MEMS)》之铭言：
: ※ 引述《fumizuki (蒙面加菲狮)》之铭言：
: : Public Sub ExportToExcel()
: : '建立Excel
: : Dim excl As New Excel.Application
: : Dim wb As Excel.Workbook, ws As Excel.Worksheet, ap As Excel.Application
: : Set wb = excl.Workbooks.Add
Set wb = excl.Workbooks.Add
'建立新的 excel工作表
Set wb = excl.Workbooks.Open "路径"
'打开现有的工作表
wb.SaveAs "路径"
'另存新档
wb.Save
'储存档案
开启档案、建立档案、储存档案、读取储存格资料、修改储存格资料 的方法都知道了，
应该没什麽太大问题，接下来看你要怎麽应用了 @_@
你可以存成资料库的方式，由使用者选择时间区间，把资料转存至 excel 格式
或者每次抓到讯号资料的时候，都固定写入到同一个 excel 档案里 @_@
--
▃▅▇▆▄ ▆▂▃ `
逝去感情如何能留住，半点痴情遗留殊不易，██▅▇▄▃ ▇▃▂" .
█████████▃i ▁▄▇
更多凄凄惨惨的遭遇…………██▆▃ █▅▆▃ˍ▄*
◢ ▂█▄▇▅▂▌.
我不知道，王～八～蛋～～！ ▂▆███ █▄▃ 。fumizuki。Check。
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 218.184.116.37