Ugrás a tartalomra

Hogyan lehet megszámolni az Excel-ben megjegyzésekkel ellátott cellák számát?

Megpróbálta már megszámolni a munkalapon szereplő megjegyzések számát? Ebben a cikkben néhány gyors trükköt mutatok be, hogy megszámlálhassa, hány cellában vannak megjegyzések egy munkalapon.

Számolja meg azokat a cellákat, amelyek megjegyzéseket tartalmaznak a Speciális funkcióval

Számolja meg a Felhasználó által definiált funkcióval megjegyzéseket tartalmazó cellák számát

Számolja meg a VBA kóddal ellátott megjegyzéseket tartalmazó cellák számát


nyíl kék jobb buborék Számolja meg azokat a cellákat, amelyek megjegyzéseket tartalmaznak a Speciális funkcióval

Aktivitáskövető Ugrás a különlegességre Az Excel szolgáltatásban először kiválaszthatja az összes megjegyzés cellát, majd megtekintheti a számlálás számát az állapotsorban.

1. Kattintson a gombra Kezdőlap > Keresés és kiválasztás > Ugrás a különlegességre, lásd a képernyőképet:

doc-count-comments-1

2. Az Ugrás a különlegességre párbeszédpanelt, kérjük, ellenőrizze Hozzászólások opció alatt választ szakasz, lásd a képernyőképet:

doc-count-comments-1

3. Ezután kattintson OK gombra kattintva bezárhatja ezt a párbeszédpanelt, és az aktív munkalap összes cellája, amely tartalmazza a megjegyzést, egyszerre lett kijelölve. És megkaphatja a megjegyzésszámot az állapotsoron. Lásd a képernyőképet:

doc-count-comments-1

Jegyzet: Ha üres cellái vannak megjegyzésekkel, akkor az üres cellával kapcsolatos megjegyzéseket nem számoljuk.

Tipp: Ön is megnyomhatja Ctrl+G parancsikonok megnyitáshoz Go To kattintson a gombra Különleges gombot a megjelenítéshez Ugrás a különlegességre párbeszéd.


nyíl kék jobb buborék Számolja meg a Felhasználó által definiált funkcióval megjegyzéseket tartalmazó cellák számát

A fenti módszernek megvan a maga hátránya, ezért létrehozhatunk egy Felhasználó által definiált függvényt az összes cellamegjegyzés megszámlálására, beleértve az üres cellakommenteket is.

1. Tartsa lenyomva a ALT + F11 gombokat, és ez megnyitja a Microsoft Visual Basic for Applications ablak.

2. Kattints betétlap > Modulok, és illessze be a következő kódot a Modul ablak.

VBA kód: Számolja meg a megjegyzéssel ellátott cellák számát

Function CountComments(xCell As Range)
'Update 20140924
    Application.Volatile
    CountComments = xCell.Parent.Comments.Count
End Function

3. Ezután mentse el és zárja be a kódot, menjen vissza a munkalapra, egy üres cellába írja be ezt a képletet: = visszaszámlálás (A1), (A1 egy cellahivatkozás, megváltoztathatja más cellacímre), lásd a képernyőképet:

doc-count-comments-1

4. Ezután nyomja meg a gombot belép gombot, és megkapja a cella megjegyzések számát.


nyíl kék jobb buborék Számolja meg a VBA kóddal ellátott megjegyzéseket tartalmazó cellák számát

A következő VBA-kód segíthet az összes cellamegjegyzés megszámlálásában, beleértve az üres cellamegjegyzéseket is.

1. Tartsa lenyomva a ALT + F11 gombokat, és ez megnyitja a Microsoft Visual Basic for Applications ablak.

2. Kattints betétlap > Modulok, és illessze be a következő kódot a Modul ablak.

VBA kód: Számolja meg a megjegyzéssel ellátott cellák számát

Sub CountComments()
'Update 20140924
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set WorkRng = WorkRng.SpecialCells(xlCellTypeComments)
If VBA.Err > 0 Then
    MsgBox 0
Else
    MsgBox WorkRng.Count
End If
End Sub

3. Ezután nyomja meg a gombot F5 gombot a kód futtatásához, és megjelenik egy felszólító mező, amely emlékezteti Önt arra, hogy válasszon ki egy adattartományt, amelybe meg szeretné számolni a cella megjegyzéseket. Lásd a képernyőképet:

doc-count-comments-1

4. Kattintson a gombra OK, akkor megkapja a cella megjegyzések számát a kiválasztásban.

doc-count-comments-1


Kapcsolódó cikkek:

Hogyan lehet felsorolni az összes megjegyzés egy új munkalapra vagy munkafüzetre az Excelben?

Hogyan lehet megkeresni és kicserélni a szöveget az Excel megjegyzései között?

Hogyan lehet gyorsan beszúrni egy megjegyzést az Excel több cellájába?

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 (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Buenas tardes, me puede colaborar, que hacer para contar las celdas con comentarios dentro de un rango con Application.Volatile
This comment was minimized by the moderator on the site
sorry to say.. 9 of 10 times need the short 1 line answer. all this fancy dimm rap / buring the item need is just apita
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations