Macro moving a directory with XP
 

Hi

The following macro takes files that are in one directory ("C:\Fishbowl\Req_Serv\one"), and puts them in a newly created directory "C:\Fishbowl\Solved_Service_Cases\one" ("C:\Fishbowl\Solved_Service_Cases\ - already exists). This works in Excel 2000 running on 98, but does not work in Excel 2000 running on XP

In 98, this creates a new subdir named "one" under "Solved_Service_Cases" and MOVES everything from the first directory into it

(Before running this macro, there is a dir called "one" in the "oldname" directory but not in the NewName directory.
I have heard that XP will not create a new diredtory this way

Can anyone tell me how I can make a new subdirectory, and MOVE (not just save as) the contents of another directory into it using XP


Thank you very muc

Sub xp98(

Dim OldName As Strin
Dim NewName As Strin
Dim myfolder As Strin

With ThisWorkboo
myfolder = ("one"

OldName = "C:\Fishbowl\Req_Serv\" & myfolde
NewName = "C:\Fishbowl\Solved_Service_Cases\" & myfolde
Name OldName As NewNam

End Wit

End Su