Ugrás a tartalomra

Hogyan lehet az Excel több cellájának tartományára vonatkozó előzményeket vagy függőket nyomon követni?

Az Excelben a cellák előzményeit vagy függőit nyomon követhetjük az Excel beépített szolgáltatásával, ha egyesével kattintunk a cellákra. De ha több száz olyan sejt van, amely egyszerre szeretné nyomon követni az előzményeket vagy az eltartottakat, akkor hogyan kezelhetné ezt a feladatot gyorsan és egyszerűen az Excel programban?

Segítségképlettel rendelkező sejtek előzményeinek nyomon követése

VBA kóddal rendelkező cellatartományok függőinek nyomon követése

Kövesse nyomon egy sor cella precedenseit vagy függőit a Kutools for Excel segítségével


Több sejt előzményeinek felderítéséhez a következő lépések segíthetnek:

1. Adja meg az egyenlőségjelet = egy üres cellába, majd kattintson a munkalap bal felső sarkára az egész lap kiválasztásához, lásd a képernyőképet:

doc nyomkövetés 1

2. Ezután nyomja meg a gombot belép gombot, és megjelenik egy figyelmeztető üzenet, lásd a képernyőképet:

doc nyomkövetés 2

3. és kattintson OK gombbal bezárhatja, és egy 0 jelenik meg a cellában, jelölje ki, majd kattintson képletek és kattintson Nyomkövetési előzmények kétszer, a megfelelő cellák összes előzményét egyszerre követték nyomon, lásd a képernyőképet:

doc nyomkövetés 3

4. Végül szükség szerint törölheti a segítő képletet.


A több sejt eltartottjának felkutatásához a következő VBA-kód segíthet, kérjük, tegye a következőket:

1. Tartsa lenyomva a ALT + F11 billentyűk megnyitásához Microsoft Visual Basic for Applications ablak.

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

VBA-kód: A cellák egy részének nyomon követése:

Sub TraceDependents()
'updateby Extendoffice
    Dim xRg As Range
    Dim xCell As Range
    Dim xTxt As String
    On Error Resume Next
    xTxt = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
    Set xRg = Application.Union(xRg, ActiveSheet.UsedRange)
    If xRg Is Nothing Then Exit Sub
    For Each xCell In xRg
        xCell.ShowDependents
    Next
End Sub

3. Ezután nyomja meg a gombot F5 kulcs a kód futtatásához, és megjelenik egy felszólító mező, amely emlékezteti Önt a használni kívánt tartomány kiválasztására, lásd a képernyőképet:

doc nyomkövetés 4

4. Kattintson a gombra OK gombra, az összes függő cellát egyszerre követik nyomon, lásd a képernyőképet:

doc nyomkövetés 5


Hogy a fenti módszerekkel fájdalmas legyek, itt bemutatok egy praktikus eszközt -Kutools az Excel számára, Annak Figyelje a tartományok előzményeit és a monitor eltartottak tartományok segédprogramokkal, gyorsan és egyszerűen megoldhatja ezt a feladatot.

Kutools az Excel számára : több mint 300 praktikus Excel-bővítménnyel, ingyenesen, korlátozás nélkül, 30 nap alatt kipróbálható

Telepítése után Kutools az Excel számára, kérjük, tegye a következőket:

1. Válassza ki azt az adattartományt, amelyen szeretné nyomon követni az előzményeket vagy az eltartottakat.

2. Ezután kattintson Kutools > Több > Figyelje a tartományok előzményeit / Figyelje a tartományok függőit, lásd a képernyőképet:

3. A precedens cellák nyomon követésével válassza a lehetőséget Figyelje a tartományok előzményeit a következő eredmény elérése érdekében:

doc nyomkövetés 7

Kérjük, válassza ki a függő cellák nyomon követését Figyelje a tartományok függőit a következő eredmény elérése érdekében:

doc nyomkövetés 8

Megjegyzések:

1. Ez a szolgáltatás dinamikus, a kiválasztáskor megváltozik.

2. Ezt a funkciót kattintással is alkalmazhatja Kutools Plus > Munkalap tervezése, Alatt a Design fülre kattintva monitor Előzmények és függők.

3. Csak újra kell kattintania a segédprogramra a nyomkövetés letiltásához.

Töltse le és ingyenes próbaverziója a Kutools for Excel programhoz most!


Kutools az Excel számára: több mint 300 praktikus Excel-bővítménnyel, ingyenesen, korlátozás nélkül, 30 nap alatt kipróbálható. Töltse le és ingyenes próbaverziót most!

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 (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
The reason that Excel hangs is due to the time. There is an error in the macro. It is showing application.union but what it should be doing is using application.intersect. The reason it's hanging is because it's working to trace dependents on the entire worksheet instead of the specified area.
This comment was minimized by the moderator on the site
Hi, jchumley,Yes, as you said, the code works for entire worksheet, if you need the code works for a selected range, please apply the below code:<div data-tag="code">Sub TraceDependents()
'updateby Extendoffice
Dim xRg As Range
Dim xCell As Range
Dim xTxt As String
On Error Resume Next
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
For Each xCell In xRg
xCell.ShowDependents
Next
End SubPlease try, hope it can help you!
This comment was minimized by the moderator on the site
I've found this macro very useful, thank you. I do have one rather large issue - the macro will cause excel to stop responding and I have to close out and restart the program each time I run it. Any fixes/recommendations? Thank you!
This comment was minimized by the moderator on the site
When running the macro version, it causes excel to stop responding. I then have to restart excel. Has anyone else encountered this and have a fix? This is a very helpful macro, thank you. Hoping I can resolve this issue.
This comment was minimized by the moderator on the site
Thank you very much!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations