Hoe vinkje en kruissymbolen toevoegen aan de vervolgkeuzelijst in Excel?
Normaal gesproken, na het invoegen van vinkje en kruissymbolen in cellen met symboolfunctie en vervolgens vervolgkeuzelijsten met hen als gegevensbron, worden de resultaten weergegeven als ü of û in vervolgkeuzecellen. Hoe de werkelijke ✓ en symbolen in cellen na het selecteren van items uit de vervolgkeuzelijst? De onderstaande VBA-methode helpt bij het maken van een vervolgkeuzelijst met vinkjes en kruisingen in Excel.
Voeg vinkje en kruissymbolen toe aan de vervolgkeuzelijst met VBA-code
Voeg vinkje en kruissymbolen toe aan de vervolgkeuzelijst met VBA-code
Met de onderstaande VBA-code kunt u vinkjes en vervolgkeuzelijsten invoegen in gespecificeerde cellen in Excel. Ga als volgt te werk.
1. In het werkblad maakt u vervolgkeuzelijsten met kruissymbolen, klik met de rechtermuisknop op de bladtab en selecteer Bekijk code vanuit het contextmenu.
2. Vervolgens de Microsoft Visual Basic voor toepassingen venster wordt geopend, kopieer de onderstaande VBA-code naar het codevenster.
VBA-code 1: voeg vinkje en kruissymbolen toe aan de vervolgkeuzelijst
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. Blijf klikken Invoegen > Moduleen kopieer vervolgens de volgende code 2 naar het modulevenster.
VBA-code 2: voeg vinkje en kruissymbolen toe aan de vervolgkeuzelijst
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
Note: In de bovenstaande code is B1: B10 het celbereik dat u een vervolgkeuzelijst met kruis en kruis gaat maken. Wijzig het bereik naar behoefte.
4. druk de F5 sleutel om de code uit te voeren.
Nu worden de vervolgkeuzelijsten met vinkjes en kruissymbolen ingevoegd in bereik B1: B10. Selecteer Tick in de vervolgkeuzelijst om ✓ in cel in te voegen en selecteer Cross wordt weergegeven symbool. Zie screenshot:
Gerelateerde artikelen:
- Hoe vul ik automatisch andere cellen in bij het selecteren van waarden in de vervolgkeuzelijst van Excel?
- Hoe automatisch aanvullen tijdens het typen in de vervolgkeuzelijst Excel?
- Hoe maak je een vervolgkeuzelijstkalender in Excel?
- Hoe maak ik een vervolgkeuzelijst met meerdere selecties of waarden in Excel?
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!