Cum se deschide o foaie de lucru specifică după valoarea selectată a unei casete combinate în Excel?
Presupunând că aveți o casetă combinată care conține toate numele foilor din registrul de lucru curent, așa cum este prezentat mai jos. Și acum, doriți să deschideți o foaie de lucru specifică atunci când selectați numele foii corespunzătoare într-o casetă combinată. Cum se realizează? Metoda din acest articol vă poate ajuta.
Deschideți o foaie de lucru specifică după valoarea selectată a unei casete combinate cu cod VBA
Deschideți o foaie de lucru specifică după valoarea selectată a unei casete combinate cu cod VBA
Codul VBA de mai jos vă poate ajuta să accesați o foaie de lucru specifică bazată pe selecția Casetă combinată în Excel. Vă rugăm să faceți următoarele.
notițe: Dacă caseta combinată nu conține niciun nume de foaie în foaia dvs. de lucru, vă rugăm să urmați sfatul de mai jos pentru a adăuga rapid toate numele foilor în acea casetă combinată. Și dacă există deja o casetă combinată care conține toate numele foilor, vă rugăm să treceți la pasul 1 direct.
varful: Introduceți un buton de comandă 1 în foaia de lucru, faceți clic dreapta pe acesta și selectați Afișați codul din meniul cu clic dreapta. Apoi copiați și lipiți codul VBA de mai jos în Cod fereastră și apăsați tasta Alt + Q tastele pentru a închide Microsoft Visual Basic pentru aplicație fereastră. Faceți clic pe butonul de comandă inserat, apoi toate numele foilor din registrul de lucru curent vor fi adăugate automat în ComboBox1.
Cod VBA: adăugați cu ușurință toate numele foilor într-o casetă combinată
Private Sub CommandButton1_Click()
Me.ComboBox1.Clear
Dim strWs As String
Dim i As Integer
For i = 1 To ThisWorkbook.Sheets.Count
Me.ComboBox1.AddItem Sheets(i).Name
Next
End SubDacă există deja o casetă combinată care conține toate numele foilor, vă rugăm să procedați după cum urmează.
1. Porniți Mod de proiectare în temeiul Dezvoltator tab.
2. Faceți clic dreapta pe caseta combinată cu numele foilor, apoi faceți clic pe Afișați codul din meniul cu clic dreapta.
3. Apoi Microsoft Visual Basic pentru aplicații fereastra apare, vă rugăm să înlocuiți codul VBA original în fereastra Cod cu codul VBA de mai jos.
Cod VBA: deschideți o foaie de lucru specifică după valoarea selectată a casetei combinate
Private Sub ComboBox1_Change()
Dim actWsh As String
actWsh = ComboBox1.Text
Worksheets(actWsh).Select
End Subnotițe: în cod, ComboBox1 este numele casetei combinate care conține numele foilor.
4. apasă pe Alt + Q tastele pentru a închide Microsoft Visual Basic pentru aplicații fereastră și opriți Mod de proiectare în temeiul Dezvoltator tab.
Acum, când selectați orice nume de foaie de lucru în caseta combinată, foaia de lucru corespunzătoare va fi deschisă automat.
Enumerați cu ușurință toate numele foilor din registrul de lucru curent în Excel:
Utilizarea indexului de foi în registrul de lucru vă ajută să vă gestionați foile de lucru cu ușurință. Cu Creați o listă de nume de foi utilitatea Kutools pentru Excel, puteți crea cu ușurință un index de foi care conține toate numele foilor din registrul de lucru curent. După aceea, puteți trece rapid la o anumită foaie de lucru făcând clic pe numele foii din foaia de lucru Index. Vedeți mai jos captura de ecran:
Descărcați și încercați acum! (traseu gratuit de 30 de zile)
Articole pe aceeași temă:
- Cum se copiază valoarea casetei combinate în celula activă din Excel?
- Cum se afișează formatul de dată în ieșirea casetei combinate în Excel?
- Cum se ascunde sau se ascunde un buton de comandă bazat pe valoarea specificată a celulei în Excel?
- Cum să preveniți sau să dezactivați tastarea într-o casetă combinată în Excel?
- Cum să extrageți din caseta combinată pentru a selecta o celulă specifică în Excel?
Cele mai bune instrumente de productivitate de birou
Îmbunătățiți-vă abilitățile Excel cu Kutools pentru Excel și experimentați eficiența ca niciodată. Kutools pentru Excel oferă peste 300 de funcții avansate pentru a crește productivitatea și a economisi timp. Faceți clic aici pentru a obține funcția de care aveți cea mai mare nevoie...
Fila Office aduce interfața cu file în Office și vă face munca mult mai ușoară
- Activați editarea și citirea cu file în Word, Excel, PowerPoint, Publisher, Access, Visio și Project.
- Deschideți și creați mai multe documente în filele noi ale aceleiași ferestre, mai degrabă decât în ferestrele noi.
- Vă crește productivitatea cu 50% și reduce sute de clicuri de mouse pentru dvs. în fiecare zi!
