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 natisniti vse možnosti na spustnem seznamu v Excelu?

Ali ste kdaj poskusili natisniti vse možnosti na spustnem seznamu v delovnem listu Excel? Ta članek govori o tiskanju vseh možnosti na spustnem seznamu v ločeni izpis v Excelu.

Natisnite vse možnosti na spustnem seznamu s kodo VBA


Enostavno natisnite navedene strani v trenutnem delovnem listu v Excelu:

Z Natisnite specifične strani uporabnost Kutools za Excel, lahko enostavno natisnete določene strani v trenutnem delovnem listu, na primer natisnete vse neparne straniVse sode strani, natisnite samo trenutna stran, kot tudi stran tiskanja po meri, kot je prikazano spodaj.

Kutools za Excel: z več kot 200 priročnimi dodatki Excel, lahko brezplačno poskusite brez omejitev v dnevih 60. Prenesite in brezplačno preizkusite zdaj!


Natisnite vse možnosti na spustnem seznamu s kodo VBA


Naslednja VBA koda vam lahko pomaga, da natisnete vse možnosti na spustnem seznamu v delovnem listu. Prosimo, naredite na naslednji način.

1. Pritisnite druga + F11 tipke za odpiranje Microsoft Visual Basic za aplikacije okno.

2. V Ljubljani Microsoft Visual Basic za aplikacije okno, kliknite Vstavi > Moduli. Nato v okno Modul kopirajte naslednjo kodo VBA. Prikaz slike:

VBA koda: natisnite vse možnosti na določenem spustnem seznamu v ločeni izpis

Sub Iterate_Through_data_Validation()
    Dim xRg As Range
    Dim xCell As Range
    Dim xRgVList As Range
    Set xRg = Worksheets("Sheet1").Range("B8")
    Set xRgVList = Evaluate(xRg.Validation.Formula1)
    For Each xCell In xRgVList
        xRg = xCell.Value
        ActiveSheet.PrintOut
    Next
End Sub

Opombe: V kodi je Sheet1 ime delovnega lista, ki vsebuje spustni seznam, ki ga želite natisniti. In B8 je celica vsebuje spustni seznam. Prosimo, da jih nadomestite z vašim potrebnim.

3. Pritisnite F5 ključ za zagon kode.

Nato bodo vse možnosti na določenem spustnem seznamu v določenem delovnem listu ločeno natisnjene.


Sorodni članki:


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.
    Juliette · 1 years ago
    Thank you for the post, this has helped me a lot. I was wondering if you had a way to do VBA to print Page 1 based on one drop-down selection and print Page 1 and 2 based on another drop-down selection? Thanks for any help you can provide.