Note: The other languages of the website are Google-translated. Back to English

Conas liosta anuas a chruthú le ticbhoscaí iolracha in Excel?

Is iondúil go gcruthóidh a lán úsáideoirí Excel liosta anuas le ilbhoscaí seiceála d’fhonn míreanna éagsúla a roghnú ón liosta in aghaidh na huaire. I ndáiríre, ní féidir leat liosta a chruthú le ilbhoscaí seiceála le Bailíochtú Sonraí. Sa rang teagaisc seo, táimid chun dhá mhodh a thaispeáint duit chun liosta anuas a chruthú le ticbhoscaí iolracha in Excel.

Úsáid Bosca Liosta chun liosta anuas a chruthú le ilbhoscaí seiceála
A: Cruthaigh bosca liosta le sonraí foinse
B: Ainmnigh an chill ina bhfaighidh tú na míreanna roghnaithe
C: Cuir cruth isteach chun cabhrú leis na míreanna roghnaithe a aschur
Cruthaigh liosta anuas go héasca le ticbhoscaí le huirlis iontach
Tuilleadh ranganna teagaisc don liosta anuas ...


Úsáid Bosca Liosta chun liosta anuas a chruthú le ilbhoscaí seiceála

Mar atá thíos an pictiúr a thaispeántar, sa bhileog oibre reatha, beidh gach ainm i raon A2: A11 mar bhunfhoinsí sa bhosca liosta. Is féidir le cliceáil ar an gcnaipe i gcill C4 na míreanna roghnaithe a aschur, agus taispeánfar gach earra roghnaithe sa bhosca liosta i gcill E4. Chun é seo a bhaint amach, déan mar a leanas le do thoil.

A. Cruthaigh bosca liosta le sonraí foinse

1. cliceáil Forbróir > Ionsáigh > Bosca Liosta (Rialú Gníomhach X). Féach an pictiúr:

2. Tarraing bosca liosta sa bhileog oibre reatha, cliceáil ar dheis air agus ansin roghnaigh Airíonna ón roghchlár cliceáil ar dheis.

3. Sa Airíonna bosca dialóige, ní mór duit a chumrú mar seo a leanas.

  • 3.1 Sa LiostaFillRange bosca, cuir isteach an raon foinse a thaispeánfaidh tú ar an liosta (cuirim isteach an raon anseo A2: A11);
  • 3.2 Sa LiostaStyle bosca, roghnaigh StílOption 1 - fmList;
  • 3.3 Sa Il-Roghnú bosca, roghnaigh 1 - fmMultiSelectMulti;
  • 3.4 Dún an Airíonna bosca dialóige. Féach an pictiúr:

B: Ainmnigh an chill ina bhfaighidh tú na míreanna roghnaithe

Más gá duit gach earra roghnaithe a aschur i gcill shonraithe mar E4, déan mar a leanas le do thoil.

1. Roghnaigh an chill E4, iontráil ListBoxAschur isteach sa Ainm Bosca agus brúigh an Iontráil eochair.

C. Cuir cruth isteach chun cabhrú leis na míreanna roghnaithe a aschur

1. cliceáil Ionsáigh > cruthanna > Dronuilleog. Féach an pictiúr:

2. Tarraing dronuilleog i do bhileog oibre (tarraingím an dronuilleog anseo i gcill C4). Ansin cliceáil ar dheis ar an dronuilleog agus roghnaigh Macra a shannadh ón roghchlár cliceáil ar dheis.

3. Sa Macra a shannadh bosca dialóige, cliceáil an Nua cnaipe.

4. San oscailt Microsoft Visual Basic d’Fheidhmchláir fuinneog, cuir an bunchód sa Modúil fuinneog leis an gcód VBA thíos.

Cód VBA: Cruthaigh liosta le ilbhoscaí

Sub Rectangle1_Click()
'Updated by Extendoffice 20200730
Dim xSelShp As Shape, xSelLst As Variant, I, J As Integer
Dim xV As String
Set xSelShp = ActiveSheet.Shapes(Application.Caller)
Set xLstBox = ActiveSheet.ListBox1
If xLstBox.Visible = False Then
    xLstBox.Visible = True
    xSelShp.TextFrame2.TextRange.Characters.Text = "Pickup Options"
    xStr = ""
    xStr = Range("ListBoxOutput").Value
    
    If xStr <> "" Then
         xArr = Split(xStr, ";")
    For I = xLstBox.ListCount - 1 To 0 Step -1
        xV = xLstBox.List(I)
        For J = 0 To UBound(xArr)
            If xArr(J) = xV Then
              xLstBox.Selected(I) = True
              Exit For
            End If
        Next
    Next I
    End If
Else
    xLstBox.Visible = False
    xSelShp.TextFrame2.TextRange.Characters.Text = "Select Options"
    For I = xLstBox.ListCount - 1 To 0 Step -1
        If xLstBox.Selected(I) = True Then
        xSelLst = xLstBox.List(I) & ";" & xSelLst
        End If
    Next I
    If xSelLst <> "" Then
        Range("ListBoxOutput") = Mid(xSelLst, 1, Len(xSelLst) - 1)
    Else
        Range("ListBoxOutput") = ""
    End If
End If
End Sub

Nóta: Sa chód, Dronuilleog1 an t-ainm cruth; LiostaBox1 is ainm don bhosca liosta; Roghnaigh Roghanna agus Roghanna Pickup an bhfuil na téacsanna ar taispeáint den chruth; agus an ListBoxAschur is ainm raon na cille aschuir. Is féidir leat iad a athrú bunaithe ar do chuid riachtanas.

5. Brúigh Eile + Q eochracha ag an am céanna chun an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

6. Déanfaidh cliceáil ar an gcnaipe dronuilleog an bosca liosta a fhilleadh nó a leathnú. Nuair a bhíonn an bosca liosta ag leathnú, seiceáil na míreanna sa bhosca liosta, agus ansin cliceáil an dronuilleog arís chun gach earra roghnaithe a aschur i gcill E4. Féach thíos an taispeántas:

7. Agus ansin sábháil an leabhar oibre mar Leabhar Oibre Excel MacroEnable chun an cód a athúsáid sa todhchaí.


Cruthaigh liosta anuas le boscaí seiceála le huirlis iontach

Tá an modh thuas ró-ildánach le láimhseáil go héasca. Seo a mholadh go mór an Liosta anuas le Boscaí Seiceála fóntais de Kutools le haghaidh Excel chun cabhrú leat liosta anuas a chruthú go héasca le boscaí seiceála i raon sonraithe, bileog oibre reatha, leabhar oibre reatha nó gach leabhar oibre oscailte bunaithe ar do chuid riachtanas. Féach an taispeántas thíos:
Íoslódáil agus bain triail as anois! (Conair saor in aisce 30 lá)

Chomh maith leis an taispeántas thuas, soláthraímid treoir céim ar chéim freisin chun a thaispeáint conas an ghné seo a chur i bhfeidhm chun an tasc seo a bhaint amach. Déan mar a leanas le do thoil.

1. Oscail an bhileog oibre a bhfuil liosta anuas bailíochtaithe sonraí socraithe agat, cliceáil Kutools > Liosta anuas > Liosta anuas le Boscaí Seiceála > Socruithe. Féach an pictiúr:

2. Sa Socraigh Boscaí Seiceála le liosta anuas bosca dialóige, cumraigh mar a leanas le do thoil.

  • 2.1) Sa Cuir iarratas isteach roinn, sonraigh an raon feidhme feidhmeach ina gcruthóidh tú boscaí seiceála le haghaidh earraí ar an liosta anuas. Is féidir leat a raon áirithe, bileog oibre reatha, leabhar oibre reatha or gach leabhar oibre oscailte bunaithe ar do chuid riachtanas.
  • 2.2) Sa mód roinn, roghnaigh stíl ar mhaith leat na míreanna roghnaithe a aschur;
  • Seo a thógann an Athraigh rogha mar shampla, má roghnaíonn tú é seo, athrófar luach na cille bunaithe ar na míreanna roghnaithe.
  • 2.3) Sa deighilteoir bosca, iontráil teorantóir a úsáidfidh tú chun na míreanna iolracha a scaradh;
  • 2.4) Sa Treo Téacs roinn, roghnaigh treo téacs bunaithe ar do chuid riachtanas;
  • 2.5) Cliceáil ar an OK cnaipe.

3. An chéim dheireanach, cliceáil Kutools > Liosta anuas > Liosta anuas le Boscaí Seiceála > Cumasaigh Liosta Boscaí Seiceála anuas chun an ghné seo a ghníomhachtú.

As seo amach, nuair a chliceálann tú na cealla le liosta anuas i raon feidhme sonraithe, popfaidh bosca liosta suas, roghnaigh míreanna le do thoil trí na ticbhoscaí a sheiceáil le haschur isteach i gcill mar a thaispeántar an taispeántas thíos (Tóg an modh Athraigh mar shampla ).

Le haghaidh tuilleadh sonraí faoin ngné seo, tabhair cuairt anseo.

  Más mian leat triail saor in aisce (30 lá) a bheith agat ar an bhfóntas seo, cliceáil le do thoil chun é a íoslódáil, agus ansin téigh chun an oibríocht a chur i bhfeidhm de réir na gcéimeanna thuas.


Earraí gaolmhara:

Uath-chomhiomlán agus tú ag clóscríobh liosta anuas Excel
Má tá liosta anuas bailíochtaithe sonraí agat le luachanna móra, ní mór duit scrollú síos ar an liosta chun an ceann ceart a fháil, nó an focal iomlán a chlóscríobh go díreach sa bhosca liosta. Má tá modh ann chun ligean do uathoibríoch a chomhlánú agus an chéad litir á chlóscríobh ar an liosta anuas, beidh gach rud níos éasca. Soláthraíonn an teagaisc seo an modh chun an fhadhb a réiteach.

Cruthaigh liosta anuas ó leabhar oibre eile in Excel
Tá sé furasta go leor liosta anuas bailíochtaithe sonraí a chruthú i measc bileoga oibre i leabhar oibre. Ach má aimsíonn na sonraí liosta atá uait le haghaidh bailíochtú na sonraí i leabhar oibre eile, cad a dhéanfá? Sa rang teagaisc seo, foghlaimeoidh tú conas liosta titim anuas a chruthú ó leabhar oibre eile in Excel go mion.

Cruthaigh liosta anuas inchuardaithe in Excel
Maidir le liosta anuas le go leor luachanna, ní obair éasca é ceann ceart a aimsiú. Roimhe seo thugamar isteach modh chun an liosta anuas a chomhlánú go huathoibríoch nuair a chuireann tú an chéad litir isteach sa bhosca anuas. Chomh maith leis an bhfeidhm uathchomhiomlán, is féidir leat an liosta anuas a chuardach chun an éifeachtúlacht oibre a fheabhsú chun luachanna cearta a fháil ar an liosta anuas. Chun an liosta anuas a chuardach inchuardaithe, bain triail as an modh sa rang teagaisc seo.

Déan cealla eile a uathoibriú nuair a bhíonn luachanna á roghnú agat ar liosta anuas Excel
Ligean le rá gur chruthaigh tú liosta anuas bunaithe ar na luachanna i raon cille B8: B14. Nuair a roghnaíonn tú luach ar bith ar an liosta anuas, ba mhaith leat go ndéanfaí na luachanna comhfhreagracha i raon cille C8: C14 a dhaonra go huathoibríoch i gcill roghnaithe. Chun an fhadhb a réiteach, is fearr leat na modhanna sa rang teagaisc seo.

Tuilleadh ranganna teagaisc don liosta anuas ...


Na hUirlisí Táirgiúlachta Oifige is Fearr

Réitíonn Kutools for Excel an chuid is mó de do chuid Fadhbanna, agus Méadaíonn sé do Tháirgiúlacht 80%

  • Athúsáid: Cuir isteach go tapa foirmlí casta, cairteacha agus aon rud a d'úsáid tú roimhe seo; Cealla a Chriptiú le pasfhocal; Cruthaigh Liosta Ríomhphoist agus seol ríomhphoist ...
  • Barra Foirmle Super (cuir línte iolracha téacs agus foirmle in eagar go héasca); Leagan Amach Léitheoireachta (líon mór cealla a léamh agus a chur in eagar go héasca); Greamaigh go dtí an Raon Scagtha...
  • Cumaisc Cealla / Sraitheanna / Colúin gan Sonraí a chailleadh; Ábhar Cealla Scoilt; Comhcheangail Sraitheanna / Colúin Dúblacha... Cill Dúblach a Chosc; Déan comparáid idir Ranganna...
  • Roghnaigh Dúblach nó Uathúil Sraitheanna; Roghnaigh Blank Rows (tá na cealla uile folamh); Aimsigh Super agus Fuzzy Aimsigh i go leor Leabhar Oibre; Roghnaigh go randamach ...
  • Cóip Díreach Cealla Il gan tagairt fhoirmle a athrú; Tagairtí Cruthaigh Auto chuig Bileoga Il; Cuir Urchair isteach, Boscaí Seiceála agus go leor eile ...
  • Sliocht Téacs, Cuir Téacs leis, Bain de réir Poist, Bain Spás; Subtotals Paging a chruthú agus a phriontáil; Tiontaigh Idir Ábhar Cealla agus Tráchtanna...
  • Scagaire Super (scéimeanna scagaire a shábháil agus a chur i bhfeidhm ar bhileoga eile); Ard-Sórtáil de réir míosa / seachtaine / lae, minicíocht agus níos mó; Scagaire Speisialta le cló trom, iodálach ...
  • Comhcheangail Leabhair Oibre agus Bileoga Oibre; Cumaisc Táblaí bunaithe ar eochaircholúin; Roinn Sonraí i Ilbhileoga; Baisc Tiontaigh xls, xlsx agus PDF...
  • Níos mó ná 300 gné chumhachtach. Tacaíochtaí Office / Excel 2007-2019 agus 365. Tacaíonn sé le gach teanga. Imscaradh éasca i d’fhiontar nó d’eagraíocht. Gnéithe iomlána triail saor in aisce 30 lá. Ráthaíocht ar ais airgid 60 lá.
cluaisín kte 201905

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á!
bun officetab
Sórtáil tuairimí de réir
Comments (67)
Níl rátálacha ar bith fós. Bí ar an gcéad duine a rátáil!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Tá sé seo iontach. Ach beidh sé níos fearr más féidir an ilroghnú a chur san áit a bhfuil an cúrsóir gníomhach. Ní gá an méid a shonraíonn an cód.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Is é seo go díreach a bhí á lorg agam, an féidir an cód a mhodhnú chun ligean do na sonraí roghnaithe a thaispeáint i gcealla ar leith síos sa cholún? mar sin in ionad: Dé Luain, Dé Máirt, Dé Céadaoin, taispeáint mar. Dé Luain Dé Máirt Dé Céadaoin
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Seo díreach an rud a bhí á lorg agam, an bhfuil modhnú ar an gcód a chuirfidh an chéad rogha eile ón mbosca liosta sa chéad líne eile. for eg a haon a dó a trí In ionad : a haon, a dó, a trí
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
an féidir leat a mhíniú le do thoil conas a chuir tú ListBoxOutput leis ar chill E4
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit Conas is féidir an bosca liosta seo a chóipeáil le haghaidh ilcheall. Just a chóipeáil agus a ghreamú nach bhfuil ag obair. An bhféadfá a mhíniú mar shampla i ngach cill (E5, E6, E7, E8,...) conas is féidir liom an bosca roghnaithe seo a chur?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
an bhféadfá a mhíniú le do thoil conas is féidir liom an bosca liosta seo a chóipeáil go héasca do 100 ró? (boscaí liosta ar leith do gach ceann de 100 sraith)
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Nuair a bheidh an t-aschur déanta agus brúigh an cnaipe arís, ní féidir na míreanna roghnaithe roimhe seo sa bhosca liosta a athrú. Conas a réiteach?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Go raibh maith agat! Tá sé iontach agus oibríonn sé!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Is newbie mé leis seo ach an féidir le duine ar bith a insint dom conas a chruthú ListBox il-roghnaithe a osclóidh, m.sh., nuair a roghnaigh mé ainm. Ba mhaith liom go n-oirfeadh an bosca liosta i gceann amháin.
SAMPLA: Tá liosta ainmneacha agam le faisnéis teagmhála, srl. Ba mhaith liom Bosca Liosta dúblach a chruthú do gach ainm ar mo liosta. Ba mhaith liom é a oscailt go huathoibríoch nuair a roghnaíonn mé ainm agus nuair a thitim ar ais sa chill nuair a théim chuig sraith eile faisnéise. Tabhair comhairle, le do thoil. Go raibh maith agat roimh ré.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
A Randy a chara,
Ár leithscéal ní féidir an fhadhb seo a réiteach.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Oibríonn sé go foirfe de réir na dtreoracha, Mar sin féin má chosnaíonn mé an leathán tugann sé agus earráid. Aon réiteach le haghaidh seo?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Oibrigh go foirfe de réir na dtreoracha. Ach, Conas is féidir liom é seo a úsáid ar bhileog chosanta. Faoi láthair Má úsáidim é seo tar éis an leathán a chosaint Tugann sé dom agus earráid "Earráid am rite '-2147024809 (80070057)': Tá an Luach Sonraithe as Raon"
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
A Amit Sood a chara,
Sula ndéanfaidh tú an bhileog oibre a chosaint, formáid an chill Aschuir mar dhíghlasáil agus ansin cuir an cód VBA thíos i bhfeidhm. Go raibh maith agat as do thuairim.

Fo-dhronuilleog2_Cliceáil()
Dim xSelShp Mar Cruth, xSelLst Mar Athraitheach, I Mar Shlánuimhir
Ar Lean Earráid Aghaidh
Socraigh xSelShp = ActiveSheet.Shapes(Application.Caller)
Socraigh xLstBox = ActiveSheet.ListBox1
Má tá xLstBox.Visible = Bréagach Ansin
xLstBox.Visible = Fíor
xSelShp.TextFrame2.TextRange.Characters.Text = "Roghanna Pioc suas"
Eile
xLstBox.Visible = Bréagach
xSelShp.TextFrame2.TextRange.Characters.Text = "Roghnaigh Roghanna"
Do I = xLstBox.ListCount - 1 Go 0 Céim -1
Má tá xLstBox.Selected(I) = Fíor Ansin
xSelLst = xLstBox.List(I) & ";" & xSelLst
Deireadh Má
Ar Aghaidh I.
If xSelLst <>" " Ansin
Raon ("ListBoxOutput") = Lár (xSelLst, 1, Len(xSelLst) - 1)
Eile
Raon ("ListBoxOutput")=""
Deireadh Má
Deireadh Má
Fo Deireadh
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
"Chruthaigh mé comhad ag baint úsáide as bosca liosta ActiveX mar a mhínítear duit, tá roinnt sonraí iontráil agam agus agus chuir mé roinnt airíonna freisin. an comhad a athoscailt níl aon sonraí seiceála á thaispeáint aige...an féidir le haon duine moladh a thabhairt dom na nuashonruithe sin a shábháil."
An féidir le haon duine cabhrú liom le do thoil.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dea-Lá,
Cuir an cód VBA thíos isteach i bhfuinneog cód ThisWorkbook.
Sa chód, is é Sheet6 an t-ainm réamhshocraithe ar an mbileog oibre ina bhfuil an Bosca Liosta is mian leat na roghanna a choinneáil mar a thaispeántar an scáileán thíos. Agus is é ListBox1 ainm an bhosca liosta. Athraigh iad de réir mar is gá duit.

Foleabhar Oibre Príobháideach_BeforeSave(ByVal SaveAsUI Mar Boole, Cealaigh Mar Boole)
Glaoigh ar SaveRoghanna
Fo Deireadh

Foleabhar Oibre Príobháideach_Oscail()
Glaoigh ar RestoreSelections
Fo Deireadh

Fo-Roghanna Sábháil Príobháideacha()

Dim arr() Mar mhalairt, i Chomh Fada, j Chomh Fada

Le Sheet6.OLEOobjects("ListBox1").Réad
Más rud é .ListIndex> 0 Ansin
Chun i = 0 Chun .ListCount - 1
Má .Roghnaithe(i) Ansin
j = j+1
ReDim Preserve arr(1 Go j)
arr(j) = i
Deireadh Má
Ar Aghaidh
Names.Add Name:="Roghcháin", TagairtíTo:=arr, Infheicthe:=Bréagach
Deireadh Má
Deireadh Le

Fo Deireadh

Fo-Roghanna Príobháideacha Athchóirithe()

Dim arr Mar Athraitheach, i Mar Shlánuimhir

arr = [Roghcháin]

Le Sheet6.OLEOobjects("ListBox1").Réad
Chun i = 1 Go UBound(arr)
.Roghnaithe(arr(i)) = Fíor
Ar Aghaidh
Deireadh Le

Fo Deireadh
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Go raibh maith agat as an bhfreagra a dhuine uasail, ach níl sé ag obair i gcás mo chomhaid, an féidir leat d'aitheantas ríomhphoist a sheoladh chugat le do thoil, ionas gur féidir liom mo chomhad a sheoladh chugat.
Go raibh maith agat roimh ré
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Isac manjusha a chara,
Seol do chomhad chuig zxm@addin99.com. Tá súil agam gur féidir liom cabhrú.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Thairis sin, ní mór duit an leabhar oibre a shábháil mar Leabhar Oibre Excel Macra-chumas, agus an cód a ghníomhachtú gach uair a athraíonn tú roghanna an bhosca liosta.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Ba mhaith liom ainmneacha a nuashonrú go huathoibríoch i gcolúin éagsúla. an bhfuil sé indéanta más féidir an cód a roinnt liom.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
AMAZING sé ag obair ach tar éis dom an excel a dhúnadh agus é a oscailt arís tá an tseiceáil ón ticbhosca imithe mar sin má chliceálann mé an cnaipe beidh an liosta ar fad imithe aon réiteach dó seo
le do thoil duine éigin cabhrú liom
Go raibh míle maith agat roimh ré
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Aingeal a chara,
Tá alt foilsithe againn "Conas roghanna boscaí liosta ActiveX a shábháil nó a choinneáil in Excel?" a thugann isteach modh chun roghnú na mboscaí liostaí a shábháil tar éis iad a dhúnadh agus an leabhar oibre a athoscailt.
Is féidir leat an nasc seo a leanúint chun tuilleadh eolais a fháil: https://www.extendoffice.com/documents/excel/5051-excel-listbox-save-selection.html
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
iontach a oibríonn sé ach tá fadhb amháin agam tar éis dom an comhad a shábháil agus é a oscailt arís tá an tseiceáil go léir ón liosta ticbhosca imithe
an féidir leat cabhrú liom leis an gceann seo go raibh míle maith agat
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
freisin, athraíonn sé méid an bhosca liostaí agus cruth i gcónaí tar éis an comhad a shábháil agus a oscailt arís má tá réiteach ag duine ar an gceist seo cabhraigh liom

buíochas a ghabháil leat an oiread sin
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Marc a chara,
Tá alt foilsithe againn "Conas roghanna boscaí liosta ActiveX a shábháil nó a choinneáil in Excel?" a thugann isteach modh chun roghnú na mboscaí liostaí a shábháil tar éis iad a dhúnadh agus an leabhar oibre a athoscailt.
Is féidir leat an nasc seo a leanúint chun tuilleadh eolais a fháil: https://www.extendoffice.com/documents/excel/5051-excel-listbox-save-selection.html
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit,

Is dóigh liom an bhfuil bealach ann chun na roghanna piocadh a dhíriú chuig níos mó ná cill amháin (ní hamháin E4), nó seicliosta anuas a dhéanamh de na roghanna ionas gur féidir liom roghanna iomadúla a roghnú as seicliosta, ach é sin a dhéanamh arís agus arís eile agus neamhspleách ar an roghanna eile atá déanta agam. Mar shampla, conas a dhéanfainn an liosta céanna roghanna piocadh a úsáid chun rogha éagsúil míreanna a ionchur go E5, E6, E7, etc. ón liosta bailithe céanna.

Go raibh maith agat
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dia duit LizKats,
Bain triail as an gcód thíos. Tá súil agam gur féidir liom cabhrú. Go raibh maith agat.

Fo-dhronuilleog2_Cliceáil()

' arna nuashonrú ag Extendoffice 20200529

Dim xSelShp Mar Cruth, xSelLst Mar Athraitheach, i Mar Shlánuimhir

Socraigh xSelShp = ActiveSheet.Shapes(Application.Caller)

Socraigh xLstBox = ActiveSheet.ListBox1

Dim xRg Mar Raon

Dim xCount, xFNum, xR, xC Mar Shlánuimhir

Dim xStr Mar Teaghrán

Má tá xLstBox.Visible = Bréagach Ansin

xLstBox.Visible = Fíor

xSelShp.TextFrame2.TextRange.Characters.Text = "Roghanna Pioc suas"

Eile

xLstBox.Visible = Bréagach

xSelShp.TextFrame2.TextRange.Characters.Text = "Roghnaigh Roghanna"

Socraigh xRg = Raon ("ListBoxOutput")

xCount = xLstBox.ListCount - 1

xStr=""

Le haghaidh i = xLstBox.ListCount - 1 Go 0 Céim -1

Má tá xLstBox.Selected(i) = Fíor Ansin

xStr = xLstBox.List(i) & ";" & xStr

Deireadh Má

Ar Aghaidh i



Má xRg.Value="" Ansin

xRg.Value = xStr

Eile

Socraigh xRg = xRg.Offset(1, 0)

Déan Cé go bhfuil xRg.Value <>"""

Socraigh xRg = xRg.Offset(1, 0)

Lúb

xRg.Value = xStr

Deireadh Má

Deireadh Má

Fo Deireadh
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Tá sé ag obair go breá, go raibh míle maith agat as do chabhair. Tá ceist amháin agam anseo ná go bhfuil an t-aschur go léir ag teacht sa chill chéanna E4, conas is féidir linn an t-aschur a fháil i gcealla éagsúla m.sh.: aschur le haghaidh C4 in E4, C5 in E5 , C6 in E6 etc.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dea-Lá,
Ní féidir an fhadhb a luaigh tú a réiteach go fóill.
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Dóbair! póite.
Как сделать так чтобы каждое значение выходило на новой клетке? чтобы по выходило по вертикали?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
CABHRÚ!!! conas aschur i raonta éagsúla (go hingearach)?
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Fo-dhronuilleog2_Cliceáil()
' arna nuashonrú ag Extendoffice 20190924
Dim xSelShp Mar Cruth, xSelLst Mar Athraitheach, I Mar Shlánuimhir
Dim xRg Mar Raon
Socraigh xSelShp = ActiveSheet.Shapes(Application.Caller)
Socraigh xLstBox = ActiveSheet.ListBox1
Má tá xLstBox.Visible = Bréagach Ansin
xLstBox.Visible = Fíor
xSelShp.TextFrame2.TextRange.Characters.Text = "Roghanna Pioc suas"
Eile
xLstBox.Visible = Bréagach
xSelShp.TextFrame2.TextRange.Characters.Text = "Roghnaigh Roghanna"
Socraigh xRg = Raon ("ListBoxOutput")
Do I = 0 Go xLstBox.ListCount - 1
Má tá xLstBox.Selected(I) = Fíor Ansin
xSelLst = xLstBox.List(I)
xRg.Value = Lár(xSelLst, 1, Len(xSelLst))
Socraigh xRg = xRg.Offset(1, 0)
Deireadh Má
Ar Aghaidh I.
Deireadh Má
Fo Deireadh
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Conas a macasamhail éste ejercicio en las filas inferiores ?
Conas is féidir liom an cleachtadh seo a mhacasamhlú sna sraitheanna thíos?
Níl aon tráchtanna curtha suas anseo go fóill
Luchtaigh More
Fág do chuid tuairimí
Ag postáil mar Aoi
×
Ráta an post seo:
0   Carachtair
Suímh Molta