使用Excel VBA重命名文件
这是我需要做的。 我在Excel表中有这两列。 用文件名称。 第一列有当前的文件名，第二列有我想要文件重命名的名称。 我需要使用这个，因为在重命名中没有任何模式。 例如，下面可能是一组文件…
Current Name > Rename To --------------------------- Abc.jpg > Dinner.jpg Xyz.jpg > Driving.jpg 123.jpg > Sunset.jpg 我知道这应该很容易做到这一点在VBA，但不完全确定如何。 任何帮助将非常感激。
我想你可以这样做，使用Name函数重命名文件，但是，您可能需要确保2列有完整的文件path，即“C：\ Temp \ ABC.jpg”
Dim Source As Range Dim OldFile As String Dim NewFile As String Set Source = Cells(1, 1).CurrentRegion For Row = 1 To Source.Rows.Count OldFile = ActiveSheet.Cells(Row, 1) NewFile = ActiveSheet.Cells(Row, 2) ' rename files Name OldFile As Newfile Next