Namig: drugi jeziki so prevedeni v Google. Lahko obiščete English različico te povezave.
Vpiši se
x
or
x
x
Registracija
x

or

Kako zagnati makro glede na vrednost, izbrano iz spustnega seznama v Excelu?

Če želite zagnati makre s klikom na ukazni gumb, je v Excelu skupna naloga, vendar ste kdaj poskusili izvesti makroške kode na podlagi vrednosti, ki je izbrana iz padajočega seznama? To pomeni, da ko izberete eno postavko iz spustnega seznama, se bo sprožil poseben makro. Ta članek vam bo predstavil koristno kodo za rešitev tega dela.

Zaženi makro na podlagi vrednosti, izbrane iz padajočega seznama s kodo VBA


puščica modra desno mehurček Zaženi makro na podlagi vrednosti, izbrane iz padajočega seznama s kodo VBA


Ni neposrednega načina za dokončanje te naloge, lahko pa vam pomaga naslednja koda VBA:

1. Najprej ustvarite spustni seznam, kot ga potrebujete, glejte sliko zaslona:

doc zaženite makro iz spustnega seznama 1

2. Nato z desno miškino tipko kliknite jeziček stanja, ki vsebuje spust, ki ga želite uporabiti, in nato izberite Ogled kode iz kontekstnega menija in v odprtem Microsoft Visual Basic za aplikacije okno, kopirajte in prilepite naslednjo kodo v prazno Modul:

VBA koda: zaženite makro glede na vrednost, izbrano iz spustnega seznama:

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

doc zaženite makro iz spustnega seznama 2

Opombe: V zgornji kodi, E1 je celica vsebuje spustni seznam, spremenite imena makrov in spustite vrednosti seznama na vaše potrebe.

3. In nato shranite in zaprite to okno kod, zdaj, ko iz spustnega seznama izberete postavko Vstavi prazno vrstico, se sproži Macro1 in tako naprej ...


Sorodni članki:

Kako zagnati makro, ko se vrednost celice v Excelu spremeni?

Kako izvajati makro, ki temelji na vrednosti celice v Excelu?

Kako samodejno zagnati makro pred tiskanjem v programu Excel?

Kako zagnati makro s klikom hiperpovezav v Excelu?

Kako zagnati makro, ko je list izbran iz delovnega zvezka?


Priporočena orodja za produktivnost za Excel

zavihek kte 201905

Kutools za Excel vam pomaga, da vedno končate delo pred časom in izstopite iz množice

  • Več kot zmogljive napredne funkcije 300, zasnovane za 1500 delovne scenarije, ki povečujejo produktivnost z 70%, vam dajejo več časa za skrb za družino in uživanje v življenju.
  • Ne potrebujete več pomnilniških formul in VBA kod, od zdaj naprej pa dajate svojim možganom počitek.
  • Postanite strokovnjak za Excel v minutah 3, zapletene in ponavljajoče se operacije lahko opravite v nekaj sekundah,
  • Vsak dan zmanjšajte število operacij tipkovnice in miške, zdaj se poslovite od poklicnih bolezni.
  • 110,000 visoko učinkovite ljudi in 300 + svetovno priznanih podjetij izbiro.
  • Brezplačna preizkusna različica 60 dneva. 60-dnevno jamstvo vračila denarja. 2 let brezplačne nadgradnje in podpore.

Prinaša kartično brskanje in urejanje za Microsoft Office, veliko močnejši od zavihkov brskalnika

  • Office Tab je namenjen za Word, Excel, PowerPoint in druge Office aplikacije: Založnik, Dostop, Visio in Projekt.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Z 50% poveča vašo produktivnost in vsak dan zmanjša na stotine klikov z miško!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Ivan · 6 months ago
    Good morning. Would you be able to do Macro from drop down menu for next: To run macro and save separated sheets for each item from Dropdown menu? In your case should be looking like this:
    1. You run macro and then you have separated sheet with values for "Insert blank rows" saved in designated folder
    2. Separated sheet with values for " Hide all sheets:" saved in designated folder
    3. Separated sheet with values for " Convert to date" saved in designated folder.
    4. Macro is done now


    Mainly i am able do set all of this except that macro automatically change selection from drop down menu ?


    Thanks


    Ivan
  • To post as a guest, your comment is unpublished.
    nuria · 9 months ago
    Hola!

    Al aplicarlo me sale un error de compilación: La declaración del procedimiento no coincide con la descripción del evento o el procedimiento que tiene el mismo nombre. Que quiere decir eso? que debo cambiar/arreglar? Gracias
  • To post as a guest, your comment is unpublished.
    fi · 1 years ago
    Is there a way to use VBA code to do this in Access? Thanks
  • To post as a guest, your comment is unpublished.
    Diego · 1 years ago
    efectivamente funciona pero quiero aplicarlo en varias celdas, que variable debo cambiar?