Conas boscaí liosta cascáideacha dinimiciúla a chruthú in Excel?
B'fhéidir go mbeadh a fhios agat conas liosta anuas bailíochtaithe cascáideacha a chruthú in Excel. Mar sin féin, conas boscaí liosta cascáideacha dinimiciúla a chruthú in Excel? Tugann an t-alt seo modh VBA isteach chun é a fháil síos.
Cruthaigh boscaí liosta cascáideacha dinimiciúla le cód VBA
Cruthaigh boscaí liosta cascáideacha dinimiciúla le cód VBA
Mar a thaispeántar an scáileán thíos, ní mór duit bosca liosta tuismitheoirí a chruthú ina bhfuil luachanna uathúla an cholúin Dí, agus na luachanna comhfhreagracha go léir a thaispeáint sa dara bosca liosta bunaithe ar an roghnú sa bhosca liosta tuismitheoirí. Cuidíonn an cód VBA seo a leanas leat é a bhaint amach. Déan mar a leanas le do thoil.
1. Ar an gcéad dul síos, ní mór duit gach luach uathúla a bhaint as an gcolún Deoch. Roghnaigh ceall bán, cuir isteach foirmle eagar =IFERROR(INDEX($A$2:$A$11, MATCH(0,COUNTIF($J$1:J1, $A$2:$A$11), 0)),"") isteach sa Bar Foirmle, agus ansin brúigh an Ctrl + Shift + Iontráil eochair. Ansin tarraing an Líon Láimhseáil gach luach uathúil a fháil. Féach ar an scáileán:
nótaí: San fhoirmle, $A$2:$A$11 an raon as a mbainfidh tú luachanna uathúla. Is é J1 an chill thuas ina bhfuil do fhoirmle suite.
Leid: Má tá foirmle ró-deacair a mheabhrú agus a láimhseáil, an Roghnaigh Cealla Dúblacha & Uathúla fóntais de Kutools le haghaidh Excel Beidh sé ina rogha maith duit gach luach uathúil a bhaint as colún go tapa.
Roghnaigh le do thoil go bhfuil luachanna uathúla sa cholún as a mbainfidh tú. Ansin cumasaigh an fóntais trí chliceáil Kutools > Roghnaigh > Roghnaigh Cealla Dúblacha & Uathúla. Sa an Roghnaigh Cealla Dúblacha & Uathúla bosca dialóige, roghnaigh an Gach uathúil (lena n-áirítear an chéad dúblach) rogha agus cliceáil ar an OK cnaipe. Ansin roghnaítear na luachanna uathúla go léir sa cholún. Déan iad a chóipeáil agus a ghreamú chuig áit nua. Féach ar an scáileán:
Kutools le haghaidh Excel: le níos mó ná 200 breiseán áisiúil Excel, saor in aisce le triail gan aon teorannú i 60 lá. Íoslódáil agus triail saor in aisce Anois!
2. Cuir isteach dhá bhosca liosta ar leithligh trí chliceáil Forbróir > Ionsáigh > Bosca Liosta (Rialú ActiveX). Féach an pictiúr:
3. Cliceáil ar dheis ar an mbosca liosta tuismitheoirí agus roghnaigh Airíonna ón roghchlár comhthéacs. Sa Airíonna bosca dialóige, athraigh an (Ainm) réimse go Deoch nó ainm eile de réir mar is gá duit, cuir isteach an raon cille ina bhfuil na luachanna uathúla a bhaintear isteach sa LiostaFillRange réimse agus dún an dialóg.
4. Déan céim 3 arís chun boscaí an dara liosta a athrú (Ainm) réimse go Mír sa Airíonna dialóg.
5. Cliceáil ar dheis ar an táb bileog agus roghnaigh Féach an cód ón roghchlár cliceáil ar dheis. Ansin cóipeáil thíos cód VBA isteach i bhfuinneog an Chóid. Féach ar an scáileán:
Cód VBA: Cruthaigh boscaí liosta cascáideacha dinimiciúla in Excel
Dim xPreStr As String
Private Sub Drink_Click()
'Update by Extendoffice 2018/06/04
Dim I, xRows As Long
Dim xRg As Range
Dim xRegStr As String
Application.ScreenUpdating = False
xRegStr = Me.Drink.Text
Set xRg = Range("A2:A11")
xRows = xRg.Rows.Count
If xRegStr <> xPreStr Then
Me.Item.Clear
'Me.OtherListBoxName.Clear
Set xRg = xRg(1)
For I = 1 To xRows
If xRg.Offset(I - 1).Value = xRegStr Then
Me.Item.AddItem xRg.Offset(I - 1, 1).Value
'Me.OtherListBoxName.AddItem xRg.Offset(I - 1, 2).Value
End If
Next
xPreStr = xRegStr
End If
Application.ScreenUpdating = True
End Sub
nótaí: Sa chód Dí agus Mír is ainmneacha dhá bhosca liosta, iad a athrú go dtí do ainmneacha féin.
6. Brúigh an Eile + Q eochracha chun an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.
7. Múch an Mód Dearaidh trí chliceáil Forbróir > Mód Dearaidh.
As seo amach, nuair a roghnaítear deoch de chineál ar bith ar nós Caife sa bhosca liosta tuismitheoirí, taispeánfar gach rud caife sa dara ceann. Ní thaispeánfaidh Roghnaigh Tae nó Fíon ach na míreanna tae nó fíona sa bhosca dara liosta. Féach ar an scáileán:
Earraí gaolmhara:
- Conas cill liosta anuas spleách spleách a ghlanadh tar éis duit athrú a roghnú in Excel?
- Conas liostaí anuas cascáideacha spleácha a chruthú in Excel?
- Conas cealla eile a daonra go huathoibríoch agus luachanna á roghnú ar liosta anuas Excel?
- Conas féilire liosta anuas a chruthú in Excel?
- How chun roghanna boscaí liosta ActiveX a shábháil nó a choinneáil 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á!