為什麼這篇vba讀取檔案名稱鄉民發文收入到精華區：因為在vba讀取檔案名稱這個討論話題中，有許多相關的文章在討論，這篇最有參考價值！作者chunchanhung (毛毛狂)看板Office標題[算表] vba檔案名稱時間Wed Ja...
目前藉由Vba來完成
將A檔案資料 複製到B檔案
但如果A檔案名稱每次都不同
Vba 需要一直跟改名稱
想問有沒有辦法自動偵測現在開啟檔案名稱
並自動帶入取得（A檔案）
語法如下
Sub
Windows(A檔案).Activate
Range(B4).select
Selection.copy
Windows(B檔案）.Activate
Activecell.select
Active sheet.Paste
End sub
-----
Sent from JPTT on my iPhone
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 42.73.145.56
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1546425595.A.0F6.html
→ soyoso: 開啟檔案名稱正作用中的話activeworkbook.name 01/02 18:45
→ soyoso: 如果巨集寫在a檔案內的話thisworkbook.name 01/02 18:46
→ soyoso: 如要要取得開啟活頁簿的話，可迴圈於workbooks集合 01/02 18:47
→ chunchanhung: S大你好 01/02 18:51
→ chunchanhung: 我如果我想用c檔案來執行這個巨集 01/02 18:51
→ chunchanhung: 我巨集寫在個人巨集活頁簿 01/02 18:51
→ chunchanhung: 那要怎麼改呢 01/02 18:51
→ soyoso: 如果a、b檔已經開啟且檔案不確定的話，就迴圈於workbooks 01/02 18:56
→ soyoso: 集合，判斷排除c檔檔名不要取，再判斷那個要歸類為a檔(可 01/02 18:56
→ soyoso: 能是活頁簿內有某個名稱的工作表之類的)，哪個為b檔 01/02 18:57
→ chunchanhung: S大 01/02 23:20
→ chunchanhung: 迴圈想了很久但還是沒有概念怎麼寫 01/02 23:20
→ chunchanhung: 能提示一下嗎 謝謝 01/02 23:20
→ chunchanhung: 我目前是 開啟兩個檔案 ：‘’隨機檔案‘’&b檔案 01/02 23:26
→ chunchanhung: 透過A檔案的巨集（a檔案未開啟 01/02 23:26
→ chunchanhung: 將 ‘’隨機檔案‘’內容複製到b檔案 01/02 23:26
→ chunchanhung: 那隨機檔案的名稱是只能透過workbook 01/02 23:26
→ chunchanhung: 迴圈來判斷嗎？ 01/02 23:26
→ soyoso: 迴圈看是用for each...next或用for...next配合workbooks( 01/02 23:56
→ soyoso: 索引值)的方式，判斷為if workbook.name不為a或b檔名的話 01/02 23:57
→ soyoso: 就為隨機檔案檔名 01/02 23:57
→ soyoso: 隨機檔案的名稱是只能透過迴圈來判斷嗎？資料不足無法肯定 01/02 23:58
→ soyoso: 是否就只能用迴圈方式。因為有可能原po所開啟的隨機檔案是 01/03 00:00
→ soyoso: 有符合某個字串在其中的話，也可以dir配合萬用字元*取得 01/03 00:02