ordinare date
Questa è la mia macro (purtroppo non mi fa caricare il foglio excel)
L'unica che sono riuscito a far funzionare...
Vorrei che tutta la riga dalla 4 alla 24 andasse in cima non solo la B4:B24 ma non riesco a fare una sintassi giusta.
Inoltre sempre per gli stessi motivi non riesco ad applicare la stessa regola al foglio 2 ("2°PIANO").
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Worksheets("1°PIANO").Range("B4:B24").Sort Key1:=Range("B4"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End Sub