以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求教:修改EXCEL标题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=42084)

--  作者:白搭
--  发布时间:2013/11/3 23:32:00
--  求教:修改EXCEL标题
能不能在狐表中,通过代码.修改EXCEL表格标题名称

由于EXCEL表是从其它地方下载来的,标题中部分列是以 \'涨幅%%\',\'当日___DDF\'等形式做的,我想如何能够通过代码修改这些标题为指定的名称.

--  作者:白搭
--  发布时间:2013/11/3 23:41:00
--  
Dim App As New MSExcel.Application
App.Visible = True
Dim Wb As MSExcel.Workbook = App.WorkBooks.Open("D:\\沪深股.xls")
Wb.WorkSheets(1).range("A1").Value = "ID"
Wb.WorkSheets(1).range("B1").Value = "日期"
Wb.WorkSheets(1).range("C1").Value = "代码"
Wb.Save
App.Quit
 自己解决了