Replace

If file.Type Like "*Excel*Worksheet" Then

with

If file.Type Like "*Word*Document" Then


--
---
HTH

Bob

(change the xxxx to gmail if mailing direct)


"Dileep Chandran" wrote in message
ups.com...
Hi Bob,

This is not working for me. I have to open all word files (.doc) in a
directory (C:\test), do a particular function, and close it and open
the next file.

Any idea how to do it? Is my question clear?

-Dileep