Hi @AlbertML ,
By using Run VBScript Action in PAD we can perform this.
Steps:
Open Run VBscript action in PAD and Copy this below code there and check.
Code:
Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = True ' Set to True to see the Excel window (optional)
Set objWorkbook = objExcel.Workbooks.Open("Path/To/Your/Workbook.xlsx") ' Replace with your file path
Set sortRange = objWorkbook.Worksheets("Sheet1").Range("A:A") ' Replace "A:A" with your column range (e.g., "B:B")
sortRange.Sort key:=sortRange, SortOn:=xlSortValues, Order:=xlAscending "if for descending use this Order:=xlDescending
objWorkbook.Close SaveChanges:=False ' Set to True to save changes
objExcel.Quit
Note: If it works mark it as a solution,