作者cara5659 (傻傻)
看板Office
标题[问题] 将特定pdf复制到指定资料夹
时间Mon Jun 1 22:24:46 2020
(若是和其他不同软体互动之问题 请
记得一并填写)
软体:2007 excel
A栏在同个资料夹下，分别要将档案移到对应的B栏资料夹中，路径皆先置於桌面。
https://i.imgur.com/f6cD77G.jpg
找了一段vba，请问蓝框处该如何修正，才可达到上述效果。谢谢
https://i.imgur.com/oQ4YL9x.jpg
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 123.205.136.149 (台湾)
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Office/M.1591021488.A.F9D.html
1F：→ soyoso: range.offset，columnoffset以1向右一栏 06/01 22:42
2F：→ soyoso: "c:\users\desktop\ & range.offset(..) & "\" &... 06/01 22:43
3F：→ soyoso: 回文内range是以巨集内的变数 06/01 22:44
4F：→ soyoso: 或是range("b" & range.row)、cells(range.row,..)的方式 06/01 22:45
5F：→ soyoso: 来回传回圈内b栏的值 06/01 22:45
8F：→ cara5659: 试了第1个与3个方法，出现型态不符合，还请指正，谢谢 06/01 23:29
9F：→ soyoso: 06/01 22:43更正一下 06/01 23:36
10F：→ soyoso: "c:\users\desktop\" & range.offset(..) & "\" & ... 06/01 23:36
11F：→ soyoso: 原po回文上"c:\users\desktop\" & cells(range.row,2) & " 06/01 23:37
12F：→ soyoso: \" & pdffile.value，最後没有双引号 06/01 23:38
13F：→ soyoso: cells(..)内不是直接用range.row这方面就是因为会怕原po就 06/01 23:39
14F：→ soyoso: 直接这麽内，我才在06/01 22:44回range是以巨集内的变数 06/01 23:39
15F：→ soyoso: 巨集内的变数是PDFfile这个 06/01 23:40
16F：→ soyoso: PDFfile.row来回传列号 06/01 23:41
17F：→ cara5659: 因为底子不好造成误解，我会再试试看。谢谢你的耐心说 06/01 23:50
18F：→ cara5659: 明 06/01 23:50
22F：→ cara5659: 已经修正vba，仍找不到路径，找不到bug 06/02 00:17
23F：→ cara5659: 还请so大指正，谢谢 06/02 00:17
24F：→ soyoso: " \ "实际的路径前後有空白格吗？ 06/02 00:24
25F：→ soyoso: 没有的话就是"\" 06/02 00:24
26F：→ cara5659: 空白格修正後可以顺利使用了，十分感谢 06/02 00:28
27F：→ cara5659: 板大你好，原vba是可用的，但因为实际上会先筛选再进行 06/07 10:40
28F：→ cara5659: 档案复制，所以改写原程式，只是改写後执行失败，不知道 06/07 10:40
30F：→ cara5659: pg （上是改写後，下是原本Ok) 06/07 10:40