Hogyan lehet feltölteni a Userform ComboBox-ot az Excel összes lapnevével?
Ez a cikk arról szól, hogy az aktuális munkafüzet összes lapnevét feltölti az Excel felhasználói formájú kombinációs mezőjébe.
Töltse ki a Userform ComboBox-ot az összes VBA-kóddal ellátott lapnévvel
Töltse ki a Userform ComboBox-ot az összes VBA-kóddal ellátott lapnévvel
A következő VBA-kód segíthet az aktuális munkafüzet összes lapnevének beszúrásában egy userform kombinációs mezőbe. Kérjük, tegye a következőket.
1. megnyomni a más + F11 gombok egyszerre a Microsoft Visual Basic for Applications ablak.
2. Ban,-ben Microsoft Visual Basic for Applications ablakban kattintson a gombra betétlap > Felhasználói űrlap az alábbi képernyőképen látható.
3. Ezután rajzoljon és helyezzen be egy kombinációs mező vezérlőt a Userformba. Lásd a képernyőképet:
4. Kattintson a jobb gombbal a beillesztett kombinációs mezőre, és válassza a lehetőséget Kód megtekintése a helyi menüből. Lásd a képernyőképet:
5. A nyílásban Microsoft Visual Basic for Applications ablakban, kérjük, másolja és illessze be a VBA kód alá, hogy az eredeti kódot a Kód ablakban cserélje ki.
VBA-kód: Töltse fel a Userform ComboBox-ot az aktuális munkafüzet összes lapnevével
Private Sub UserForm_Initialize()
Dim I As Long
Me.ComboBox1.Clear
For I = 1 To Sheets.Count
Me.ComboBox1.AddItem Sheets(I).Name
Next
Me.ComboBox1.Value = ActiveSheet.Name
End Sub
Megjegyzések: A kódban a ComboBox1 a beillesztett Combo Box neve. Kérjük, változtassa meg sajátjával.
6. megnyomni a F5 gombot a kód futtatásához. A megnyíló Userformban láthatja, hogy az aktuális munkafüzet összes munkaneve megjelenik a kombinációs mezőben, az alábbi képernyőképen:
Könnyen felsorolhatja az összes lapnevet az Excelben
A Létrehozza a munkalapok listáját hasznossága Kutools az Excel számára segíthet az aktív munkafüzet összes munkalap-nevének az Excel új munkalapjában történő egyszerű felsorolásában. És közvetlenül a megfelelő munkalapra léphet, ha rákattint a lap nevére, ahogy az alábbi képernyőképen látható.
Töltse le és próbálja ki most! (30 napos ingyenes túra)
Kapcsolódó cikkek:
- Hogyan lehet másolni a Combo Box értékét az Excel aktív cellájába?
- Hogyan jelenítheti meg a dátumformátumot az Excel kombinált mező kimenetében?
- Hogyan nyitható meg egy adott munkalap az Combo Box kiválasztott értékével az Excelben?
- Hogyan lehet megakadályozni vagy letiltani az Excel kombinációs mezőbe történő beírást?
- Hogyan válthat ki a kombinációs mezőből az Excel egyes celláinak kiválasztásához?
A legjobb irodai hatékonyságnövelő eszközök
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...
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!