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 Subnó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?
Uirlisí Táirgiúlachta Oifige is Fearr
Supercharge Do Scileanna Excel le Kutools le haghaidh Excel, agus Éifeachtúlacht Taithí Cosúil Ná Roimhe. Kutools le haghaidh Excel Tairiscintí Níos mó ná 300 Ardghnéithe chun Táirgiúlacht a Treisiú agus Sábháil Am. Cliceáil anseo chun an ghné is mó a theastaíonn uait a fháil ...
Tugann Tab Oifige comhéadan Tabbed chuig Office, agus Déan Do Obair i bhfad Níos Éasca
- Cumasaigh eagarthóireacht agus léamh tabbed i Word, Excel, PowerPoint, Foilsitheoir, Rochtain, Visio agus Tionscadal.
- Oscail agus cruthaigh cáipéisí iolracha i gcluaisíní nua den fhuinneog chéanna, seachas i bhfuinneoga nua.
- Méadaíonn do tháirgiúlacht 50%, agus laghdaíonn sé na céadta cad a tharlaíonn nuair luch duit gach lá!
