blcktgr
13-07-2016, 23:25
Salve a tutti.
Ho una tabella in Excel 2003 con i seguenti dati
A B C D
4 Stefano D09 04.50 08.50
5 Giovanni F10 05.00 11.00
6 Luca F15 07.50 13.50
7 Mario D09 04.50 08.50
La prima cella è fissa (A4), mentre l'ultima è variabile, dipende talle persone presenti per quel giorno.
Ho la necessità di ordinare questa tabella in ordine crescente di inizio lavoro (colonna C); quindi ottenendo:
A B C D
4 Stefano D09 04.50 08.50
5 Mario D09 04.50 08.50
6 Giovanni F10 05.00 11.00
7 Luca F17 07.50 13.50
Io ho usato il seguente codice VBA:
rft = "A4"
rls = "E" & Mid(Str((k - 1)), 2, 2)
rcl = rft & ":" & rls ' corrisponde a "A4:E40"
ActiveSheet.Range(rcl).Select
Selection.Sort Key1:=Range("B4"), Order1:=xlAscending, Header:=xlNo, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
ma quando eseguo la routine mi da errore:
Error di run-time '1004'
Riferimento di ordinamento non valido. Assicurarsi che sia compreso nei dati da ordinare e che la prima casella Ordina per non sia identica o vuota
Non riesco ad uscirne fuori....... Qualcuno può aiutarmi???????
Ho una tabella in Excel 2003 con i seguenti dati
A B C D
4 Stefano D09 04.50 08.50
5 Giovanni F10 05.00 11.00
6 Luca F15 07.50 13.50
7 Mario D09 04.50 08.50
La prima cella è fissa (A4), mentre l'ultima è variabile, dipende talle persone presenti per quel giorno.
Ho la necessità di ordinare questa tabella in ordine crescente di inizio lavoro (colonna C); quindi ottenendo:
A B C D
4 Stefano D09 04.50 08.50
5 Mario D09 04.50 08.50
6 Giovanni F10 05.00 11.00
7 Luca F17 07.50 13.50
Io ho usato il seguente codice VBA:
rft = "A4"
rls = "E" & Mid(Str((k - 1)), 2, 2)
rcl = rft & ":" & rls ' corrisponde a "A4:E40"
ActiveSheet.Range(rcl).Select
Selection.Sort Key1:=Range("B4"), Order1:=xlAscending, Header:=xlNo, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
ma quando eseguo la routine mi da errore:
Error di run-time '1004'
Riferimento di ordinamento non valido. Assicurarsi che sia compreso nei dati da ordinare e che la prima casella Ordina per non sia identica o vuota
Non riesco ad uscirne fuori....... Qualcuno può aiutarmi???????