Tabl cynnwys
Yn dibynnu ar yr amgylchiadau efallai y bydd angen i chi ddewis gwerthoedd lluosog o fewn rhestr gwympo. Yn y tiwtorial hwn, rydyn ni'n mynd i ddangos i chi sut i wneud dewis lluosog mewn cwymplen. Ar gyfer y sesiwn hon, rydym yn defnyddio Excel 2019, mae croeso i chi ddefnyddio'r fersiwn sydd orau gennych.
Cyn plymio i mewn i'r sesiwn, gadewch i ni ddod i wybod am y set ddata sy'n sail i'n henghreifftiau.
<0
Yma mae gennym sawl elfen o ddeunydd ysgrifennu, gan ddefnyddio’r rhain byddwn yn creu cwymplen a dewis eitemau lluosog yno.
Sylwer mai set ddata syml yw hon i gadw pethau’n syml . Mewn sefyllfa ymarferol, efallai y byddwch yn dod ar draws set ddata llawer mwy a chymhleth.
Gweithlyfr Ymarfer
Mae croeso i chi lawrlwytho'r gweithlyfr ymarfer o'r ddolen isod.
Gwneud Dewis Lluosog o'r Rhestr Gwymp.xlsm
Dewis Lluosog mewn Rhestr Gwymp
Yn gyntaf oll, mae angen i ni greu cwymplen ar sail ein deunydd ysgrifennu. Gadewch i ni ei greu yn gyflym. Peidiwch ag oedi cyn ymweld â'r erthygl ynghylch creu cwymprestr.
Yn y blwch deialog Dilysu Data dewiswch y math data RHESTR a mewnosodwch y amrediad cell yr eitemau.
B4:B11 yw'r amrediad sy'n dal yr elfennau papurach. Nawr fe welwch y gwymplen.
Darllenwch fwy: Rhestr gwympo Excel Yn dibynnu ar y Dewis
1. DewiswchEitemau Lluosog (Caniatáu Dewis Dyblyg)
Mae gwymplen gonfensiynol bob amser yn dewis un eitem. Yma gallwch weld, rydym wedi dewis Pen o'r rhestr (llun isod).
>
Nawr, os byddwn yn dewis eitem arall, gadewch i ni ddweud Pensil
yna bydd yn disodli'r gwerth blaenorol. Dim ond Pensil fydd yn parhau i gael ei ddewis.
I ddewis mwy nag un eitem, mae angen i ni ddefnyddio'r cod VBA . Agorwch y ffenestr Microsoft Visual Basic for Applications (pwyswch ALT + F11 i'w hagor).
Nawr cliciwch ddwywaith ar enw neu rif y daflen waith lle rydych chi am ddewis eitemau lluosog o fewn y gwymplen. Fe welwch y ffenestr cod ar gyfer y ddalen benodol honno.
Yma, mae ffenestr cod ar gyfer Taflen2 yn ein llyfr gwaith (mae gennym y gwymplen rhestr yn y ddalen hon).
Unwaith y bydd ffenestr y cod wedi'i hagor, rhowch y cod canlynol yno
5996
Cadw'r cod, a nawr ceisiwch ddewis gwerthoedd yn y gwymplen.
Ar ôl dewis Pensil , rydym yn mynd i ddewis eitem arall Llyfr Nodiadau . A gallwch weld, fe ddaethon ni o hyd i'r ddwy eitem (llun isod).
Bydd y cod hwn yn ein galluogi i ailadrodd y dewis. Gadewch i ni ddweud os byddwn yn dewis Pensil eto,
byddwn yn dod o hyd i'r eitem eto yn y blwch dewis.
Eglurhad Cod
Rydym wedi datgan dau llinyn Hen Werth a Newvalue .
Gallwch weld ein bod wedi gwneud y gwymplen yn y gell D4 , dyna pam mai D4 yw ein cyfeiriad targed. Ac yn ogystal, rydym wedi ailwirio a yw'r gell yn defnyddio dilysiad data neu ddim yn defnyddio Target.SpecialCells .
Unwaith y bydd gwerth wedi'i ddewis, rydym wedi diffodd digwyddiadau ( Application.EnableEvents = False ) felly nid yw newidiadau' t sbarduno'r digwyddiad eto. Yna storio'r eitem a ddewiswyd yn y Gwerth Newydd .
Ar ôl dadwneud y newid, rydym wedi gosod y gwerth yn yr Hen Werth . Yna gwiriwch a yw'r Hen Werth yn wag ai peidio. Os yw'n wag (sy'n golygu mai dim ond un gwerth sy'n cael ei ddewis), yna dychwelwch y Gwerth Newydd . Fel arall, cydgadwynwch yr Hen Werth a Gwerth Newydd .
Cyn gorffen ailosod y digwyddiad, fel y gallwn newid os oes angen.
Darllen mwy: Rhestr Gollwng Dibynnol Lluosog Excel VBA
2. Dewiswch Eitemau Lluosog O'r Rhestr Gollwng (Detholiad Unigryw yn Unig)
Yn yr adran gynharach , rydym wedi gweld y detholiadau lluosog lle caniatawyd ailadrodd. Os nad ydych chi eisiau hynny, yna dilynwch yr adran hon.
Er hwylustod, fe ddefnyddion ni ddalen ar wahân ar gyfer yr arddangosiad hwn. Y tro hwn rydyn ni ar Daflen3. Ysgrifennwch y cod canlynol yn y ffenestr cod ar gyfer y ddalen hon.
5658
A oes unrhyw wahaniaeth o gymharu â'r cod cynharach! Edrychwch yn agosach, byddwch yn gallu gweld y gwahaniaeth bach.
Yma rydym wedi defnyddio ffwythiant VBA o'r enw INSTR . Mae'r ffwythiant INSTR yn dychwelyd lleoliad digwyddiad cyntaf is-linyn mewn llinyn. Ewch i'r erthygl INSTR hon am ragor o wybodaeth.
Gan ddefnyddio'r gweithrediad rhesymegol hwn gydag InStr(1, Oldvalue, Newvalue) = 0, rydym wedi gwirio a ddarganfuwyd y gwerthoedd ai peidio. Os yw'r gweithrediad rhesymegol yn dychwelyd TRUE (heb ei ganfod ynghynt) yna mae'n caniatáu dewis yr eitem a'i gyd-gysylltu â'r gwerth cynharach.
Cadw'r cod a nawr ceisiwch ddewis eitem sydd eisoes wedi'i ddewis.
Yma rydym eisoes wedi dewis Pensil , os ydym am ddewis hwnnw eto, ni allwn. Nid yw'n caniatáu gwerthoedd dyblyg.
Darllenwch fwy: Sut i Greu Rhestr Gollwng O Daflen Arall yn Excel
3. Dewiswch Eitemau yn Newline
Hyd yn hyn, rydym wedi darganfod bod yr eitemau wedi'u gwahanu gan goma. Yn yr adran hon, byddwn yn trefnu'r eitemau a ddewiswyd mewn llinellau newydd.
Er mwyn symlrwydd, rydym yn cyfuno ychydig o gelloedd â'r gell D4 . I wneud hynny, dewiswch y celloedd yr ydych am eu cyfuno a chliciwch Uno & Canolbwyntiwch o adran Aliniad y tab Cartref .
Bydd y gell yn codi mwy o uchder.
Nawr, gadewch i ni edrych ar y cod ar gyfer gwahanu eitemau trwy linell newydd. Defnyddiwch y cod canlynol
3641
Yr unig wahaniaeth o'r cod blaenorol yw ein bod wedi defnyddio vbNewLine y tro hwn rhwng OldValue a Gwerth Newydd .
Mae vbNewLine yn darparu llinell newydd rhwng yr eitemau.
Nawr dewiswch yr eitemau.
1>
Rydym yn dewis eitem Pen sy'n dangos yn y ddelwedd uchod. Nawr dewiswch elfen arall.
Fe welwch fod y ddwy eitem mewn llinellau gwahanol.
Yma mae gennym ddwy gwerthoedd, sydd mewn dwy linell wahanol. Bydd dewis gwerth arall yn ychwanegu hynny at linell arall. Bydd pob gwerth mewn llinell newydd.
Sylwer os ydych am i amffinydd arall wahanu'r eitemau, defnyddiwch hwnnw o fewn dyfynodau dwbl yn lle vbNewline .
Casgliad
Dyna'r cyfan ar gyfer heddiw. Rydym wedi rhestru sawl dull o wneud dewisiadau lluosog mewn cwymplen. Gobeithio y bydd hyn yn ddefnyddiol i chi. Mae croeso i chi wneud sylwadau os yw unrhyw beth yn ymddangos yn anodd ei ddeall. Rhowch wybod i ni am unrhyw ddulliau eraill yr ydym wedi'u methu yma.
