文件夹不允许修改是什么原因(文件夹不能修改)

#Exce#

大家有没有遇到过这样的问题，文件名称1-10，比如是视频文件，那么在播放器中显示的顺序可能就变成了1、10、2、3、4、5、6、7、8、9，出现这种情况的原因是数字被当成文本来排序中经常出现的问题，文本格式的数字排序是严格按照起始字符的顺序排序，而不是按照数值大小来排序。

解决这个问题的方法，其实很简单，就是要把所有的数字变成相同位数的就可以了：01-10这样就能按照我们预想的顺序显示了。

如果就只有10个文件我们自己手工修改一下就好了，但是更多的文件，我们就要想想办法，怎么才能更方便快捷地进行修改。

比如：

Excel中使用VBA就能实现我们的这个想法，我们用上面A列的名称替换成B列的名称。

代码不是我写的，我也是在网上找的：

Sub RenameFiles()'Updateby20141124Dim xDir As StringDim xFile As StringDim xRow As LongWith Application.FileDialog(msoFileDialogFolderPicker) .AllowMultiSelect = FalseIf .Show = -1 Then xDir = .SelectedItems(1) xFile = Dir(xDir & Application.PathSeparator & "*") Do Until xFile = "" xRow = 0 On Error Resume Next xRow = Application.Match(xFile, Range("A:A"), 0) If xRow > 0 Then Name xDir & Application.PathSeparator & xFile As _ xDir & Application.PathSeparator & Cells(xRow, "B").Value End If xFile = Dir LoopEnd IfEnd WithEnd Sub

具体的用法，也很简单：

第一步：Excel中打开开发工具，新建模块，粘贴这段代码；

第二步：准备好上面A、B两列文件名称；

第三步：在开发工具的窗口下，按F5，运行这个模块；

第四步：从弹出的窗口选择要修改的文件夹；

确定之后就自动批量修改文件名称了。

可能出现的修改不成功的问题是，文件名称不规范，含有不被允许的字符例如“/”；又或者是A列文件名称与实际文件名称不匹配。

Excel 2016之后提供了Power Query这个插件，我们可以很方便的从目录中提取文件名称：

选择从文件夹：

这样就能很好地避免第二个容易出现的问题，并且也能很容易的在Power Query中就实现文件名称的修改，生成我们需要的A、B列数据。