Hogyan adhatunk be pipa és kereszt szimbólumokat az Excel legördülő listájába?
Normális esetben, miután beillesztett pipa és kereszt szimbólumokat a szimbólum funkcióval rendelkező cellákba, majd létrehozott egy legördülő listát velük, mint adatforrással, az eredmények ü vagy û formában jelennek meg a legördülő cellákban. Hogyan jelenítse meg a tényleges ✓ és szimbólumok a cellákban, miután elemeket választott ki a legördülő listából? Az alábbi VBA módszer segít létrehozni egy pipa és kereszt legördülő listát az Excelben.
Adjon pipa és kereszt szimbólumokat a VBA kóddal ellátott legördülő listára
Adjon pipa és kereszt szimbólumokat a VBA kóddal ellátott legördülő listára
Az alábbi VBA-kóddal pipa és kereszt legördülő listákat illeszthet be az Excel meghatározott celláiba. Kérjük, tegye a következőket.
1. A munkalapon pipa és kereszt szimbólumok legördülő listákat hoz létre, kattintson a jobb gombbal a lap fülre, és válassza ki Kód megtekintése a helyi menüből.
2. Ezután a Microsoft Visual Basic for Applications ablak megnyílik, kérjük, másolja a VBA kód alatt a Kód ablakba.
1. VBA-kód: A pipa és a kereszt szimbólumok hozzáadása a legördülő listához
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. Kattintson a gombra betétlap > Modulok, majd másolja a következő kódot 2 a Modul ablakba.
2. VBA-kód: A pipa és a kereszt szimbólumok hozzáadása a legördülő listához
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
Megjegyzések: A fenti kódban a B1: B10 a cellák tartománya, amelyet a pipa és kereszt legördülő listából hoz létre. Kérjük, változtassa meg a tartományt, ha szükséges.
4. megnyomni a F5 gombot a kód futtatásához.
Most a pipa és kereszt szimbólumok legördülő listák beillesztésre kerülnek a B1: B10 tartományba. Ha a legördülő menüből kiválasztja a Jelölést, a ✓ beillesztésre kerül a cellába, majd válassza a Kereszt lehetőséget szimbólum. Lásd a képernyőképet:
Kapcsolódó cikkek:
- Hogyan lehet automatikusan feltölteni a többi cellát, amikor kiválasztja az értékeket az Excel legördülő listában?
- Hogyan lehet automatikusan kitölteni, amikor beírja az Excel legördülő listát?
- Hogyan hozhatunk létre legördülő listás naptárt az Excelben?
- Hogyan hozhatunk létre legördülő listát több választással vagy értékkel az Excelben?
A legjobb irodai hatékonyságnövelő eszközök
Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz. Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...
Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját
- Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
- Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
- 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!