L'utilizzo di macro per ordinare i dati in pi¨ colonne come una colonna in Excel

Traduzione articoli Traduzione articoli
Identificativo articolo: 247311 - Visualizza i prodotti a cui si riferisce l?articolo.
Espandi tutto | Chiudi tutto

In questa pagina

Sommario

Microsoft Excel non Ŕ un metodo incorporato per ordinare una colonna di tipo giornale (consecutive) di dati. In questo articolo viene fornita una macro di esempio per ordinare i dati in un formato di colonna tipo giornale.

Informazioni

Microsoft fornisce esempi di programmazione a scopo puramente illustrativo, senza alcuna garanzia espressa o implicita. Questo include, ma non Ŕ limitato a, le garanzie implicite di commerciabilitÓ o idoneitÓ per uno scopo specifico. Questo articolo si presuppone che conosca il linguaggio di programmazione in questione e gli strumenti utilizzati per creare ed eseguire il debug di procedure. Tecnici del supporto Microsoft possono spiegare la funzionalitÓ di una particolare procedura, ma in nessun sono caso a modificare questi esempi per fornire funzionalitÓ aggiuntive o creare procedure per soddisfare specifiche esigenze.

L'ordinamento predefinito

In Microsoft Excel, Ŕ in genere utilizzare la funzionalitÓ di ordinamento per ordinare un elenco. Un elenco in Excel Ŕ una serie di righe di foglio di lavoro che contengono dati correlati, ad esempio un database di fattura o un insieme di nomi e numeri di telefono dei client. ╚ possibile utilizzare un elenco come un database, in cui ogni riga Ŕ un record, e le colonne sono campi. La prima riga dell'elenco in genere, contiene le etichette per le colonne, ad esempio:
   A1: Q1   B1: Q2   C1: Q3
   A2: 10   B2: 2    C2: 4
   A3: 14   B3: 18   C3: 9
   A4: 7    B4: 17   C4: 12
   A5: 1    B5: 13   C5: 5
   A6: 11   B6: 8    C6: 16
   A7: 3    B7: 6    C7: 15
				
se Ŕ ordinato l'elenco in ordine crescente, da T1 il campo (colonna A), i risultati sarebbe come segue:
   A1: Q1   B1: Q2   C1: Q3
   A2: 1    B2: 13   C2: 5
   A3: 3    B3: 6    C3: 15
   A4: 7    B4: 17   C4: 12
   A5: 10   B5: 2    C5: 4
   A6: 11   B6: 8    C6: 16
   A7: 14   B7: 18   C7: 9
				

L'ordinamento di una colonna stile notiziario

Colonne e di colonne affiancate sono termini diversi per lo stesso tipo del formato dati. Nelle colonne tipo giornale, i dati inserisce una colonna e continua in cima alla colonna successiva. In questo caso, i dati probabilmente non includono etichette per ogni colonna, ad esempio:
   A1: 10   B1: 2    C1: 4
   A2: 14   B2: 18   C2: 9
   A3: 7    B3: 17   C3: 12
   A4: 1    B4: 13   C4: 5
   A5: 11   B5: 8    C5: 16
   A6: 3    B6: 6    C6: 15
				
Ŕ possibile utilizzare la macro di esempio in questo articolo per ordinare le colonne tipo giornale in ordine crescente. Se si utilizza la macro di esempio nei dati precedenti, i risultati sono i seguenti:
   A1: 1    B1: 7    C1: 13
   A2: 2    B2: 8    C2: 14
   A3: 3    B3: 9    C3: 15
   A4: 4    B4: 10   C4: 16
   A5: 5    B5: 11   C5: 17
   A6: 6    B6: 12   C6: 18
				
per visualizzare la macro di ordinamento che funziona come descritto, attenersi alla seguente procedura:
  1. Aprire una nuova cartella di lavoro.
  2. Digitare i dati di esempio riportati di seguito nel foglio di lavoro:
       A1: 10   B1: 2    C1: 4
       A2: 14   B2: 18   C2: 9
       A3: 7    B3: 17   C3: 12
       A4: 1    B4: 13   C4: 5
       A5: 11   B5: 8    C5: 16
       A6: 3    B6: 6    C6: 15
    					
  3. Scegliere macro dal menu Strumenti , quindi Visual Basic Editor .
  4. Scegliere modulo dal menu Inserisci .
  5. Digitare nel modulo il codice riportato di seguito:

    Nota Nell'esempio seguito viene illustrato come ordinare in ordine crescente. ╚ possibile modificare questa impostazione modifica del valore del "Ordine1: =" argomento xlDescending .
       Sub SortAllRangeData()
       ' Place column header for temporary sort area.
       Range("IV1").Value = "Numbers"
       
       ' Move numbers to temporary sort location.
       For Each cell In Selection
          Range("iv65536").End(xlUp).Offset(1, 0) = cell.Value
       Next cell
       
       ' Sort numbers in ascending order.
       Range("IV1", Range("IV1").End(xlDown)).Sort Key1:=Range("IV2"),  _
       Order1:=xlAscending, Header:=xlGuess, _
            OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
            
       ' Move sorted data back to original sheet location.
    
       Selection(1, 1).Activate ' Make sure the ActiveCell is the
                                ' top left of Selection first.
       CCnt = Selection.Columns.Count
       RCnt = Selection.Rows.Count
       CellCnt = Selection.Cells.Count
       Tcell = 2
       For c = 1 To CCnt
         For r = 1 To RCnt
            Range(ActiveCell.Address).Offset(r - 1, c - 1).Value =  _
            Range("iv" & Tcell).Value
            Tcell = Tcell + 1
         Next r
       Next c
       
       ' Clean up temporary sort location.
       Range("IV1", Range("IV1").End(xlDown)).Clear
    End Sub
    					
  6. Dal menu di Excel in Microsoft Excel X per Mac e nelle versioni successive di Excel per Mac o nel menu file in tutte le altre versioni di Excel, scegliere Chiudi e torna a Microsoft Excel .
  7. Selezionare A1:C6.
  8. Scegliere macro dal menu Strumenti , quindi macro . Selezionare la macro SortAllRangeData e quindi fare clic su Esegui .
Tutti i dati all'interno dell'intervallo selezionato sono ora ordinati e viene visualizzato come segue:
   A1: 1    B1: 7    C1: 13
   A2: 2    B2: 8    C2: 14
   A3: 3    B3: 9    C3: 15
   A4: 4    B4: 10   C4: 16
   A5: 5    B5: 11   C5: 17
   A6: 6    B6: 12   C6: 18
				

Riferimenti

Excel X per Mac e versioni successive

Per ulteriori informazioni su come ordinare, scegliere Guida in linea di Excel dal menu Guida , digitare l'ordinamento , fare clic su Cerca e quindi fare clic su un argomento per visualizzarlo.

Per ulteriori informazioni su come utilizzare il metodo Sort da Visual Basic Editor scegliere Visual Basic dal menu ? , digitare metodo di ordinamento , fare clic su Cerca e quindi per visualizzare l'utilizzo del metodo sort .

Excel 2001 per Mac

Per ulteriori informazioni sull'ordinamento, fare clic sull' Assistente , digitare un elenco di ordinamento , fare clic su Cerca e quindi fare clic su un argomento per visualizzarlo.

Nota Se l'Assistente Ŕ nascosto, fare clic sul pulsante Assistente di Office sulla barra degli strumenti standard .

Per ulteriori informazioni su come utilizzare il metodo Sort da Visual Basic Editor, fare clic sull' Assistente , digitare metodo di ordinamento , fare clic su Cerca e quindi per visualizzare l'utilizzo del metodo sort .

ProprietÓ

Identificativo articolo: 247311 - Ultima modifica: giovedý 25 gennaio 2007 - Revisione: 6.3
Le informazioni in questo articolo si applicano a:
  • Microsoft Excel 2000 Standard Edition
  • Microsoft Excel 2004 for Mac
  • Microsoft Excel X per Mac
  • Microsoft Excel 2001 per Mac
  • Microsoft Excel 98 per Macintosh
Chiavi:á
kbmt kbautomation kbprogramming kbhowto KB247311 KbMtit
Traduzione automatica articoli
Il presente articolo Ŕ stato tradotto tramite il software di traduzione automatica di Microsoft e non da una persona. Microsoft offre sia articoli tradotti da persone fisiche sia articoli tradotti automaticamente da un software, in modo da rendere disponibili tutti gli articoli presenti nella nostra Knowledge Base nella lingua madre dell?utente. Tuttavia, un articolo tradotto in modo automatico non Ŕ sempre perfetto. Potrebbe contenere errori di sintassi, di grammatica o di utilizzo dei vocaboli, pi¨ o meno allo stesso modo di come una persona straniera potrebbe commettere degli errori parlando una lingua che non Ŕ la sua. Microsoft non Ŕ responsabile di alcuna imprecisione, errore o danno cagionato da qualsiasi traduzione non corretta dei contenuti o dell?utilizzo degli stessi fatto dai propri clienti. Microsoft, inoltre, aggiorna frequentemente il software di traduzione automatica.
Clicca qui per visualizzare la versione originale in inglese dell?articolo: 247311
LE INFORMAZIONI CONTENUTE NELLA MICROSOFT KNOWLEDGE BASE SONO FORNITE SENZA GARANZIA DI ALCUN TIPO, IMPLICITA OD ESPLICITA, COMPRESA QUELLA RIGUARDO ALLA COMMERCIALIZZAZIONE E/O COMPATIBILITA' IN IMPIEGHI PARTICOLARI. L'UTENTE SI ASSUME L'INTERA RESPONSABILITA' PER L'UTILIZZO DI QUESTE INFORMAZIONI. IN NESSUN CASO MICROSOFT CORPORATION E I SUOI FORNITORI SI RENDONO RESPONSABILI PER DANNI DIRETTI, INDIRETTI O ACCIDENTALI CHE POSSANO PROVOCARE PERDITA DI DENARO O DI DATI, ANCHE SE MICROSOFT O I SUOI FORNITORI FOSSERO STATI AVVISATI. IL DOCUMENTO PUO' ESSERE COPIATO E DISTRIBUITO ALLE SEGUENTI CONDIZIONI: 1) IL TESTO DEVE ESSERE COPIATO INTEGRALMENTE E TUTTE LE PAGINE DEVONO ESSERE INCLUSE. 2) I PROGRAMMI SE PRESENTI, DEVONO ESSERE COPIATI SENZA MODIFICHE, 3) IL DOCUMENTO DEVE ESSERE DISTRIBUITO INTERAMENTE IN OGNI SUA PARTE. 4) IL DOCUMENTO NON PUO' ESSERE DISTRIBUITO A SCOPO DI LUCRO.

Invia suggerimenti

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com