Skip i'r prif gynnwys

Archwiliwch y newydd, fersiwn am ddim o Kutools ar gyfer Outlook heddiw!

Sut i fewnosod rhestr ostwng cod lliw yn nhabl Word?

Awdur: Xiaoyang Wedi'i Addasu Diwethaf: 2024-08-01

Gan dybio, mae gen i dabl yn fy nogfen Word, a nawr, rydw i eisiau mewnosod rhestr ostwng cod lliw mewn colofn o'r tabl. Mae'n golygu pan fyddaf yn dewis un opsiwn o'r gwymplen, mae lliw'r gell yn dod yn goch, a phan fyddaf yn dewis opsiwn arall yn y gwymplen, daw lliw'r gell yn wyrdd fel y dangosir y llun a ddangosir. Sut allech chi ddatrys y swydd hon yn nogfen Word?

Demo yn dangos lliw cell yn newid pan fydd eitem yn cael ei dewis o'r gwymplen

Mewnosod rhestr ostwng cod lliw yn nogfen Word gyda chod VBA

Mewnosod rhestr ostwng cod lliw yn nogfen Word gyda chod VBA

Gall y camau canlynol eich helpu i orffen y dasg hon yn ôl yr angen, yn gyntaf, mewnosodwch y gwymplen, ac yna cymhwyso'r lliw ar gyfer y gwymplen. Gwnewch fel hyn:

1. Dewiswch gell yn y tabl lle rydych chi am fewnosod y gwymplen, ac yna cliciwch Datblygwr > Rheoli Cynnwys Rhestr Gollwng eicon, gweler y screenshot:

Botwm Rheoli Cynnwys Rhestr Gollwng ar y rhuban

2. Mewnosodir y gwymplen yn y gell benodol, ac yna cliciwch Datblygwr > Eiddo, gweler y screenshot:

Cwymp wedi'i osod mewn cell benodol gyda'r opsiwn Priodweddau wedi'i amlygu

3. Yn y Priodweddau Rheoli Cynnwys blwch deialog, gwnewch y gweithrediadau canlynol:

(1.) Rhowch enw'r teitl yn y Teitl blwch testun;

(2.) Cliciwch Ychwanegu botwm ewch i'r Ychwanegu Dewis deialog;

(3.) Yn y Ychwanegu Dewis deialog, teipiwch yr eitem rhestr ostwng yn y arddangos Enw blwch testun.

Blwch deialog Priodweddau Rheoli Cynnwys a blwch deialog Ychwanegu Dewis

4. Ailadroddwch Gam 3 i fewnosod eitemau rhestr ostwng eraill yn ôl yr angen.

5. Ar ôl creu'r gwymplen gyntaf, gallwch ei chopïo a'i gludo i gelloedd eraill yn ôl yr angen. Gweler y screenshot:

Rhestr gwympo wedi'i chopïo i gelloedd eraill

6. Yna dylech gymhwyso cod VBA, daliwch y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

7. Yn y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, cliciwch ddwywaith Y Ddogfen hon oddi wrth y Prosiect-Prosiect cwarel i agor y modd, ac yna copïo a gludo'r cod canlynol i'r modiwl gwag.

Cod VBA: Mewnosodwch y gwymplen â chôd lliw yn nhabl dogfen Word:

Private Sub Document_ContentControlOnExit(ByVal ContentControl As ContentControl, Cancel As Boolean)
With ContentControl.Range
    If ContentControl.Title = "Status" Then
        Select Case .Text
            Case "Complete"
                .Cells(1).Shading.BackgroundPatternColor = wdColorRed
            Case "In Progress"
                .Cells(1).Shading.BackgroundPatternColor = wdColorGreen
            Case "Not Start"
                .Cells(1).Shading.BackgroundPatternColor = wdColorBlue
            Case Else
                .Cells(1).Shading.BackgroundPatternColor = wdColorAutomatic
        End Select
    End If
End With
End Sub

Ffenestr VBA gyda ThisDocument wedi'i dewis, yn dangos cod wedi'i gludo i'r modiwl gwag

Nodyn: Yn y cod uchod, Statws yw'r enw teitl pan fyddwch chi'n creu'r gwymplen, a Cwblhau, Ar y gweill, Ddim yn Cychwyn yw eitemau'r gwymplen, gallwch eu newid i'ch un chi. A gallwch hefyd newid y lliw i'ch angen.

8. Yna arbedwch a chau ffenestr y cod, nawr, pan ddewiswch un eitem o'r gwymplen, bydd ei lliw cymharol yn cael ei llenwi â'r gell, gweler y screenshot:

Demo yn dangos lliw cell yn newid pan fydd eitem yn cael ei dewis o'r gwymplen

 

Offer Cynhyrchiant Swyddfa Gorau

Kutools am Word - Dyrchafu Eich Profiad Word gyda Dros 100 Nodweddion Rhyfeddol!

🤖 Nodweddion Kutools AI: Cynhyrchu Cynnwys / Ailysgrifennu Testun / Dogfen Holi ac Ateb / Cael Atebion Cyflym / Cyfieithu dogfennau / Dogfen Bwyleg (Fformat Cadw)...

📘 Meistrolaeth Dogfen: Tudalennau Hollti / Uno Dogfennau / Dewis Allforio mewn Fformatau Amrywiol (PDF/TXT/DOC/HTML...) / Trosi swp i PDF...

✏ Golygu Cynnwys: Darganfod Swp ac Amnewid ar draws Ffeiliau Lluosog / Newid Maint Pob Llun / Trawsosod Rhesi Bwrdd a Cholofnau / Trosi Tabl i Testun...

🧹 Ymdrech Glân: swap i ffwrdd Mannau Ychwanegol / Toriadau Adran / Blychau Testun / hypergysylltiadau / Am fwy o offer tynnu, ewch i'r Dileu grŵp...

➕ Mewnosodiadau Creadigol: mewnosod Mil o Wahanwyr / Blychau Gwirio / Botymau Radio / Cod QR / Cod Bar / Lluniau Lluosog / Darganfod mwy yn y Mewnosod grŵp...

🔍 Detholiadau Manwl: pinbwynt Tudalennau Penodol / Tablau / Siapiau / Pennawd Paragraffau / Gwella llywio gyda mwy dewiswch Nodweddion...

⭐ Gwelliannau Seren: Llywiwch i Unrhyw Leoliad / Awto-Mewnosod Testun Ailadroddus / Toglo Rhwng Windows Document / 11 Trosi offer...

Tabiau Kutools a Kutools Plus ar y Word Ribbon
???? Eisiau rhoi cynnig ar y nodweddion hyn? Dadlwythwch Kutools ar gyfer Word nawr! 🚀
 

Offer Cynhyrchiant Swyddfa Gorau

Kutools am Word - 100+ Offer ar gyfer Word

Lawrlwythiad Am Ddim Prynu Nawr Dysgwch fwy am Kutools