Preskoči na glavno vsebino
 

Kako dodati kljukice in križne simbole na spustni seznam v Excelu?

Avtor: Siluvia Zadnja sprememba: 2020-09-04

Po vstavitvi kljukic in križancev v celice s funkcijo simbolov in nato ustvarjanju spustnih seznamov z njimi kot virom podatkov se rezultati običajno prikažejo kot ü ali û v spustnih celicah. Kako prikazati dejansko ✓ in simboli v celicah po izbiri elementov s spustnega seznama? Spodnja metoda VBA bo pomagala ustvariti kljukico in navzkrižni spustni seznam v Excelu.

Na spustni seznam s kodo VBA dodajte simbole za kljukico in križ


Na spustni seznam s kodo VBA dodajte simbole za kljukico in križ

S spodnjo kodo VBA lahko v določene celice v Excelu vstavite kljukice in navzkrižne spustne sezname. Naredite naslednje.

1. Na delovnem listu boste ustvarili spustne sezname za kljukice in navzkrižne simbole, z desno miškino tipko kliknite jeziček lista in izberite Ogled kode iz kontekstnega menija.

2. Nato Microsoft Visual Basic za aplikacije odpre se okno, kopirajte spodnjo kodo VBA v okno Code.

Koda VBA 1: Na spustni seznam dodajte kljukico in prekrižajte simbole

Private Sub Worksheet_Change(ByVal Target As Range)
'Update by Extendoffice 20180703
    If Intersect(Target, Range("B1:B10")) Is Nothing Then Exit Sub
    If Target.Value = "Tick" Then
        Target.Value = "P"
    ElseIf Target.Value = "Cross" Then
        Target.Value = "S"
    End If
End Sub

3. Nadaljujte s klikom Vstavi > Moduli, nato v okno modula kopirajte naslednjo kodo 2.

Koda VBA 2: Na spustni seznam dodajte kljukico in prekrižajte simbole

Sub usingSymbols()
'Update by Extendoffice 20180703
    Dim xRg As Range
    Set xRg = Range("B1:B10")
    xRg.Font.Name = "Wingdings 2"
    xRg.Validation.Add xlValidateList, , , "Tick,Cross"
End Sub

Opombe: V zgornji kodi je B1: B10 obseg celic, ki jih boste ustvarili s ključnim in navzkrižnim spustnim seznamom. Spremenite obseg, kot ga potrebujete.

4. Pritisnite F5 tipko za zagon kode.

Zdaj so spustni seznami kljukic in navzkrižnih simbolov vstavljeni v obseg B1: B10. V spustnem meniju izberite Tick, v celico vstavite ✓ in izberite Cross simbol. Oglejte si posnetek zaslona:


Sorodni članki:

Najboljša pisarniška orodja za produktivnost

🤖 Kutools AI Aide: Revolucionirajte analizo podatkov na podlagi: Inteligentna izvedba   |  Ustvari kodo  |  Ustvarite formule po meri  |  Analizirajte podatke in ustvarite grafikone  |  Prikličite funkcije Kutools...
Priljubljene funkcije: Poiščite, označite ali identificirajte dvojnike   |  Izbriši prazne vrstice   |  Združite stolpce ali celice brez izgube podatkov   |   Krog brez formule ...
Super iskanje: Več kriterijev VLookup    Multiple Value VLookup  |   VLookup na več listih   |   Nejasno iskanje ....
Napredni spustni seznam: Hitro ustvarite spustni seznam   |  Odvisni spustni seznam   |  Večkrat izberite spustni seznam ....
Upravitelj stolpcev: Dodajte določeno število stolpcev  |  Premakni stolpce  |  Preklop stanja vidnosti skritih stolpcev  |  Primerjaj obsege in stolpce ...
Predstavljene funkcije: Mrežni fokus   |  Pogled oblikovanja   |   Velika vrstica formule    Upravitelj delovnih zvezkov in listov   |  Knjižnica virov (Samodejno besedilo)   |  Izbirnik datuma   |  Združite delovne liste   |  Šifriranje/dešifriranje celic    Pošljite e-pošto po seznamu   |  Super filter   |   Poseben filter (filter krepko/ležeče/prečrtano ...) ...
15 najboljših kompletov orodij12 Besedilo Orodja (dodajanje besedila, Odstrani znake,...)   |   50 + Graf Vrste (Gantt Chart,...)   |   40+ Praktično Formule (Izračunajte starost glede na rojstni dan,...)   |   19 vstavljanje Orodja (Vstavite kodo QR, Vstavi sliko s poti,...)   |   12 Pretvorba Orodja (Številke v besede, Pretvorba valut,...)   |   7 Spoji in razdeli Orodja (Napredne kombinirane vrstice, Razdeljene celice,...)   |   ... in več

Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa.  Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...


Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo

  • Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
  • Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
  • Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!