Conas liosta anuas a chruthú ach luachanna difriúla a thaispeáint in Excel?
I mbileog oibre Excel, is féidir linn liosta anuas a chruthú go tapa leis an ngné Bailíochtaithe Sonraí, ach, an ndearna tú iarracht riamh luach difriúil a thaispeáint nuair a chliceálann tú an liosta anuas? Mar shampla, tá an dá shonraí colún seo a leanas agam i gColún A agus i gColún B, anois, ní mór dom liosta anuas a chruthú leis na luachanna sa cholún Ainm, ach, nuair a roghnaíonn mé an t-ainm ón liosta anuas cruthaithe, an comhfhreagrach taispeántar luach sa cholún Uimhir mar a thaispeántar an scáileán a leanas. Tabharfaidh an t-alt seo isteach na sonraí chun an tasc seo a réiteach.
Cruthaigh liosta anuas ach taispeáin luach difriúil i gcill liosta anuas
Cruthaigh liosta anuas ach taispeáin luach difriúil i gcill liosta anuas
Chun an tasc seo a chríochnú, déan leis an gcéim ar chéim seo a leanas:
1. Cruthaigh ainm raon do na luachanna cille is mian leat a úsáid ar an liosta anuas, sa sampla seo, cuirfidh mé an t-ainm anuas sa Ainm Bosca, agus ansin brúigh Iontráil eochair, féach an scáileán:
2. Ansin roghnaigh cealla inar mian leat an liosta anuas a chur isteach, agus cliceáil Dáta > Bailíochtú Sonraí > Bailíochtú Sonraí, féach ar an scáileán:
3. Sa an Bailíochtú Sonraí bosca dialóige, faoin Socruithe cluaisín, roghnaigh liosta ó na Ceadaigh titim anuas, agus ansin cliceáil cnaipe chun an liosta Ainm a roghnú a theastaíonn uait a úsáid mar luachanna anuas sa Foinse Bosca téacs. Féach an pictiúr:
4. Tar éis duit an liosta anuas a chur isteach, cliceáil ar dheis ar chluaisín bileog ghníomhach, agus roghnaigh Féach an cód ón roghchlár comhthéacs, agus san oscailt Microsoft Visual Basic d’iarratais an cód seo a leanas a fhuinneogú, a chóipeáil agus a ghreamú isteach sa Mhodúl bán:
Cód VBA: Taispeáin luach difriúil ón liosta anuas:
Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
selectedNa = Target.Value
If Target.Column = 5 Then
selectedNum = Application.VLookup(selectedNa, ActiveSheet.Range("dropdown"), 2, False)
If Not IsError(selectedNum) Then
Target.Value = selectedNum
End If
End If
End Sub
nótaí: Sa chód thuas, an uimhir 5 laistigh de Más Target.Column = 5 Ansin is é script an uimhir cholúin a bhfuil do liosta anuas suite,titim síos”Leis seo selectedNum = Application.VLookup (selectedNa, ActiveSheet.Range ("anuas"), 2, Bréagach) is é cód an t-ainm raon a chruthaigh tú i gcéim 1. Is féidir leat iad a athrú go dtí an rud atá uait.
5. Ansin sábháil agus dún an cód seo, anois, nuair a roghnaíonn tú mír ón liosta anuas, taispeántar luach coibhneasta difriúil sa chill chéanna, féach an scáileán:
Taispeántas: Cruthaigh liosta anuas ach taispeáin luachanna difriúla 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á!