技术论坛

 • 产品分类
 • 咱工程师的故事
 • 培训与认证答疑专区
 • 服务合作伙伴专区

回复:往EXCEL表格写入时间及数据丢失的问题？

moonontree

  • 帖子

    73

  • 精华

    0

  • 被关注

    1

论坛等级：游士

注册时间：2007-03-30

普通 普通 如何晋级?

发布于 2009-06-12 09:08:17

0楼

我从论坛中找到了下面的代码.

每五分钟定时触发一次,可是没有反应,请问是何故?



Option Explicit



Function action



Dim fso,myfile,daystr,dstr,fname



dstr = FormatDateTime(Date)



fname="d:\" + dstr + ".xls"



Set fso = CreateObject("s cripting.FileSystemObject")



Set MyFile = fso.GetFile("d:\ExcelExample.xls")



MyFile.Copy (fname)

End Function
评论
编辑推荐： 关闭

请填写推广理由：

活动公告 查看全部公告>

「技术论坛」、「找答案」关于 AI 辅助创作内容的使用规范

热门视频，猜你喜欢

本版热门话题

SIMATIC WinCC / Panel

共有32940条技术帖

更多

评选标准

相关推荐

换一换

热门标签

换一换

相关帖子推荐

换一换
guzhang

恭喜，你发布的帖子

被评为精华帖！

快扫描右侧二维码晒一晒吧！

再发帖或跟帖交流2条，就能晋升VIP啦！开启更多专属权限！

  • 分享

  • 只看
    楼主

top
X 图片
您收到0封站内信：
×
×
信息提示
很抱歉！您所访问的页面不存在，或网址发生了变化，请稍后再试。