Hogyan sorolhatja fel az összes nyitott munkafüzetet, és hogyan válthat könnyedén az Excel között?
A Microsoft Excel lehetővé teszi több munkafüzet egyidejű megnyitását, de nem könnyű váltani az összes nyitott munkafüzet között. Érdemes tehát felsorolnia az összes nyitott munkafüzetet az Excelben a munkafüzetek közötti váltáshoz. Ebben a cikkben megmutatjuk, hogyan sorolhatja fel az összes megnyitott munkafüzetet az Excel egyszerű navigálásához.
Csak sorolja fel az összes VBA-val ellátott nyitott munkafüzetet
Sorolja fel az összes nyitott munkafüzetet, és könnyedén váltson át munkafüzetre a VBA segítségével
Sorolja fel az összes nyitott munkafüzetet, és könnyedén váltson át egy munkafüzetre egy csodálatos eszközzel

Csak sorolja fel az összes VBA-val ellátott nyitott munkafüzetet
Ebben a szakaszban megtudhatja, hogyan használhatja a VBA kódot az összes nyitott munkafüzet felsorolásához az Excelben.
1. nyomja meg más + F11 billentyűk megnyitásához Microsoft Visual Basic for Applications ablak. Ban,-ben Microsoft Visual Basic for Applications ablakban kattintson betétlap > Modulok.
2. Ezután másolja és illessze be az alábbi VBA kódot a kódszerkesztőbe.
VBA: sorolja fel az összes nyitott munkafüzet nevet az Excelben
Sub ListWorkbooks() Dim Rng As Range Dim WorkRng As Range On Error Resume Next xTitleId = "KutoolsforExcel" Set WorkRng = Application.Selection Set WorkRng = Application.InputBox("Out put to (single cell)", xTitleId, WorkRng.Address, Type: = 8) Set WorkRng = WorkRng.Range("A1") xNum1 = Application.Workbooks.Count For i = 1 To xNum1 xNum2 = Application.Workbooks(i).Sheets.Count WorkRng.Offset(i - 1, 0).Value = Application.Workbooks(i).Name For j = 1 To xNum2 WorkRng.Offset(i - 1, j).Value = Application.Workbooks(i).Sheets(j).Name Next Next End Sub
3. Futtassa a VBA kódot a F5 kulcs. Ban,-ben KutoolsforExcel párbeszédpanelen adjon meg egy cellát a munkafüzetlista elhelyezéséhez, majd kattintson a gombra OK gomb. Lásd a képernyőképet:
Ezután az összes nyitott munkafüzet és a hozzá tartozó munkalapok felsorolásra kerülnek.
Nehéz kezelni a VBA kódot? A. Segítségével elérheti harmadik módszer kattintásokkal.
Sorolja fel az összes nyitott munkafüzetet, és könnyedén váltson át munkafüzetre a VBA segítségével
Ha fel szeretné sorolni az összes munkafüzetet a munkafüzetek közötti váltáshoz, kérjük, próbálja meg használni a VBA-t az alábbiak szerint:
1. megnyomni a más + F11 megnyitni Microsoft Visual Basic for Applications ablak. Ban,-ben Microsoft Visual Basic for Applications ablakban kattintson betétlap > Modulok.
2. Másolja és illessze be a következő VBA kódot a nyitott modul ablakába.
VBA-kód: sorolja fel az összes nyitott munkafüzetet, és váltson át egy munkafüzetre
Sub SelectWB() Dim xWBName As String Dim xWb As Workbook Dim xSelect As String For Each xWb In Application.Workbooks xWBName = xWBName & xWb.Name & vbCrLf Next xTitleId = "KutoolsforExcel" xSelect = Application.InputBox("Enter one of the workbooks below:" & vbCrLf & xWBName, xTitleId, "", Type: = 2) Application.Workbooks(xSelect).Activate End Sub
3. megnyomni a F5 gombot a kód futtatásához. Aztán a KutoolsforExcel megjelenik az összes megnyitott munkafüzet listája. Ha egy megadott munkafüzetre szeretne váltani, kérjük, írja be a munkafüzet nevét a mezőbe, majd kattintson a gombra OK gomb. Lásd a képernyőképet:
Sorolja fel az összes nyitott munkafüzetet, és könnyedén váltson át egy munkafüzetre egy csodálatos eszközzel
Alkalmazás előtt Kutools for ExcelKérjük, először töltse le és telepítse.
A ... val Navigációs ablak of Kutools for Excel, az összes nyitott munkafüzet automatikusan megjelenik egy ablaktáblán belül, így könnyedén navigálhat az összes nyitott munkafüzet között. Csak rá kell kattintania az egyik nyitott munkafüzetre, és az azonnal eljut a munkafüzethez.
Ha ingyenes (30 napos) próbaverziót szeretne kapni a segédprogramról, kattintson a letöltéshez, majd lépjen a művelet végrehajtására a fenti lépések szerint.
A legjobb irodai termelékenységi eszközök
A Kutools for Excel megoldja a legtöbb problémát, és 80% -kal növeli a termelékenységet
- újrafelhasználás: Gyorsan helyezze be összetett képletek, diagramok és bármi, amit korábban használt; Cellák titkosítása jelszóval; Levelezőlista létrehozása és e-maileket küldeni ...
- Super Formula Bar (könnyedén szerkeszthet több szöveget és képletet); Olvasás elrendezés (könnyen olvasható és szerkeszthető nagyszámú cella); Beillesztés a Szűrt tartományba...
- Cellák / sorok / oszlopok egyesítése az adatok elvesztése nélkül; Osztott cellák tartalma; Kombinálja a duplikált sorokat / oszlopokat... megakadályozza az ismétlődő cellákat; Hasonlítsa össze a tartományokat...
- Válassza a Másolat vagy az Egyedi lehetőséget Sorok; Válassza az Üres sorok lehetőséget (az összes cella üres); Super Find és Fuzzy Find sok munkafüzetben; Véletlenszerű kiválasztás ...
- Pontos másolás Több cella a képletreferencia megváltoztatása nélkül; Automatikus referenciák létrehozása több lapra; Helyezze be a golyókat, Jelölőnégyzetek és még sok más ...
- Kivonat szöveg, Szöveg hozzáadása, Eltávolítás pozíció szerint, Hely eltávolítása; Hozz létre és nyomtasson személyhívó részösszegeket; Konvertálás a cellatartalom és a megjegyzések között...
- Szuper szűrő (mentse el és alkalmazza a szűrősémákat más lapokra); Haladó rendezés hónap / hét / nap, gyakoriság és egyebek szerint; Speciális szűrő félkövér, dőlt betűvel ...
- Kombinálja a munkafüzeteket és a munkalapokat; Táblázatok egyesítése kulcsoszlopok alapján; Az adatok felosztása több lapra; Kötegelt konvertálás xls, xlsx és PDF...
- Több mint 300 hatékony funkció. Támogatja az Office / Excel 2007-2019 és 365. Támogatja az összes nyelvet. Könnyen telepíthető a vállalkozásba vagy szervezetbe. 30 napos ingyenes próbaverzió. 60 napos pénzvisszafizetési garancia.

Az Office fül a füles felületet hozza 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 minden nap több száz kattintással csökkenti az egér kattintását!

You are guest
or post as a guest, but your post won't be published automatically.
Be the first to comment.