Clàr-innse
Tha an liosta tuiteam-sìos clasaigeach ann an duilleag Excel sgoinneil, ach cha leig e leat ach aon roghainn a thaghadh bhon t-seata a tha air a thaisbeanadh. Uaireannan is e seo dìreach na tha thu ag iarraidh, ach tha suidheachaidhean ann far am feum an neach-cleachdaidh a bhith comasach air taghadh cuid eileamaidean bhon liosta.
Bheir sinn sùil air grunn ghnìomhan àbhaisteach de liosta ioma-thaghadh mar sin.
Roghainn 1. Cothromach
Bidh an neach-cleachdaidh a’ taghadh nithean bhon liosta tuiteam-sìos aon ri aon, agus tha coltas ann gu bheil iad air taobh deas na cealla ag atharrachadh, gan liostadh gu còmhnard gu fèin-ghluasadach:
Tha liostaichean tuiteam-sìos ann an ceallan C2: C5 san eisimpleir seo air an cruthachadh ann an dòigh àbhaisteach, ie
- tagh ceallan C2: C5
- tab no clàr-taice Dàta tagh sgioba Dearbhadh Dàta
- san uinneag a tha a’ fosgladh, tagh roghainn List agus sònraich mar raon Stòr ceallan le dàta tùsail airson liosta A1:A8
An uairsin feumaidh tu macro a chur ris a 'mhodal duilleag, a nì a' phrìomh obair gu lèir, ie cuir luachan taghte air taobh deas nan ceallan uaine. Gus seo a dhèanamh, cliog deas air an taba duilleag le liostaichean tuiteam-sìos agus tagh an àithne Còd tùs. Cuir a-steach an còd a leanas a-steach don uinneag deasaiche Visual Basic a tha a’ fosgladh:
Fo-dhuilleag-obrach prìobhaideach_Change(ByVal Target As Range) Air Mearachd Ath-thòisich air adhart Mura h-eil Eadar-ghearradh (Targaid, Raon ("C2:C5"))) Gun dad agus Target.Cells.Count = 1 An uairsin Application.EnableEvents = Meallta Ma tha Len(Target.Offset) (0, 1)) = 0 An uairsin Target.Offset(0, 1) = Targaid Eile Target.End(xlToRight).Offset(0, 1) = Deireadh targaid ma tha Target.ClearContents Application.EnableEvents = Fìor chrìoch ma tha deireadh fo Ma tha feum air, cuir do cheann fhèin an àite an raon chugallach de na liostaichean tuiteam-sìos C2:C5 san dàrna loidhne den chòd seo.
Roghainn 2. Inghearach
An aon rud ris an dreach roimhe, ach chan eil na luachan taghte ùra air an cur ris an taobh cheart, ach aig a ’bhonn:
Tha e air a dhèanamh san aon dòigh, ach bidh còd macro an làimhseachaidh ag atharrachadh beagan:
Fo-dhuilleag-obrach prìobhaideach_Change(ByVal Target As Range) Air Mearachd Ath-thòisich air adhart Mura h-eil Eadar-ghearradh (Targaid, Raon ("C2:F2"))) Gun dad agus Target.Cells.Count = 1 An uairsin Application.EnableEvents = Meallta Ma tha Len(Target.Offset) (1, 0)) = 0 An uairsin Target.Offset(1, 0) = Targaid Eile Target.End(xlDown).Offset(1, 0) = Deireadh targaid ma tha Target.ClearContents Application.EnableEvents = Fìor chrìoch ma tha deireadh fo A-rithist, ma tha sin riatanach, cuir do chuid fhèin an àite an raon chugallach de na liostaichean tuiteam-sìos C2:F2 san dàrna loidhne den chòd seo.
Roghainn 3. Le cruinneachadh anns an aon chill
Anns an roghainn seo, tha an cruinneachadh a’ tachairt anns an aon chill far a bheil an liosta tuiteam-sìos. Tha na h-eileamaidean taghte air an sgaradh le caractar sònraichte (mar eisimpleir, cromag):
Tha liostaichean tuiteam-sìos ann an ceallan uaine air an cruthachadh ann an dòigh gu tur àbhaisteach, mar a bha sna dòighean roimhe. Tha an obair gu lèir air a dhèanamh, a-rithist, le macro anns a’ mhodal duilleig:
Fo-dhuilleag-obrach prìobhaideach_Change(ByVal Target As Range) Air Mearachd Ath-thòisich air adhart Mura h-eil eadar-sgaradh(Targaid, Raon ("C2:C5"))) Gun dad agus Target.Cells.Count = 1 An uairsin Application.EnableEvents = False newVal = Iarrtas targaid. oldval = Targaid Ma tha Len(oldval) <> 0 Agus oldval <> newVal An uairsin Targaid = Targaid & "," & newVal Else Target = newVal End Ma Ma tha Len(newVal) = 0 An uairsin Target.ClearContents Application.EnableEvents = Deireadh fìor Ma tha Deireadh Fo Ma thogras tu, faodaidh tu an caractar dealaiche (coma) anns an 9mh loidhne de chòd a chuir an àite leat fhèin (mar eisimpleir, àite no leth-dhuilleag).
- Mar a chruthaicheas tu liosta tuiteam-sìos sìmplidh ann an cealla duilleag excel
- Liosta tuiteam-sìos le susbaint
- Liosta tuiteam-sìos le roghainnean a tha a dhìth air a chur ris
- Dè a th’ ann am macros, mar a chleachdas tu iad, càite an cuir thu a-steach còd macro ann an Visual Basic