導航:首頁 > 文件類型 > 如何根據excel值建立文件夾

如何根據excel值建立文件夾

發布時間:2023-11-01 10:29:45

❶ 如何應用EXCEL建立電子文件目錄

實現的方法和詳細的操作步驟如下:

1、第一步,在需要提取文件夾名稱的文件夾中創建一個新的「文本文檔」,如下圖所示,然後進入下一步。

❷ 如何用EXCEL創建文件夾

看圖。

其中第三行代碼

iPath = ThisWorkbook.Path & "" & Range("A1")

意思是:在該工作簿文件所在的路徑下面,創建以A1值為名稱的文件夾。

如果需要指定其他路徑,可改為下面的形式:

iPath = "D:學習資料初二" & Range("A1")

這樣修改後的意思是:在"D:學習資料初二"這個路徑下面,創建以A1值為名稱的文件夾。

【為了方便你復制,貼出完整代碼如下】:


Sub 創建文件夾()

Dim iPath$

iPath = ThisWorkbook.Path & "" & Range("A1")

If MsgBox("確定要創建文件夾嗎?" & Chr(13) & "創建路徑:" & Chr(13) & iPath, vbYesNo) = vbYes Then

If Dir(iPath, vbDirectory) = "" Then '如果沒有同名文件夾那麼:

MkDir iPath: SetAttr iPath, 0 '創建文件夾

MsgBox "文件夾已創建成功!" & Chr(13) & Chr(13) & iPath, , "提示"

Else '否則

MsgBox "文件夾已存在,無需創建!" & Chr(13) & Chr(13) & iPath, , "提示"

End If

End If

End Sub

閱讀全文

與如何根據excel值建立文件夾相關的資料

熱點內容
現在哪裡開設了編程課 瀏覽:230
漫一網路培訓學校有哪些 瀏覽:752
酷狗app如何在電腦同步播放 瀏覽:668
雲浮微信群 瀏覽:344
公司文件打不開 瀏覽:267
LOL的設置文件在哪裡 瀏覽:254
線上開庭是什麼app 瀏覽:526
新中大軟體怎麼設置文件夾 瀏覽:807
git刪除文件夾 瀏覽:353
皇室戰爭怎麼升級競技場 瀏覽:447
雅虎統計工具 瀏覽:741
edgepdf文件分類 瀏覽:901
cad為什麼捕捉不到外部參照文件 瀏覽:935
重慶一共有多少個網站 瀏覽:34
k8s配置文件env創建失敗 瀏覽:197
編程序在電腦上叫做什麼 瀏覽:92
qq閱讀可賺 瀏覽:21
怎樣查找web儲存文件圖片 瀏覽:681
人口檔案資料庫包括什麼信息 瀏覽:709
手機有什麼好玩的星戰網路游戲 瀏覽:15

友情鏈接