[算表] vba檔案名稱

作者: chunchanhung (毛毛狂)   2019-01-02 18:39:53
目前藉由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
作者: soyoso (我是耀宗)   2019-01-02 18:45:00
開啟檔案名稱正作用中的話activeworkbook.name如果巨集寫在a檔案內的話thisworkbook.name如要要取得開啟活頁簿的話,可迴圈於workbooks集合
作者: chunchanhung (毛毛狂)   2019-01-02 18:51:00
S大你好我如果我想用c檔案來執行這個巨集我巨集寫在個人巨集活頁簿那要怎麼改呢
作者: soyoso (我是耀宗)   2019-01-02 18:56:00
如果a、b檔已經開啟且檔案不確定的話,就迴圈於workbooks集合,判斷排除c檔檔名不要取,再判斷那個要歸類為a檔(可能是活頁簿內有某個名稱的工作表之類的),哪個為b檔
作者: chunchanhung (毛毛狂)   2019-01-02 23:20:00
S大迴圈想了很久但還是沒有概念怎麼寫能提示一下嗎 謝謝我目前是 開啟兩個檔案 :‘’隨機檔案‘’&b檔案透過A檔案的巨集(a檔案未開啟將 ‘’隨機檔案‘’內容複製到b檔案那隨機檔案的名稱是只能透過workbook迴圈來判斷嗎?
作者: soyoso (我是耀宗)   2019-01-02 23:56:00
迴圈看是用for each...next或用for...next配合workbooks(索引值)的方式,判斷為if workbook.name不為a或b檔名的話就為隨機檔案檔名隨機檔案的名稱是只能透過迴圈來判斷嗎?資料不足無法肯定是否就只能用迴圈方式。因為有可能原po所開啟的隨機檔案是有符合某個字串在其中的話,也可以dir配合萬用字元*取得

Links booklink

Contact Us: admin [ a t ] ucptt.com