VBA写入数据到局域网共享文件

问题描述:

Dim xlapp As Excel.Application
Dim shujuku As Excel.Workbook
Set xlapp = CreateObject("Excel.Application")
Set shujuku = xlapp.Workbooks.Open("\192.168.1.10\gx\shujuku.xls")
shuju.sheets(data).Cells(1, 1) = thisworkbook.sheet(chukudan).Cells(3, 1) '把自己的数据写入局域网共享的文件
shujuku.save
xlapp.Quit
Set xlapp = Nothing

请教一下,用这种方式存储数据到局域网共享文件,速度慢,有没有什么更好的办法

要找到慢的原因,
如果是是excel处理起来慢,就先把excel保存到本地,然后复制到共享文件
如果共享文件这种传输方式慢,可以改用FTP传输问文件