P
Peter
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
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