Conas siombailí tic agus tras a chur leis an liosta anuas in Excel?

De ghnáth, tar éis siombailí tic agus tras a chur isteach i gcealla a bhfuil feidhm siombailí acu agus ansin liostaí anuas a chruthú leo mar fhoinse sonraí, taispeánfar na torthaí mar ü nó û i gcealla anuas. Conas an ✓ agus siombailí i gcealla tar éis míreanna a roghnú ón liosta anuas? Cuideoidh an modh VBA thíos le liosta tic agus tras-titim a chruthú in Excel.

Cuir tic agus tras siombailí isteach sa liosta anuas le cód VBA

Cuir tic agus tras siombailí isteach sa liosta anuas le cód VBA

Leis an gcód VBA thíos, is féidir leat tic agus liostaí anuas a thrasnú i gcealla sonraithe in Excel. Déan mar a leanas le do thoil.

1. Sa bhileog oibre cruthóidh tú liostaí anuas siombailí tic agus tras, cliceáil ar dheis ar an táb bileog agus roghnaigh Féach an cód ón roghchlár comhthéacs.

2. Ansin an Microsoft Visual Basic d’Fheidhmchláir osclaítear an fhuinneog, cóipeáil thíos an cód VBA isteach i bhfuinneog an Chóid.

Cód VBA 1: Cuir siombailí tic agus tras isteach sa liosta anuas

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. Téigh ar cliceáil Ionsáigh > Modúil, ansin cóipeáil an cód 2 seo a leanas isteach i bhfuinneog an Mhodúil.

Cód VBA 2: Cuir siombailí tic agus tras isteach sa liosta anuas

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

nótaí: Sa chód thuas, is é B1: B10 an raon cealla a chruthóidh tú tic agus tras-liosta anuas. Athraigh an raon de réir mar is gá duit.

4. Brúigh an F5 eochair chun an cód a rith.

Anois cuirtear liostaí anuas na siombailí tic agus tras-siombailí isteach i raon B1: B10. Roghnaigh Cuir tic ón roghchlár anuas cuir ✓ isteach sa chill, agus taispeánfaidh Cross siombail. Féach an pictiúr:

Earraí gaolmhara:

• Conas cealla eile a daonra go huathoibríoch agus luachanna á roghnú ar liosta anuas Excel?
• Conas a bheith autocomplete agus tú ag clóscríobh liosta anuas Excel?
• Conas féilire liosta anuas a chruthú in Excel?
• Conas liosta anuas a chruthú le roghnúcháin nó luachanna iolracha in Excel?