This macro using DIR and NAME will move and/or rename your files without doing anything else. Modify to suit
Sub MoveFilesToNewFolder() Application.ScreenUpdating = False Dim FN As String Dim FileLocation As String FileLocation = "c:\oldfolder\*.xl*" FN = Dir(FileLocation) Do Until FN = "" Dim OldName, newname OldName = "C:\oldfolder\" & FN: newname = "C:\newfolder\" & FN Name OldName As newname ' Move and rename file. FN = Dir Loop Application.ScreenUpdating = True End Sub Don Guillett SalesAid Software dguille...@gmail.com From: PrIyAnKa Sent: Friday, February 17, 2012 4:38 AM To: excel-macros@googlegroups.com Subject: Re: $$Excel-Macros$$ Deletion of files on specific path Dear Noorain I want to move only .xls files not the root folder also with it On Fri, Feb 17, 2012 at 3:39 PM, NOORAIN ANSARI <noorain.ans...@gmail.com> wrote: Hi Priyanka, by using this macro you can move source folder with subfolder to change sfol = "c:\MyFolder" path. On Fri, Feb 17, 2012 at 3:04 PM, PrIyAnKa <p.dhamsa...@gmail.com> wrote: Dear Noorain I have files in different sub folders... as per below macro i may need to set number of sfol path ... sfol = "c:\MyFolder" ' change to match the source folder path Kindly suggest if i m wrong... On Fri, Feb 17, 2012 at 12:55 PM, NOORAIN ANSARI <noorain.ans...@gmail.com> wrote: Hi Priyanka, Please try it.. Sub CopyFilesFolder2Folder() Dim fso Dim sfol As String, dfol As String sfol = "c:\MyFolder" ' change to match the source folder path dfol = "e:\MyFolder" ' change to match the destination folder path Set fso = CreateObject("Scripting.FileSystemObject") On Error Resume Next If Not fso.FolderExists(sfol) Then MsgBox sfol & " is not a valid folder/path.", vbInformation, "Invalid Source" ElseIf Not fso.FolderExists(dfol) Then MsgBox dfol & " is not a valid folder/path.", vbInformation, "Invalid Destination" Else fso.CopyFile (sfol & "\*.*"), dfol ' Change "\*.*" to "\*.xls" to move Excel Files only End If If Err.Number = 53 Then MsgBox "File not found" End Sub On Fri, Feb 17, 2012 at 12:44 PM, PrIyAnKa <p.dhamsa...@gmail.com> wrote: ok Thanks viper for the help.. it works perfectly. need one of your favor also ,if i need to move the files from one drive to another drive then how it could be possible? I have tried the below one CLS C: CD move /-y "C:\Documents and Settings\Administrator\Desktop\sample\*sample.xlsx" "D:\New folder\" pause On Thu, Feb 16, 2012 at 6:10 PM, The Viper <viper....@gmail.com> wrote: if your file name is exactly sample.xlsx then use C: CD "C:\Documents and Settings\priyanka\desktop\sample" DEL /q /s /f "sample.xlsx" On Thu, Feb 16, 2012 at 6:07 PM, The Viper <viper....@gmail.com> wrote: is "C:\Documents and Settings\priyanka\desktop\sample" the right path of your master folder? if not, change the path first and then file name On Thu, Feb 16, 2012 at 6:02 PM, PrIyAnKa <p.dhamsa...@gmail.com> wrote: What i need to change in it? only file name Only red highlighted words need to change ? CLS C: CD "C:\Documents and Settings\priyanka\desktop\sample" DEL /q /s /f "sample.xlsx" change the path and you can use the wildcards like below DEL /q /s /f "*sample.xlsx" or DEL /q /s /f "sample*.xlsx" On Thu, Feb 16, 2012 at 5:58 PM, The Viper <viper....@gmail.com> wrote: paste the below code in notepad and save it with .bat extension and run CLS C: CD "C:\Documents and Settings\priyanka\desktop\sample" DEL /q /s /f "sample.xlsx" change the path and you can use the wildcards like below DEL /q /s /f "*sample.xlsx" or DEL /q /s /f "sample*.xlsx" On Thu, Feb 16, 2012 at 5:38 PM, PrIyAnKa <p.dhamsa...@gmail.com> wrote: Dear Laxman Will it delete folder? or excel file from folders? and i have 239 folders and in all those folders there is a file,i want to delete that file Dear All Can we have a macro which go through sub folders and delete any specific excel file, without giving each 239 folders path On Thu, Feb 16, 2012 at 4:33 PM, Lakshman Prasad <lakshman...@yahoo.com> wrote: Dear PrIyANkA tyr this Sub Delete_Folders_FS() objFolder = "D:\Documents and Settings\lakshman-\Desktop\New Folder\*.*" Set objFSO = CreateObject("Scripting.FileSystemObject") objFSO.deletefolder objFolder End Sub LAKSHMAN From: PrIyAnKa <p.dhamsa...@gmail.com> To: excel-macros@googlegroups.com Sent: Thursday, 16 February 2012 2:46 PM Subject: $$Excel-Macros$$ Deletion of files on specific path Dear Team I have a folder named "ABC" on desktop, in that ABC folder i have about 239 sub folders and in that folders there is a file named".........(Folder Name) Performance file .. I want to delete all those files with one macro click. Example : main folder ABC - Sub Folders : Ahmedabad ,Bharuch, Baroda files in those sub folders : Ahmedabad Performance, Bharuch Performance, Baroda Perfromance i want to delete red highlighted files with macro , if there is any other way except then macro like BAT file or any kindly let me know Regards PrIyANkA -- FORUM RULES (986+ members already BANNED for violation) 1) Use concise, accurate thread titles. Poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get quick attention or may not be answered. 2) Don't post a question in the thread of another member. 3) Don't post questions regarding breaking or bypassing any security measure. 4) Acknowledge the responses you receive, good or bad. 5) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. NOTE : Don't ever post personal or confidential data in a workbook. Forum owners and members are not responsible for any loss. ------------------------------------------------------------------------------------------------------ To post to this group, send email to excel-macros@googlegroups.com -- FORUM RULES (986+ members already BANNED for violation) 1) Use concise, accurate thread titles. Poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get quick attention or may not be answered. 2) Don't post a question in the thread of another member. 3) Don't post questions regarding breaking or bypassing any security measure. 4) Acknowledge the responses you receive, good or bad. 5) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. NOTE : Don't ever post personal or confidential data in a workbook. Forum owners and members are not responsible for any loss. ------------------------------------------------------------------------------------------------------ To post to this group, send email to excel-macros@googlegroups.com -- FORUM RULES (986+ members already BANNED for violation) 1) Use concise, accurate thread titles. Poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get quick attention or may not be answered. 2) Don't post a question in the thread of another member. 3) Don't post questions regarding breaking or bypassing any security measure. 4) Acknowledge the responses you receive, good or bad. 5) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. NOTE : Don't ever post personal or confidential data in a workbook. Forum owners and members are not responsible for any loss. ------------------------------------------------------------------------------------------------------ To post to this group, send email to excel-macros@googlegroups.com -- Great day, viper -- FORUM RULES (986+ members already BANNED for violation) 1) Use concise, accurate thread titles. Poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get quick attention or may not be answered. 2) Don't post a question in the thread of another member. 3) Don't post questions regarding breaking or bypassing any security measure. 4) Acknowledge the responses you receive, good or bad. 5) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. NOTE : Don't ever post personal or confidential data in a workbook. Forum owners and members are not responsible for any loss. ------------------------------------------------------------------------------------------------------ To post to this group, send email to excel-macros@googlegroups.com -- FORUM RULES (986+ members already BANNED for violation) 1) Use concise, accurate thread titles. Poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get quick attention or may not be answered. 2) Don't post a question in the thread of another member. 3) Don't post questions regarding breaking or bypassing any security measure. 4) Acknowledge the responses you receive, good or bad. 5) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. NOTE : Don't ever post personal or confidential data in a workbook. Forum owners and members are not responsible for any loss. ------------------------------------------------------------------------------------------------------ To post to this group, send email to excel-macros@googlegroups.com -- Great day, viper -- Great day, viper -- FORUM RULES (986+ members already BANNED for violation) 1) Use concise, accurate thread titles. Poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get quick attention or may not be answered. 2) Don't post a question in the thread of another member. 3) Don't post questions regarding breaking or bypassing any security measure. 4) Acknowledge the responses you receive, good or bad. 5) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. NOTE : Don't ever post personal or confidential data in a workbook. Forum owners and members are not responsible for any loss. ------------------------------------------------------------------------------------------------------ To post to this group, send email to excel-macros@googlegroups.com -- FORUM RULES (986+ members already BANNED for violation) 1) Use concise, accurate thread titles. Poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get quick attention or may not be answered. 2) Don't post a question in the thread of another member. 3) Don't post questions regarding breaking or bypassing any security measure. 4) Acknowledge the responses you receive, good or bad. 5) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. NOTE : Don't ever post personal or confidential data in a workbook. Forum owners and members are not responsible for any loss. ------------------------------------------------------------------------------------------------------ To post to this group, send email to excel-macros@googlegroups.com -- Thanks & regards, Noorain Ansari http://noorainansari.com/ http://excelmacroworld.blogspot.com/ -- FORUM RULES (986+ members already BANNED for violation) 1) Use concise, accurate thread titles. Poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get quick attention or may not be answered. 2) Don't post a question in the thread of another member. 3) Don't post questions regarding breaking or bypassing any security measure. 4) Acknowledge the responses you receive, good or bad. 5) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. NOTE : Don't ever post personal or confidential data in a workbook. Forum owners and members are not responsible for any loss. ------------------------------------------------------------------------------------------------------ To post to this group, send email to excel-macros@googlegroups.com -- FORUM RULES (986+ members already BANNED for violation) 1) Use concise, accurate thread titles. Poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get quick attention or may not be answered. 2) Don't post a question in the thread of another member. 3) Don't post questions regarding breaking or bypassing any security measure. 4) Acknowledge the responses you receive, good or bad. 5) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. NOTE : Don't ever post personal or confidential data in a workbook. Forum owners and members are not responsible for any loss. ------------------------------------------------------------------------------------------------------ To post to this group, send email to excel-macros@googlegroups.com -- Thanks & regards, Noorain Ansari http://noorainansari.com/ http://excelmacroworld.blogspot.com/ -- FORUM RULES (986+ members already BANNED for violation) 1) Use concise, accurate thread titles. Poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get quick attention or may not be answered. 2) Don't post a question in the thread of another member. 3) Don't post questions regarding breaking or bypassing any security measure. 4) Acknowledge the responses you receive, good or bad. 5) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. NOTE : Don't ever post personal or confidential data in a workbook. Forum owners and members are not responsible for any loss. ------------------------------------------------------------------------------------------------------ To post to this group, send email to excel-macros@googlegroups.com -- FORUM RULES (986+ members already BANNED for violation) 1) Use concise, accurate thread titles. Poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get quick attention or may not be answered. 2) Don't post a question in the thread of another member. 3) Don't post questions regarding breaking or bypassing any security measure. 4) Acknowledge the responses you receive, good or bad. 5) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. NOTE : Don't ever post personal or confidential data in a workbook. Forum owners and members are not responsible for any loss. ------------------------------------------------------------------------------------------------------ To post to this group, send email to excel-macros@googlegroups.com -- FORUM RULES (986+ members already BANNED for violation) 1) Use concise, accurate thread titles. Poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get quick attention or may not be answered. 2) Don't post a question in the thread of another member. 3) Don't post questions regarding breaking or bypassing any security measure. 4) Acknowledge the responses you receive, good or bad. 5) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. NOTE : Don't ever post personal or confidential data in a workbook. Forum owners and members are not responsible for any loss. ------------------------------------------------------------------------------------------------------ To post to this group, send email to excel-macros@googlegroups.com