关于微信发送制定文件时文件复制不了

lmy945150

以下是VBA模拟键盘向指定微信好友发送指定文件的代码，但无法复制文件。
SSub wechatTEST()
         shell "C:\Program Files (x86)\Tencent\WeChat\WeChat.exe"

                    Sleep 500
                     SendKeys "{TAB}"
                     SendKeys "{TAB}"
                     SendKeys "{TAB}"
                      SendKeys "{TAB}"
                      Sleep 500
                    SendKeys Cells(2, "A"), False
                    Sleep 500
                    SendKeys "{ENTER}", False
                    Sleep 500
                    FileCopy Cells(2, "B").Value, False
                    Sleep 2000
                    SendKeys "^V", False
                    Sleep 500
                    SendKeys "{ENTER}", False
                    Sleep 500
            SendKeys "%{TAB}", True
End Sub


上述代码中
  FileCopy Cells(2, "B").Value, False

                    SendKeys "^V", False
为何不能复制我想要的文件？哪位大侠可以指导？

kevinchengcw

你对filecopy是不是有什么误解，他只是用来复制文件到其他地方的，并不能实现把文件放进剪贴板里

桑特容易额

kevinchengcw 发表于 2024-11-18 11:05
你对filecopy是不是有什么误解，他只是用来复制文件到其他地方的，并不能实现把文件放进剪贴板里

我也有这样的需求
举例哈：在文件资源管理器中复制一个文件，在粘贴时，系统怎么知道源文件是从哪里粘贴过来的，它的底层肯定会临时储存源文件的路径，如果知道这个临时的路径地址，就能用fileCopy直接操作了，所以，现在有大神知道这个路径存储在哪么?

kevinchengcw

用vba把文件放进剪贴板，比较常见的是用api

桑特容易额

kevinchengcw 发表于 2024-11-18 11:37
用vba把文件放进剪贴板，比较常见的是用api

上代码                    

kevinchengcw

多搜搜就有了，论坛里多数问题都有答案的
https://club.excelhome.net/thread-1580356-1-1.html

桑特容易额

kevinchengcw 发表于 2024-11-18 12:44
多搜搜就有了，论坛里多数问题都有答案的
https://club.excelhome.net/thread-1580356-1-1.html

这个是复制文件到剪切板的 有没有粘贴文件到指定位置的代码

kevinchengcw

多搜一下呗

lmy945150

感谢大侠指点！多多学习！