ar = Split(.exec("cmd /c dir /a-d /b /s " & Chr(34) & myPath & "\*.xls*" & Chr(34)).StdOut.ReadAll, vbCrLf)
有大神可以幫忙改下代碼運行時不要彈出黑框界面。或者是有其他的代碼替代此功能。
裝入陣列會有一個空值，有沒有辦法去掉。
uj5u.com熱心網友回復：
有大神嗎
uj5u.com熱心網友回復：
vba自己不也有dir函式嗎？回圈加上遞回，把所有子檔案夾下的符合條件的檔案名篩出來就可以了。用FSO也能實作，網上代碼很多
uj5u.com熱心網友回復：
那你的意思是除了替換，沒有辦法去掉黑框嗎uj5u.com熱心網友回復：
幫你查了一下，貌似想獲得運行結果，得使用StdOut，就有黑視窗。要想繼續用你的方法還不想要黑視窗，試試用API把視窗隱藏？uj5u.com熱心網友回復：
怎么改下代碼，可以我分全給你。轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/7328.html
標籤：VBA
上一篇：請問為什么會有數值沒被運算？