永发信息网

有把文件夹里所有的文件名,直接变成文本格式的方法吗

答案:2  悬赏:0  手机版
解决时间 2021-02-06 19:37
  • 提问者网友:流星是天使的眼泪
  • 2021-02-06 12:51
我要备份一个文件夹的资料。
举例,如果文件夹中有20首MP3,我刻盘保存,可是为了日后使用,我要把所有MP3的名字记下来。
我现在只能挨个复制每个文件的名字,在粘贴到写字板或者EXCEL里。
如果文件很多的话,一个一个复制粘贴就很麻烦。
请问有把文件夹内容,直接变成文本格式的方法吗?
(注:截屏成图象文件不行,我要文本格式的。)
最佳答案
  • 五星知识达人网友:思契十里
  • 2021-02-06 13:40
命令行提示符下,DIR 盘符:\路径\*.* >AA.TXT ,生成文本文件,再行径编辑。
全部回答
  • 1楼网友:掌灯师
  • 2021-02-06 14:33
1、在那个文件夹内新建一个.txt文件(如wenjian.txt),用记事本单开输入 dir> 1.txt 保存退出 将刚才的.txt(wenjian.txt)更名为.bat文件(wenjian.bat) 双击wenjian.bat文件运行一次,在文件夹内多出一个1.txt文件 打开1.txt文件,将其中的内容粘贴到excel中,数据——分列处理就可以得到你要的文件名列表了! 2、vba(2003版) 在那个文件夹下新建excel文件,打开新建的excel文件,右击工作表标签(如sheet1),查看代码——在代码编辑器中输入以下代码 sub test() dim i as integer dim strpath as string strpath = thisworkbook.path with application.filesearch .lookin = strpath .searchsubfolders = true .filename = "*.*" if .execute > 0 then for i = 1 to .foundfiles.count range("a" & i) = .foundfiles(i) next i end if end with end sub 回到excel表格中,工具——宏——宏——选择sheet1.test——执行 看看效果吧! 祝你成功解决问题!
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯