Can anyone advise on macros for pc rather than excel

[tweacle]

Ladies and Gents

First of all apologies if in wrong forum but donno if anyone can help.


I know you can do macros for Excel and Word but can you do macros that run on the PC?

I’m trying to get the PC to open “S:\CCTV Downloads\Downloads” and then sort the subfolders into date order. After that I want it to look for subfolders that had date created over 30 days ago and if so I need them deleted.

Is that possible?

 

[Special-K99]

Sorting is irrelevant.

If you have folders that are over 30 days ago the folder simply needs deleting, sorting is not required.
You only need sorting if you want to display the remaining folders once the other folders have been deleted.
Sorting folders you are about to delete is inefficient.

Google batch files / MS-DOS commands

 

[wideboydixon]

You could do this in Excel VBA:

Public Sub DeleteOldFolders()

Const MyParentFolder = "S:\CCTV Downloads\Downloads"

Dim fso As Object
Dim parentFolder As Object
Dim subFolder As Object

Set fso = CreateObject("Scripting.FileSystemObject")
Set parentFolder = fso.GetFolder(MyParentFolder)

For Each subFolder In parentFolder.SubFolders
    If subFolder.DateCreated < Date - 30 Then
        subFolder.Delete True
    End If
Next subFolder

End Sub

WBD