- 帖子
- 835
- 主題
- 6
- 精華
- 0
- 積分
- 915
- 點名
- 0
- 作業系統
- Win 10,7
- 軟體版本
- 2019,2013,2003
- 閱讀權限
- 50
- 性別
- 男
- 註冊時間
- 2010-5-3
- 最後登錄
- 2025-7-5
|
Hsieh 版主謝謝
C=MID(A,1,1)誤值了改成 C=MID(c,1,1)
只想 With Sheets(c) 的c是 ...
y663258 發表於 2011-10-26 23:51 
C=MID(c,1,1) ?
這樣還是不對啊,
先看前面 : FS = Dir(fd & "\*.xls")
得知 FS 會 = "8.xls"
而 C=MID(c,1,1) 不管跑多少遍都只會等於 "8".
至於底下說的 :
With Sheets(C)改成Sheets("9")可執行但資料夾內工作表檔名可以是9或他不定，如何讓c與工作表同
如果你每個 Excel 檔案都只有一個 Sheet 那麼只要用 Sheets(1) 來抓取就可以了. (此法不需要管 Sheet 到底是取什麼名稱)
也就是改成 With Sheets(1) 即可. |
|
發表於 2011-10-27 21:27
| 