返回列表 上一主題 發帖

請問mkdir的問題

wufonna

帖子
161 
主題
26 
精華
0 
積分
187 
點名
0  
作業系統
xp 
軟體版本
office 2010 
閱讀權限
20 
性別
男 
來自
TW 
註冊時間
2011-1-2 
最後登錄
2025-10-9 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2012-9-9 14:06 | 顯示全部帖子

請問mkdir的問題

請問執行

Sub MkDirs()
'造股票代號的目錄


For i = 2 To 1409
MkDir ThisWorkbook.Path & "\" & " (" & 工作表1.Range("A" & i).Value & ")" & 工作表1.Range("B" & i).Value
Next

End Sub

造目錄(1565)到精華下就沒有了

謝謝

u.rar (38.47 KB)

收藏 分享

wufonna

帖子
161 
主題
26 
精華
0 
積分
187 
點名
0  
作業系統
xp 
軟體版本
office 2010 
閱讀權限
20 
性別
男 
來自
TW 
註冊時間
2011-1-2 
最後登錄
2025-10-9 
2#
發表於 2012-9-9 14:10 | 顯示全部帖子
執行階段錯誤 75
路徑或檔案存取錯誤

謝謝

TOP

wufonna

帖子
161 
主題
26 
精華
0 
積分
187 
點名
0  
作業系統
xp 
軟體版本
office 2010 
閱讀權限
20 
性別
男 
來自
TW 
註冊時間
2011-1-2 
最後登錄
2025-10-9 
3#
發表於 2012-9-10 13:30 | 顯示全部帖子
是不是unicode的問題，如何改，謝謝

TOP

wufonna

帖子
161 
主題
26 
精華
0 
積分
187 
點名
0  
作業系統
xp 
軟體版本
office 2010 
閱讀權限
20 
性別
男 
來自
TW 
註冊時間
2011-1-2 
最後登錄
2025-10-9 
4#
發表於 2012-9-10 19:31 | 顯示全部帖子
謝謝 kimbal大大 GBKEE大大，的幫忙，程式可執行了，
謝謝^0^

TOP

        靜思自在 : 【生命在呼吸間】佛陀說：「生命在呼吸間。」人無法管住自己的生命，更無法擋住死期，讓自己永住人間。既然生命去來這麼無常，我們更應該好好地愛惜它、利用它、充實它，讓這無常、寶貴的生命，散發它真善美的光輝，映照出生命真正的價值。
返回列表 上一主題