Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 2826|回复: 7

[已解决]如何用VBA代码移动或复制文件?

[复制链接]
发表于 2013-7-10 07:18 | 显示全部楼层 |阅读模式
在某个Excel工作薄中,如何用VBA代码,将E:\临时下载文件\my.xlsx移动或复制到D:\myexcel\my.xlsx? 谢谢!
最佳答案
2013-7-10 08:20
Name "E:\临时下载文件\my.xlsx" as "D:\myexcel\my.xlsx"
excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
发表于 2013-7-10 07:30 | 显示全部楼层
Shell cmd move E:\临时下载文件\my.xlsx D:\myexcel\my.xlsx 不懂vba,不知道这样写行不
回复

使用道具 举报

 楼主| 发表于 2013-7-10 07:35 | 显示全部楼层
风林火山 发表于 2013-7-10 07:30
Shell cmd move E:\临时下载文件\my.xlsx D:\myexcel\my.xlsx 不懂vba,不知道这样写行不

感谢帮助,可代码放入sub aa() Shell cmd move E:\临时下载文件\my.xlsx D:\myexcel\my.xlsx end sub 后,是红色字体,麻烦再改下吧。谢谢。
回复

使用道具 举报

发表于 2013-7-10 07:45 | 显示全部楼层
Shell "cmd move E:\临时下载文件\my.xlsx D:\myexcel\my.xlsx"
回复

使用道具 举报

 楼主| 发表于 2013-7-10 07:52 | 显示全部楼层
还是没成功,并打开了cmd.exe
回复

使用道具 举报

发表于 2013-7-10 08:20 | 显示全部楼层    本楼为最佳答案   
Name "E:\临时下载文件\my.xlsx" as "D:\myexcel\my.xlsx"
回复

使用道具 举报

 楼主| 发表于 2013-7-10 08:46 | 显示全部楼层
妞叫七七 发表于 2013-7-10 08:20
Name "E:\临时下载文件\my.xlsx" as "D:\myexcel\my.xlsx"

非常感谢,移动文件效果很好。
想再次求教:复制E:\临时下载文件\my.xlsx到D:\myexcel文件夹中,代码又该如何写?谢谢!
回复

使用道具 举报

发表于 2013-7-10 08:56 | 显示全部楼层
复制文件是用filecopy
filecopy  "E:\临时下载文件\my.xlsx" , "D:\myexcel\my.xlsx"
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-5-5 23:06 , Processed in 0.403665 second(s), 10 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表