Ugrás a tartalomra

Hogyan lehet megszámolni az Excel oszlopában lévő csúcsok számát?

Tegyük fel, hogy két oszlopnyi adat található a munkalapon, a bal oldali képernyőképen látható módon, hogyan lehet megszámolni a B oszlop csúcsainak számát? Valójában meg lehet ítélni egy cellaértéket (például B3) csúcsként, ha egyszerre nagyobb, mint B2 és B4. Egyébként nem csúcs, ha nem felel meg ennek a két kritériumnak. Ez a cikk az Excel összes oszlopában található összes csúcs felsorolásáról és megszámlálásáról szól.

Számolja meg az Excel oszlopában található csúcsok számát

Jelölje meg az összes csúcsot egy szóródiagramon


Számolja meg az Excel oszlopában található csúcsok számát

A következő képlet segíthet abban, hogy közvetlenül az Excelben megszámoljon egy csúcsot egy adatoszlopban.

1. Válasszon egy üres cellát az eredmény elhelyezéséhez, írja be a képletet =SUMPRODUCT(--(B3:B17>B2:B16),--(B3:B17>B4:B18)) be a Formula Bar, majd nyomja meg az gombot belép kulcs. Lásd a képernyőképet:

Megjegyzések: A képletben B3: B17 a tartomány a harmadik cellától (a fejléc cellával együtt) a lista második utolsóig, a B2: B16 a tartomány a második cellától (a fejléc celláját is beleértve) az utolsó előtti celláig lista, végül B4: B18 a tartomány hatóköre a negyedik cellától (a fejléc cellával együtt) a lista utolsóig. Kérjük, változtassa meg őket szükség szerint.


Jelölje meg az összes csúcsot egy szóródiagramon

Ezenkívül könnyen kitalálhatja az oszlop csúcsait, ha létrehoz egy szóródiagramot, és megjelöli az összes csúcsot a diagramon. Kérjük, tegye a következőket.

1. Válassza ki a C3 cellát, amely szomszédos a B3 cellával (a lista második cellájának értéke a fejléc nélkül), írja be a képletet = IF (ÉS (B3> B2, B3> B4), "csúcs", "") be a Formula Bar és nyomja meg a gombot belép kulcs. Ezután húzza lefelé a kitöltő fogantyút az összes csúcs megjelöléséhez az alábbi képernyőképen.

2. Válassza ki az x és y oszlopot, majd kattintson betétlap > Helyezzen be szórást (X, Y) vagy buborékdiagramot > Szórás egyenes vonalakkal és jelölőkkel szórási diagram beillesztésére a munkalapba. Lásd a képernyőképet:

3. megnyomni a más + F11 billentyűk megnyitásához Microsoft Visual Basic for Applications ablak.

4. Ban,-ben Microsoft Visual Basic for Applications ablakot, kérjük kattintson betétlap > Modulok. Ezután másolja és illessze be a VBA kód alatt a Kód ablakba.

VBA kód: Jelölje meg az összes csúcsot egy szóródiagramon

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

Megjegyzések: A kódban az 1. ábra a létrehozott szóródiagram neve, a „C1” pedig a súgó oszlop első cellája, amely tartalmazza az 1. lépésben alkalmazott képleteredményeket. Kérjük, változtassa meg őket az Ön igényei szerint.

5. megnyomni a F5 gombot a kód futtatásához. Ezután az összes csúcsot megjelöli a szóródiagram az alábbi képernyőkép szerint:

A legjobb irodai hatékonyságnövelő eszközök

Népszerű szolgáltatások: Ismétlődések keresése, kiemelése vagy azonosítása   |  Üres sorok törlése   |  Oszlopok vagy cellák kombinálása adatvesztés nélkül   |   Kerek Formula nélkül ...
Szuper keresés: Több kritérium VLookup    Többértékű VLookup  |   VLookup több munkalapon   |   Fuzzy Lookup ....
Speciális legördülő lista: Gyors legördülő lista létrehozása   |  Függő legördülő lista   |  Többszörösen válassza ki a legördülő listát ....
Oszlopkezelő: Adjon meg egy adott számú oszlopot  |  Oszlopok mozgatása  |  Kapcsolja be a Rejtett oszlopok láthatósági állapotát  |  Tartományok és oszlopok összehasonlítása ...
Kiemelt funkciók: Rács fókusz   |  Design nézet   |   Nagy Formula bár    Munkafüzet és lapkezelő   |  Erőforrás-könyvtár (Auto szöveg)   |  Dátumválasztó   |  Kombinálja a munkalapokat   |  Cellák titkosítása/dekódolása    E-mailek küldése listánként   |  Szuper szűrő   |   Speciális szűrő (félkövér/dőlt/áthúzott szűrés...) ...
A 15 legjobb eszközkészlet12 szöveg Eszközök (Szöveg hozzáadása, Karakterek eltávolítása,...)   |   50 + Táblázatos Típusai (Gantt-diagram,...)   |   40+ Praktikus képletek (Számolja ki az életkort a születésnap alapján,...)   |   19 beszúrás Eszközök (Helyezze be a QR-kódot, Kép beszúrása az útvonalból,...)   |   12 Átalakítás Eszközök (Számok szavakig, Valuta átváltás,...)   |   7 Egyesítés és felosztás Eszközök (Haladó kombinált sorok, Hasított sejtek,...)   |   ... és több

Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz.  Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...

kte lap 201905


Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját

  • Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
  • Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
  • 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations