Excel精英培训网

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

[已解决]用VBA代码拷贝局域网中计算机的文件到本地计算机

[复制链接]
发表于 2015-11-11 08:34 | 显示全部楼层 |阅读模式
各位老师好:
       请问,我想拷贝IP为172.16.100.188计算机上,D盘下LIS50文件夹下的123.TXT文件,到本地计算机D盘下,代码该如写。已知:局域网上172.16.100.188计算机名为zzzy,工作组HOME,D盘也已经共享,可以通过运行,网络邻居等手动打开123.TXT文件。请问怎样用代码把文件123拷贝到本地计算机上来,万分感谢!
最佳答案
2015-11-11 09:14
'FileCopy 语句示例
'本示例使用 FileCopy 语句来复制文件。示例中假设 SRCFILE 为含有数据的文件。
'
Sub test()
    Dim SourceFile, DestinationFile
    SourceFile = "d:\1.txt"                 ' 指定源文件名。
    DestinationFile = "c:\2.txt"            ' 指定目的文件名。
    FileCopy SourceFile, DestinationFile    ' 将源文件的内容复制到目的文件中。
End Sub



这是excel帮助的示例,可以复制本地文件。
换成自己的路径,你试试看吧
excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
发表于 2015-11-11 09:14 | 显示全部楼层    本楼为最佳答案   
'FileCopy 语句示例
'本示例使用 FileCopy 语句来复制文件。示例中假设 SRCFILE 为含有数据的文件。
'
Sub test()
    Dim SourceFile, DestinationFile
    SourceFile = "d:\1.txt"                 ' 指定源文件名。
    DestinationFile = "c:\2.txt"            ' 指定目的文件名。
    FileCopy SourceFile, DestinationFile    ' 将源文件的内容复制到目的文件中。
End Sub



这是excel帮助的示例,可以复制本地文件。
换成自己的路径,你试试看吧
回复

使用道具 举报

 楼主| 发表于 2015-11-14 13:14 | 显示全部楼层
爱疯 发表于 2015-11-11 09:14
'FileCopy 语句示例
'本示例使用 FileCopy 语句来复制文件。示例中假设 SRCFILE 为含有数据的文件。
'

谢谢老师,这几天忙,没及时回复,谢谢!
回复

使用道具 举报

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

本版积分规则

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

GMT+8, 2024-4-27 03:15 , Processed in 0.207368 second(s), 13 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

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