| | Post: 1 | Registrato il: 16/02/2021
| Età: 44 | Utente Junior | Excel 2016 | | OFFLINE | |
|
17/02/2021 09:50 | |
Buongiorno a tutti.
Avrei bisogno di un codice (o macro) per ordinare in ordine decrescente i tre dati che si sono su ogni riga sotto le colonne D E F. Sul mio file di esempio alla riga 2 ci sono i tre dati:100 300 200: io vorrei che questi dati (e quelli di ogni altra riga ) si ordinino automaticamente dal piu' grande al piu' piccolo cosi: 300 200 100. Avrei anche la necessità che ogni volta che si varia un valore venga lanciata automaticamente il codice o la macro.
Spero di essere stato chiaro.
Grazie a chi mi riponderà. [Modificato da Alex Msk789 17/02/2021 09:59] |
|
| | Post: 3.092 | Registrato il: 06/04/2013
| Utente Master | 2010 | | OFFLINE |
|
17/02/2021 11:02 | |
ciao
perchè non attivi il registratore di macro ??
saluti
Domenico
Win 10 - Excel 2016 |
| | Post: 1.091 | Registrato il: 16/08/2015
| Città: CORDENONS | Età: 67 | Utente Veteran | Excel 2016-32bit Win11 | | OFFLINE |
|
17/02/2021 11:02 | |
Usa questa mia macro da mettere nel modulo vbe del foglio interessato dato che sfrutta l'evento WorkSheet_Change: Option Explicit
Sub Worksheet_Change(ByVal Target As Range)
Dim rng As Range
If Target.Rows.Count > 1 Then Exit Sub 'se abbiamo selezionato più celle esci
If Not Intersect(Target, Range("D2:F361")) Is Nothing Then 'se non siamo nelle colonne D:F esci
Set rng = Range("D" & Target.Row & ":F" & Target.Row) 'rileva l'area da riordinare
If WorksheetFunction.CountBlank(rng) > 0 Then Exit Sub 'se non abbiamo riempito tutte le 3 celle esci
rng.Sort Key1:=rng, Order1:=xlDescending, Header:=xlNo, Orientation:=xlSortRows
End If
End Sub PS. Un saluto a tutti. [Modificato da rollis13 17/02/2021 11:10]
______________________________________________________________
C'è chi fa le COSE a CASO e chi fa CASO alle COSE (Ignoto) |
| | Post: 1 | Registrato il: 16/02/2021
| Età: 44 | Utente Junior | Excel 2016 | | OFFLINE | |
|
17/02/2021 11:33 | |
Grazie rollis13 funziona alla grande !!!
|
| | Post: 1.092 | Registrato il: 16/08/2015
| Città: CORDENONS | Età: 67 | Utente Veteran | Excel 2016-32bit Win11 | | OFFLINE |
|
17/02/2021 11:36 | |
Grazie del riscontro positivo 👍.
______________________________________________________________
C'è chi fa le COSE a CASO e chi fa CASO alle COSE (Ignoto) |
| | Post: 2 | Registrato il: 16/02/2021
| Età: 44 | Utente Junior | Excel 2016 | | OFFLINE | |
|
18/03/2021 16:14 | |
La macro come già confermato funziona, ho solo un problema: se copio dei dati nelle celle la funzione non va, c'è un modo per sistemare questa cosa? |
| | Post: 1.103 | Registrato il: 16/08/2015
| Città: CORDENONS | Età: 67 | Utente Veteran | Excel 2016-32bit Win11 | | OFFLINE |
|
18/03/2021 19:11 | |
Il Copia/Incolla nelle tre colonne D-F non è un problema, funziona benissimo.
Non è che stai incollando dei numeri in formato testo e non dei valori numerici. Ti dovrebbe comparire il triangolino verde nell'angolo se lo sono (e hai la funzione 'segnala' attiva). [Modificato da rollis13 18/03/2021 19:12]
______________________________________________________________
C'è chi fa le COSE a CASO e chi fa CASO alle COSE (Ignoto) |
| | Post: 14 | Registrato il: 02/04/2018
| Città: PESCARA | Età: 75 | Utente Junior | EXCEL 2016 - SPREAD32 | | OFFLINE |
|
18/03/2021 21:54 | |
Gentile Rollis13
mi rivolgo a te perchè 2 giorni fa hai fornito all'utente AlexMSK una macro per ordinare dati numerici con una opzione particolare.
Premesso che ho Excel 2007, una competenza limitata, e direi nulla per le macro, ti chiedo se puoi fornirmi la stessa macro adattata al mio foglio di estrazioni Millionday.
A volte qui dentro sono riuscito a copiare dei codici e a farli funzionare, ma stavolta non ci sto riuscendo perchè dovunque e comunque io inserisca la macro...poi non ne ritrovo il nome nella finestra dove dovrei cliccare su "Esegui".
Le mie colonne vanno da "A" a "E" e sono un migliaio
Dove mai e come sbaglio ?
Forse il tuo codice non si adatta a Excel 2007 ?
Grazie Leo
LEO
https://t.me/LordBrum |
| | Post: 15 | Registrato il: 02/04/2018
| Città: PESCARA | Età: 75 | Utente Junior | EXCEL 2016 - SPREAD32 | | OFFLINE |
|
18/03/2021 23:50 | |
Ciao Rollis13
ritiro il quesito delle 21:54 perchè con santa pazienza e altri tentativi ho fatto funzionare la macro.
Ho solo copincollato il codice nella voce "Foglio1" ed eseguito senza pretendere di trovare il nome della macro nella finestra che presenta il bottone "Esegui" e ha fatto il suo lavoro.
Non mi sono posto altre domande.
Grazie
LEO
https://t.me/LordBrum |
|
|