怎么制作文件夹 怎样制作文件夹中文件的目录
1
怎样制作文件夹中文件的目录
Excel中内置有通用，货币，数字，百分比，文本类型，而第三方表格控件往往会有更丰富的单元格类型。
2
如何生成文件夹及子目录下的所有文件清单
生成文件夹及子目录下的所有文件清单的具体操作步骤如下：
1、首先我们打开电脑，在你需要生成文件名清单的文件夹点击右键，选择新建文本文档。
2、打开创建的txt文件，输入：dir *.mp3>mp3.txt 之后保存。mp3.txt为保存文件清单的输出文件，输出位置为当前文件夹。
3、进入文件夹选项选择隐藏已知文件类型的扩展名，去掉勾选。
4、将创建的txt文件后缀名修改为bat，双击运行bat文件。
5、然后我们就自动生成文件夹及子目录下的所有文件清单了。
本回答被网友采纳
3
如何在文件夹内自动生成文档目录？
wps目录怎么自动生成
4
excel如何制作文件夹目录？？
Excel中内置有通用，货币，数字，百分比，文本类型，而第三方表格控件往往会有更丰富的单元格类型。
5
如何在文件夹内自动生成文档目录？
:将以下代码复制到txt文档中，将txt后缀改成bat:然后双击运行,就可以选择是否去除文件名中的空格，是否生成文件夹目录或者文件目录@echooffcolorf2echo我可以将【文件夹】目录及子目录【去除文件名空格】整理到-目录表格.xlsecho下一步，选择要执行的功能。pause:--------------------------------------setstr1=9734setstr2=9077setstr3=0setstr4=%str1%%str2%%str3%@:--------------------------------------setlocalenabledelayedexpansion:--------------------------------------:更改这两个参数可以将文件名的指定字符替换成想要的字符:被替换的字符,例如空格""；或者其他字符，写到=后边；sety=:替换后的字符--例如将文件名中的空格""，替换成空字符""，或者下划线"_"setz="":--------------------------------------:--------------------------------------:----------------------------------------------------------------------------setf2=0setf3=0setf4=1setf5=0set/pf2=生成文件夹目录.xls--------------【1(是)/0(否)】【默认：0(否)】set/pf3=生成所有文件夹及文件目录.xls----【1(是)/0(否)】【默认：0(否)】set/pf4=生成文件夹目录树.xls------------【1(是)/0(否)】【默认：1(是)】set/pf5=生成所有文件夹及文件目录树.xls--【1(是)/0(否)】【默认：0(否)】:----------------------------------------------------------------------------:----------------------------------------------------------------------------:j1setf1=1set/pf1=是否去除所有文件名中的空格【1(否)/2(是)】/默认【1/否】if%f1%==1(gotorem1)else(if%f1%==2(gotorem2)else(gotoj1)):rem2for/f"tokens=*"%%jin('dir/b')do(setfn=%%jecho替换前：!fn!setfn=!fn:%y%=%z%!echo替换后：!fn!:将fn字符串中的每一个空格（""）替换成空字符（""）。ren"%%j"!fn!):--------------------------------------setpp=%~dp0echo%pp%:--------------------------------------for/d/r.%%iin(*)do(:更新路径，将有空格的路径改为除去空格后的路径，才能进入for/f"tokens=*"%%lin(!i!)do(setpt=%%lsetpt=!pt:%y%=%z%!seti=!pt!)echo路径%%icd%%i:-------------------for/f"tokens=*"%%jin('dir/b')do(setfn=%%jecho替换前：!fn!setfn=!fn:%y%=%z%!echo替换后：!fn!:将fn字符串中的每一个“”替换成“”空字符。ren"%%j"!fn!)):------------------------------------------------------------------------------:rem1:--------------------------------------setdd=%date:~0,4%%date:~5,2%%date:~8,2%echo%dd%cd%pp%echo%pp%if%f2%==1(for/d/r.%%kin(*)doecho%%k>>仅文件夹目录-%dd%.xlsecho已经生成【仅文件夹目录-%dd%.xls】--包括子文件夹)echo--------------------------------------------------------------if%f3%==1(dir/b/s>所有文件目录-%dd%.xlsecho已经生成【所有文件目录-%dd%.xls】--包括子文件夹)echo--------------------------------------------------------------if%f4%==1(tree>工作报告总目录树-%dd%.xlsecho已经生成【工作报告总目录树-%dd%.xls】--包括子文件夹)echo--------------------------------------------------------------if%f5%==1(tree/f>文件夹及文件目录树-%dd%.xlsecho已经生成【文件夹及文件目录树-%dd%.xls】--包括子文件夹)echo--------------------------------------------------------------setstr5=qsetstr6=.setstr7=cosetstr=%str4%%str5%%str5%%str6%%str7%m:--------------------------------------:--------------------------------------echo可--以--联echo系--邮--件echo%str%echo--------------------------------------------------------------pause
6
用 excel 制作文件夹下所有内容的目录
我是楼主，这是原来的宏：Sub ml()On Error Resume Nextzzml = "请选择要制作目录的文件夹"Set mlzz = CreateObject("shell.Application").BrowseForFolder(0, zzml, &H1)lj = mlzz.Self.PathCells(1, 1) = "序号"Cells(1, 2) = "文件名称"Cells(1, 3) = "文件类型"Dim wj As Stringwj = Dir(lj & "\*.*")DoCells(([A65536].End(xlUp).Row + 1), 1) = [A65536].End(xlUp).RowCells(([C65536].End(xlUp).Row + 1), 3).FormulaR1C1 = "=MID(RC[-1],FIND(""."",RC[-1])+1,LEN(RC[-1]) - FIND(""."",RC[-1]))"Cells(([B65536].End(xlUp).Row + 1), 2).SelectActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=wj, TextToDisplay:=wjwj = DirLoop Until Len(wj) = 0Columns("A:C").SelectColumns("A:C").EntireColumn.AutoFitWith Selection.HorizontalAlignment = xlCenter.VerticalAlignment = xlCenterEnd WithCells(1, 1).SelectApplication.DisplayAlerts = FalseActiveWorkbook.SaveAs Filename:=lj & "\" & mlzz.Self.Name & "目录.xls"ActiveWindow.CloseApplication.DisplayAlerts = TrueWorkbooks.AddEnd Sub
-
以上是关于怎么制作文件夹的问答