I really hope someone can help me with this because I need to do,
I have an excel file with some columns and one column having file name in English and other column having the filename in other language. Now i need to do is rename the file in other language, is it possible to rename.
I tried this code
Example :
Sample Data ID OldFileName NewFileName
1 Sales1.PDF తెలుగు1.PDF
2 Sales02.PDF తెలుగు02.PDF
3 Sales567.PDF తెలుగు567.PDF
4 dest67.PDF తెలుగు67.PDF
I tried but it converting only into english, but not accepting to other.
Thanks in advance for any help.
I have an excel file with some columns and one column having file name in English and other column having the filename in other language. Now i need to do is rename the file in other language, is it possible to rename.
I tried this code
Code:
Sub pdfrenamefile()
Dim oldfile As String
Dim nwfile As String
Dim rng As Range
Dim fname As Range
Set rng = Range("Y7", Range("Y" & Rows.Count).End(xlUp))
For Each fname In rng
If IsEmpty(fname) Or fname = "" Then
Else
If FileFolderExists(Cells(1, 1)&fname) Then
nwfile = fname.Offset(, 1)&".PDF"
Name Cells(1, 1)&fname As Cells(1, 1) & nwfile
fname.Offset(0, 2)=nwfile
fname.Offset(0, 3)="Success"
Else
Range("AB"&fname.Row)="File Not Found"
End If
End If
Next fname
End Sub
Example :
Sample Data ID OldFileName NewFileName
1 Sales1.PDF తెలుగు1.PDF
2 Sales02.PDF తెలుగు02.PDF
3 Sales567.PDF తెలుగు567.PDF
4 dest67.PDF తెలుగు67.PDF
I tried but it converting only into english, but not accepting to other.
Thanks in advance for any help.
Last edited by a moderator: