Cum se execută macro pe baza valorii selectate din lista derulantă în Excel?
Executarea macro-urilor făcând clic pe butonul de comandă este o sarcină obișnuită în Excel, dar ați încercat vreodată să executați codurile macro pe baza valorii selectate din lista derulantă? Înseamnă că, atunci când alegeți un element din lista derulantă, macro-ul specific va fi declanșat simultan. Acest articol va introduce un cod util pentru rezolvarea acestei sarcini.
Rulați macrocomanda pe baza valorii selectate din lista derulantă cu cod VBA
Rulați macrocomanda pe baza valorii selectate din lista derulantă cu cod VBA
Nu există o modalitate directă de a termina această sarcină, dar, următorul cod VBA vă poate ajuta, vă rugăm să faceți acest lucru:
1. În primul rând, creați o listă verticală după cum aveți nevoie, vedeți captura de ecran:
2. Apoi faceți clic dreapta pe fila foaie conține meniul drop-down pe care doriți să îl utilizați, apoi alegeți Afișați codul din meniul contextual și în meniul deschis Microsoft Visual Basic pentru aplicații fereastră, copiați și lipiți următorul cod în modulul gol:
Cod VBA: Rulați macrocomanda pe baza valorii selectate din lista derulantă:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("E1")) Is Nothing Then
Select Case Range("E1")
Case "Insert Blank rows": Macro1
Case "Hide All Sheets": Macro2
Case "Convert to Date": Macro3
End Select
End If
End Sub
notițe: În codul de mai sus, E1 este celula conține lista derulantă, schimbați numele macrocomenzilor și derulează valorile listei la necesarul dvs.
3. Și apoi salvați și închideți această fereastră de cod, acum, când selectați elementul Inserare rânduri goale din lista derulantă, Macro1 va fi declanșat și așa mai departe ...
Legate de articole:
Cum se execută macro când valoarea celulei se schimbă în Excel?
Cum se execută macro pe baza valorii celulei în Excel?
Cum se execută macro automat înainte de a imprima în Excel?
Cum se execută macro făcând clic pe hyperlinkuri în Excel?
Cum se execută macro când foaia este selectată dintr-un registru de lucru?
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!