Pagina precedente | 1 | Pagina successiva
Vota | Stampa | Notifica email    
Autore

Ordinamento righe automatico

Ultimo Aggiornamento: 18/03/2021 19:11
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
Vota: 15MediaObject5,0019 1
Amministra Discussione: | Chiudi | Sposta | Cancella | Modifica | Notifica email Pagina precedente | 1 | Pagina successiva
Nuova Discussione
 | 
Rispondi
Cerca nel forum
Tag discussione
Discussioni Simili   [vedi tutte]
Ordinamento Automatico cartella di lavoro (3 messaggi, agg.: 31/08/2018 12:26)
Feed | Forum | Bacheca | Album | Utenti | Cerca | Login | Registrati | Amministra
Tutti gli orari sono GMT+01:00. Adesso sono le 08:47. Versione: Stampabile | Mobile | Regolamento | Privacy
FreeForumZone [v.6.1] - Copyright © 2000-2024 FFZ srl - www.freeforumzone.com