diogodasilva
New Member
- Joined
- Feb 17, 2022
- Messages
- 7
- Office Version
- 365
- Platform
- Windows
- MacOS
With the help of @Fluff who finessed the code to update column 9 with a timestamp if any columns (1 to 17, except 9) is edited. and second part of the code reorganizes descending based on the timestamp (column 9).
Now I am trying to implement auto sort column 9 (descending) automatically upon update but it is beyond my knowledge . So the table reorganizes by last update automatically.
Thanks in advance
VBA Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.CountLarge > 1 Then Exit Sub
Select Case Target.Column
Case 1 To 8, 10 To 17
Range("I" & Target.Row).Value = Format(Now, "dd-mm-yyyy hh:mm:ss")
End Select
End Sub
Now I am trying to implement auto sort column 9 (descending) automatically upon update but it is beyond my knowledge . So the table reorganizes by last update automatically.
Thanks in advance