以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  怎样将值写到d:\test\1.xls的A1  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=174260)
--  作者：fvcfox
--  发布时间：2022/1/7 21:10:00
--  怎样将值写到d:\test\1.xls的A1
如题
--  作者：hongsejiyi
--  发布时间：2022/1/7 22:26:00
--  

Dim Book As New XLS.Book
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Sheet(0, 0).Value="abc"       \'将字符串写入文件的 A1单元格中，从0行0列开始
book.Save("d:\\test\\1.xls") 

[此贴子已经被作者于2022/1/7 22:26:28编辑过]
--  作者：fvcfox
--  发布时间：2022/1/8 8:39:00
--  
但是要在d:\\test\\1.xls文件是已存在的前提下进行写入的
--  作者：有点蓝
--  发布时间：2022/1/8 9:15:00
--  
Dim Book As New XLS.Book("d:\\test\\1.xls") 
--  作者：fvcfox
--  发布时间：2022/1/10 16:48:00
--  
Dim Book As New XLS.Book("d:\\test\\1.xls") 
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Sheet(0,0).Value=1312313132
book.Save("d:\\test\\1.xls") 

红色代码能否使用"A1"的类似表示方法
--  作者：有点蓝
--  发布时间：2022/1/10 16:50:00
--  
不能。这种要使用vba：http://www.foxtable.com/webhelp/topics/2121.htm