Dear All,
I am try to Rename Multiple PDF files with the Excel sheet Data.
Column A -Contains ,Original PDF File Name
Column B -Contains, to be Rename File Name
My Pdf files were in the folder path-E:\test
I took the Vb code from our fourm only.
But when try to run the macro, it shows "Run time Error '53': "File Not Found.
Please help to solve.
Thanks In Advance.
![]()
Sub Rename_All() Dim lastRow As Long, row As Long Dim path As String lastRow = Cells(Rows.Count, "A").End(xlUp).row For row = 1 To lastRow path = Left(Cells(row, "A").Value, InStrRev(Cells(row, "A").Value, "\")) Name Cells(row, "A").Value As path & Cells(row, "B").Value Next End Sub
Bookmarks