Your question, your audience. Choose who sees your identity—and your question—with question security.
Dim MyOldpath As String, MyNewpath As String, MyName As String MyOldpath = "c:\test\"' ' Set the path MyNewpath = "c:\test\test\" ' The new path MyName = Dir(MyOldpath, vbNormal) ' Retrieve the first entry. Do While MyName <> "" ' Start the loop. Name MyOldpath & MyName As MyNewpath & MyName ' This moves the files from MyOldPath to MyNewPath MyName = Dir ' Get next entry. Loop
Join the community of 500,000 technology professionals and ask your questions.