Sorry, I dont think I was too clear. Here's an easier explanation.

I have a folder with about 150 generic file names for ".tif" scanned images.

I have an excel sheet with 150 client names with dates and the ".tif"
extension on the end in column A and a list of the 150 generic files names
in column B.

I want a macro that will look at the rename each of those generic file names
in column B with the new one in column B.

Hope thats a little easier.

"Peter Beach" wrote in message
...
Hi Niq,

Does something like this get you started?

Sub D()
Dim sName As String
Dim Arr As Variant
Dim sNewName As String

ChDir "c:\temp"

sName = Dir("c:\temp\*.txt")
Do While Len(sName) 0
Arr = Split(sName, ".")
If UBound(Arr) = 1 Then
sNewName = Arr(0) & "XXX.txt"
' Change this obviously!
On Error GoTo NameAlreadyExists
Name sName As sNewName
On Error GoTo 0
End If
RestartPoint:
sName = Dir()
Loop
Exit Sub

NameAlreadyExists:
MsgBox "Cannot rename '" & sName & "' as '" & sNewName & "' already
exists"
Resume RestartPoint
End Sub

Obviously change the filter on the initial Dir call and the renaming
rules!

HTH

Peter Beach

"Dominique Feteau" wrote in message
...
I have a bunch of files that I get scanned and returned to me with
generic
names. I need these files renamed according to the name of the client
in
each file. What I do is go through each file, before they get scanned,
and
type out the name of each client from each file. I also get a list (in
text
form) of each scanned file inserted into the excel sheet for parity.

Is there a macro that will search for the scanned file in the
appropriate
folder according to the list in excel and rename it to client name that
I
want to change it to?

I know this is long winded but what i'm looking for a way to rename a
ton
of
files as easy and as quickly as possible.

Any help would be appreciated.

Niq