ordinamento crescente

Question

Salve,

vorrei chiedere se è possibile ottenere simultaneamente l'ordinamento crescente in ciascuna delle righe ricomprese nell'intervallo, a titolo di esempio, A5:H24 ?

Sarebbe risolutiva anche una funzione da poter poi trascinare.

Io ho provato con DATI > ordina A Z ma non funziona.

Ringrazio per l'interessamento.

Answer 1

Ciao Andrea, ciao Marco,

Si dice da noi Ci sono molti modi per scuoiare un gatto

Un modo molto più vicino all'approccio suggerito da Marco sarebbe:

• Alt+F11 per aprire l'editor di VBA
• Alt+IM per inserire un nuovo modulo di codice
• Nel nuovo modulo vuoto, incolla il seguente codice:

'========>>

Option Explicit

'-----------

Public Sub Ordina_Righe()

Dim Rng As Range, aRng As Range, rRow As Range 

On Error Resume Next 

Set aRng = Application.InputBox(Prompt:="Seleziona la prima riga da ordinare", Title:="SELEZIONA CELLA", Type:=8) 

On Error GoTo 0 

If aRng Is Nothing Then 

    Call MsgBox(Prompt:="Non hai selezionato una cella", Buttons:=vbCritical, Title:="PROBLEMA!") 

    Exit Sub 

End If 

On Error GoTo XIT 

Application.ScreenUpdating = False 

With aRng.Parent 

    Set Rng = aRng.CurrentRegion 

    For Each rRow In Rng.Rows 

        With .Sort.SortFields 

            .Clear 

            .Add2 Key:=rRow \_ 

                , SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal 

        End With 

        With .Sort 

            .SetRange rRow 

            .Header = xlGuess 

            .MatchCase = False 

            .Orientation = xlLeftToRight 

            .SortMethod = xlPinYin 

            .Apply 

        End With 

    Next rRow 

End With 

XIT:

Application.ScreenUpdating = True 

End Sub

'<<========

• Alt+Q per chiudere l'editor di VBA e tornare a Excel.
• Salva il file con l'estensione xlsm
• Alt+F8 per aprire la finestra di gestione delle macro
• Seleziona Ordina_Righe
• Esegui

Potreste scaricare il mio file di prova Andrea2_520230710.xlsm

Andrea

Segui le istruzioni sopra e vedrai che non c'è bisogno di spaventarsi perché, come il codice, il funzionamento è molto semplice ! 😊

===

Regards,

Norman

Answer 2

ciao

in questo caso ti pregheri mettere un file esempio senza dati sensibili

usa dropbox o similari

Gianfranco, ti ringrazio tanto per l'interessamento...credimi, ti sono davvero grato ma la mia elementare conoscenza informatica mi sconsiglia di avventurarmi in programmi che non ho e che non conosco, saprei solo fare casini. E poi, in definitiva, cosa ti mostrerei?: un intervallo di righe e colonne con dentro numeri a casaccio da mettere in ordine crescente...tutto sommato una banalità. La complicazione sta solo nel fatto che uno vorrebbe mettere in ordine tutte le righe con un solo comando. La cosa strana è che in passato mi sembra di aver risolto una analoga questione senza problemi. Che dire, Gianfranco...farò un po' di prove affidandomi, sostanzialmente, ad una botta di cosìdetto.

Però, davvero...grazie ancora. Un saluto.

Answer 3

ciao

in questo caso ti pregheri mettere un file esempio senza dati sensibili

usa dropbox o similari

Answer 4

ciao

se ho capito

HOME

ORDINA E FILTRA

FILTRO DALLA A alla Z

e ti chiede se vuoi espandere la selezione

Ti ringrazio per il suggerimento. In effetti lo avevo già provato ma, anche espandendo alla selezione, non funziona. Tra l'altro ho riprovato proprio adesso e non mi mette in ordine nemmeno la prima riga e nemmeno mi chiede se voglio espandere...boooh . Mi correggo: non mi chiedeva se volevo espandere perché avevo selezionato l'intero intervallo. Ho riprovato selezionando solo la prima riga e mi ha chiesto se volevo espandere...ho accettato ma non è successo niente, nemmeno la prima riga. Ho provato senza espandere, stesso risultato: nemmeno la prima riga....ariboooh

Infine, se da Opzioni > da sinistra a destra mette in ordine solo la riga che selezioni...e non trovo come posso espandere la selezione a tutte le righe

Answer 5

ciao

se ho capito

HOME

ORDINA E FILTRA

FILTRO DALLA A alla Z

e ti chiede se vuoi espandere la selezione