KutoolsforOffice — Un'unica soluzione, cinque potenti strumenti.Ottenere di più con meno sforzo.

Come contare il numero di picchi in una colonna di dati in Excel?

AutoreSiluvia Data di modifica
dati di esempio

Supponiamo che nel foglio di lavoro siano presenti due colonne di dati, come mostrato nello screenshot a sinistra: in che modo è possibile contare il numero di picchi nella colonna B? Un valore di cella (ad esempio B3) può essere considerato un picco se è contemporaneamente maggiore sia del valore della cella precedente (B2) sia di quello della cella successiva (B4). In caso contrario, non soddisfa i criteri per essere definito un picco. Questo articolo spiega come identificare, elencare e contare tutti i picchi presenti in una colonna di dati in Excel.

Contare il numero di picchi in una colonna di dati in Excel

Contrassegnare tutti i picchi in un Grafico a dispersione


Contare il numero di picchi in una colonna di dati in Excel

La seguente formula ti permette di contare direttamente in Excel il numero di picchi presenti in una colonna di dati.

1. Seleziona una cella vuota per inserire il risultato, digita la formula =SOMMA.PRODOTTO(--(B3:B17>B2:B16);--(B3:B17>B4:B18)) nella Barra delle formule, quindi premi Invio. Guarda lo screenshot:

applica una formula per contare il numero di picchi in una colonna

Nota: Nella formula, B3:B17 corrisponde all’intervallo che va dalla terza cella (inclusa la cella di intestazione) fino alla penultima riga dell’elenco; B2:B16 indica l’intervallo dalla seconda cella (inclusa la cella di intestazione) fino alla terzultima riga; infine, B4:B18 rappresenta l’intervallo dalla quarta cella (inclusa la cella di intestazione) fino all’ultima riga dell’elenco. Adatta questi intervalli alle tue esigenze.

uno screenshot di kutools for excel ai

Sblocca la magia di Excel con KUTOOLS AI

  • Esecuzione intelligente: Esegui operazioni sulle celle, analizza i dati e crea grafici, il tutto con comandi semplici e intuitivi.
  • Formule personalizzate: crea formule su misura per ottimizzare i tuoi flussi di lavoro.
  • Codifica VBA: Scrivi e implementa codice VBA in modo semplice e immediato.
  • Interpretazione delle formule: Comprendi con facilità anche le formule più complesse.
  • Traduzione del testo: Superate le barriere linguistiche direttamente nei vostri fogli di calcolo.
Potenzia le tue capacità in Excel con strumenti basati sull’intelligenza artificiale.Scarica orae scopri un’efficienza mai provata prima!

Contrassegnare tutti i picchi in un Grafico a dispersione

In alternativa, è possibile individuare facilmente i picchi di una colonna creando un grafico a dispersione e contrassegnandoli direttamente sul grafico. Procedere come segue.

1. Seleziona la cella C3, adiacente alla cella B3 (il secondo valore dell'elenco, esclusa l'intestazione), inserisci la formula =IF(AND(B3>B2,B3>B4), «Peak»,«») nella Barra delle formule e premi il tasto Invio. Trascina quindi il quadratino di riempimento verso il basso per contrassegnare tutti i picchi, come mostrato nello screenshot seguente.

inserisci una formula per ottenere tutti i picchi

2. Seleziona le colonne X e Y, quindi fai clic su Inserisci > Inserisci dispersione (X, Y) o grafico a bolle > Dispersione con linee orizzontali e marcatori per inserire un grafico a dispersione nel foglio di lavoro. Vedi lo screenshot:

inserisci un grafico a dispersione

3. Premere i tasti Alt+F11 per aprire la finestra di Microsoft Visual Basic, Applications.

4. Nella finestra di Microsoft Visual Basic, Applications, fai clic su Inserisci > Modulo. Copia quindi il codice VBA seguente e incollalo nella finestra del codice.

Codice VBA: Contrassegnare tutti i picchi in un Grafico a dispersione

Sub CustomLabels()
    Dim xCount As Long, I As Long
    Dim xRg As Range, xCell As Range
    Dim xChar As ChartObject
    Dim xCharPoint As Point
    On Error Resume Next
    Set xRg = Range("C1")
    Set xChar = ActiveSheet.ChartObjects("Chart 1")
    If xChar Is Nothing Then Exit Sub
    xChar.Activate
    xCount = ActiveChart.SeriesCollection(1).Points.Count
    For I = 1 To xCount
        Set xCell = xRg(1).Offset(I, 0)
        If xCell.Value <> "" Then
            Set xCharPoint = ActiveChart.SeriesCollection(1).Points(I)
            xCharPoint.ApplyDataLabels
            xCharPoint.DataLabel.Text = xCell.Value
            xCharPoint.DataLabel.Left = xCharPoint.DataLabel.Left - 15
            xCharPoint.DataLabel.Top = xCharPoint.DataLabel.Top - 7
        End If
    Next
End Sub

Nota: Nel codice, «Grafico 1» è il nome del grafico a dispersione creato e «C1» è la prima cella della colonna di supporto contenente i risultati della formula applicata al passaggio 1. Modifica questi valori in base alle tue esigenze.

5. Premere il tasto F5 per eseguire il codice. Tutti i picchi verranno contrassegnati nel grafico a dispersione, come mostrato nello screenshot seguente:

esegui il codice VBA per visualizzare tutti i picchi contrassegnati sul grafico a dispersione

Migliori Strumenti per la Produttività in Office

🤖KUTOOLS AI Assistente: Rivoluziona Analisi dei dati in base a:Esecuzione Intelligente   |  Genera Codice|  Crea formule personalizzate  |  Analizza Dati e Genera Grafici|  Richiama Funzioni avanzate
Funzionalità Popolari:Trova, Evidenzia o Contrassegna Duplicati   |  Elimina righe vuote   |  Combinare Colonne o Celle senza Perdere Dati   |   Arrotondamento senza usare la formula...
Super RICERCA.VERT:VLookup con Criteri Multipli  |  VLookup con Valori Multipli  |   VLookup tra Fogli Multipli   |   Corrispondenza approssimativa....
Elenco a discesa avanzato:Crea Rapidamente un Elenco a Discesa   |  Elenco a Discesa Dipendente   |  Elenco a Discesa con Selezione Multipla....
Gestione Colonne:Aggiungi un Numero Specifico di Colonne|Sposta Colonne|Attiva/Disattiva lo Stato di Visibilità delle Colonne Nascoste|Confronta Intervalli e Colonne...
Funzionalità in Evidenza:Attenzione della griglia   |  Visualizzazione Design   |Barra delle formule avanzata   | Gestione Cartelle di Lavoro e Fogli   |  Biblioteca di risorse(Testo Automatico)|  Selettore di Date   |  Unisci fogli di lavoro  |  Crittografa/Decrittografa celle   | Invia Email da Lista   |  Super Filtri   |   Filtro speciale(Filtra celle con testo in grassetto/corsivo/barrato...) ...
Principali Set di Strumenti 15:12 Strumentiper il Testo(Aggiungi testo,Elimina Caratteri Specifici, ...)|   50+Tipidi Grafico(Diagramma di Gantt, ...)|   40+ Formule Pratiche(Calcola l'età in base alla data di nascita, ...)|   19 Strumentidi Inserimento(Inserisci Codice QR,Inserisci Immagine dal Percorso, ...)|   12 Strumentidi Conversione(Converti in parole,Conversione del tasso di cambio, ...)|   7 StrumentiUnisci e Dividi(Unione avanzata righe,Dividi celle, ...)|... e molto altro
Usa Kutools nella tua lingua preferita – supporta inglese, spagnolo, tedesco, francese, cinese e 40+ altre!

Potenzia le tue competenze in Excel con Kutools per Excel e sperimenta un’efficienza mai vista prima.Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e Risparmia tempo.Clicca qui per ottenere la funzionalità di cui hai più bisogno...


Office Tab Porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice

  • Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Apri e crea più documenti in nuove schede all’interno della stessa finestra, invece che in finestre separate.
  • Aumenta la tua produttività del 50 % e risparmia centinaia di clic del mouse ogni giorno!

Tutti i componenti aggiuntivi di Kutools in un unico programma di installazione.

Kutools for Office è la suite che include componenti aggiuntivi per Excel, Word, Outlook e PowerPoint, oltre a Office Tab Pro: la soluzione ideale per i team che lavorano su diverse app di Office.

ExcelWordOutlookTabsPowerPoint
  • Suite completa— componenti aggiuntivi per Excel, Word, Outlook e PowerPoint + Office Tab Pro
  • Un unico programma di installazione, una sola licenza— configurazione in pochi minuti (pronto per MSI)
  • Funziona meglio insieme— produttività ottimizzata tra le app di Office
  • Prova gratuita di 30 giorni con tutte le funzionalità— nessuna registrazione, nessuna carta di credito
  • Miglior rapporto qualità-prezzo— risparmia rispetto all’acquisto dei singoli componenti aggiuntivi