⑴ 如何用Excel表格大量創建指定名字的文件夾
操作步驟:
1、打開Excel,在A列中輸入「ren+空格」;
2、在B列中輸入「舊文件名+空格」;
3、在C列中輸入「新文件名+空格」;
4、在D列中輸入函數「=A1&B1&C1」;
5、然後選擇D列並復制;
6、打開新記事本並粘貼該內容;
7、把該文本文檔保存為bat文件,並移動到該文件夾下,雙擊運行即可。
⑵ excel如何根據表格內容創建文件夾
假設a列為文件夾名,那麼在b1輸入公式:="md
"&a1
b1下拉填充,然後你想在哪裡創建文件夾(假設在d盤的aaa目錄下面),那麼你到d:\aaa\下面建立一個文本文件,把b列內容復制過去,保存並把文件後綴從txt更改為bat,運行這個文件就ok了。
⑶ 如何根據excel表格中的數據自動創建文件夾
Excel怎樣快速批量新建文件夾
⑷ 如何把Excel表格內的內容輸出為文件夾名
Subxyf()
OnErrorResumeNext
X=Range("A65535").End(xlUp).Rows
Fori=1ToX
VBA.MkDir("D:/"&Cells(i,1).Text)
Next
EndSub
⑸ WPS怎麼快速生成文件夾 WPS表格和TXT文本生成多個文件夾的教程
有時候工作需要,我們要建立多個文件夾,如果一個個手動地去建的話,耗時又費神。那我們需要如何批量生成文件夾的技巧了,今天的經驗里介紹了如何使用WPS表格和TXT文本快速生成多個文件夾。
1、首先,建立一個WPS表格。打開WPS表格,在第一行第一列輸入“ 文件名”, 根據需要,輸入你想要批量生成的文件名,這里輸入的第一個文件名是20160701。
2、輸入第一個文件名後,把滑鼠移動到選擇框右下角的處,下拉,有規律地批量生成多個文件夾名稱。當然,這個步驟要看你生成的文件名是否有規律了,如果沒規律建議手動填寫。
3、在 第二行第二列輸入格式="md "&A2,注意,md後有個空格。 如果你選擇的EXCEL, 公式還可以寫成="md" &A2。
4、同樣地,按照第二個步驟,下拉單元格,批量生成需要的公式。
5、然後,建立一個txt文本,把上一個步驟批量生成的公式復制粘貼到新建的txt文本上。
6、 txt文本後綴.txt改為.bat ,出現修改文件格式的警告後,這 里選擇確定即可生成新的.bat文件。
7、 雙擊修改後的.bat文件 ,批量生成文件夾成功。
注意事項:
輸入格式="md "&A2,注意md後有個空格。
⑹ 如何根據excel表格中的數據自動創建文件夾
假設A列為文件夾名,那麼在B1輸入公式:="MD "&A1
B1下拉填充,然後你想在哪裡創建文件夾(假設在D盤的AAA目錄下面),那麼你到D:\AAA\下面建立一個文本文件,把B列內容復制過去,保存並把文件後綴從TXT更改為BAT,運行這個文件就OK了。
⑺ 怎樣在excel表格里建立子文件夾
是插入表格吧,右鍵點擊左下方工作表標簽——插入——工作表——確定
雙擊標簽可以更改名稱
⑻ 怎樣把表格里的照片復制到新建文件夾里
方法:
1、打開一個含有圖片文件的EXCEL表格,如下圖。
⑼ 怎麼通過EXCEL表格中的文件名,提取所需文件到一個文件夾,或集中在一個地方
打開我的電腦窗口或者其他窗口,占選菜單欄上的工具,選擇下面的文件夾選項,在彈了的對話框中選擇查看選項卡,在高級設置中拖動右邊的滾動條(要慢一點),找到隱藏已知文件類型的擴展名一項,在前面的復制框中打上勾,點確定,然後刷新一下,擴展名就被隱藏了。
⑽ 如何點擊Excel某一個單元格,然後按照表格內容用VBA在當前文件夾下創建文件夾
'右鍵點擊所在表格的下面的標簽選擇查看代碼粘貼以下代碼
PublicfilepathAsString'全局變數filepath
PrivateSubWorksheet_SelectionChange(ByValTargetAsRange)
Setwjj=CreateObject("scripting.filesystemobject")
IfActiveCell.Column()=1Then'判斷滑鼠是否選擇A列單元格
IfActiveCell.Value<>""Then'如果選中的單元格不為空
filepath=ThisWorkbook.Path&""&ActiveCell.Value'設置文件夾目錄為當前excel路徑
IfDir(filepath,vbDirectory)<>""Then'判斷文件夾是否存在
filepath=ThisWorkbook.Path&""&ActiveCell.Value&""
Else
MkDirfilepath'新建文件夾
EndIf
EndIf
End
IfActiveCell.Column()=2Andfilepath<>""Then'判斷滑鼠是否選擇B列單元格且filepath是否設置A列文件夾
IfActiveCell.Value<>""Then
x=filepath&ActiveCell.Value
IfDir(x,vbDirectory)<>""ThenElseMkDirx
EndIf
EndIf
EndSub