Sut i newid lliw blwch testun yn seiliedig ar werth yn Excel?
Yn Excel, gallwn gymhwyso'r swyddogaeth Fformatio Amodol i newid y lliw cefndir yn seiliedig ar werth celloedd, ond, yn yr erthygl hon, byddaf yn siarad am sut i newid lliw blwch testun yn seiliedig ar werth celloedd neu werth mewn blwch testun.
Newid lliw blwch testun yn seiliedig ar werth celloedd gyda chod VBA
Newid lliw blwch testun yn seiliedig ar werth mewn blwch testun gyda chod VBA
Newid lliw blwch testun yn seiliedig ar werth celloedd gyda chod VBA
Gadewch i ni ddweud, os yw gwerth celloedd yn A1 yn fwy na gwerth celloedd yn B1, rwyf am i'r blwch testun gael ei lenwi â lliw coch, i'r gwrthwyneb, dylai'r blwch testun gael ei lenwi â lliw melyn. Cyflawnwch y swydd hon gyda'r camau canlynol:
1. Mewnosod blwch testun trwy glicio Datblygwr > Mewnosod > Blwch Testun (Rheoli ActiveX), ac yna lluniwch flwch testun, gweler y screenshot:
2. Yna cliciwch ar y dde ar y blwch testun, a dewiswch Gweld y Cod o'r ddewislen cyd-destun i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, ac yna disodli'r cod gwreiddiol gyda'r cod VBA canlynol yn y modiwl gwag:
Cod VBA: Newid lliw blwch testun yn seiliedig ar werthoedd celloedd:
Private Sub TextBox1_Change()
If ActiveSheet.Range("A1").Value > ActiveSheet.Range("B1").Value Then
Me.TextBox1.BackColor = vbRed
Else
Me.TextBox1.BackColor = vbYellow
End If
End Sub
Nodyn: Yn y cod uchod, Blwch Testun1 yw'r enw blwch testun a fewnosodwyd gennych, A1 ac B1 yw'r ddwy gell rydych chi am newid lliw blwch testun yn seiliedig arnyn nhw, os gwelwch yn dda eu newid i'ch angen.
3. Yna arbedwch a chau ffenestr y cod, ac ewch allan o'r Modd dylunio, nawr, os yw cell A1 yn fwy na B1, pan fyddwch chi'n teipio testun yn y blwch testun, bydd yn cael ei lenwi â lliw coch, ac os yw A1 yn llai na B1, wrth nodi gwerth yn y blwch testun, bydd yn cael ei lenwi â lliw melyn, gweler y screenshot:
Newid lliw blwch testun yn seiliedig ar werth mewn blwch testun gyda chod VBA
Os ydych chi am newid lliw'r blwch testun yn seiliedig ar y gwerth mewn blwch testun, er enghraifft, pan fo'r gwerth yn y blwch testun rhwng 1 a 10, mae lliw llawn y blwch testun yn goch, mae lliw'r blwch testun yn wyrdd os yw'r gwerth rhwng 11 a 20, os yw gwerthoedd eraill, mae lliw y blwch testun yn felyn. I ddelio â'r dasg hon, cymhwyswch y cod VBA isod.
1. Ar ôl mewnosod blwch testun, cliciwch ar y dde, a dewiswch Gweld y Cod o'r ddewislen cyd-destun i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, ac yna disodli'r cod gwreiddiol gyda'r cod VBA canlynol yn y modiwl gwag:
Cod VBA: Newid lliw blwch testun yn seiliedig ar werth yn y blwch testun:
Private Sub TextBox1_Change()
On Error Resume Next
Select Case TextBox1.Value
Case 1 To 10:
TextBox1.BackColor = vbRed
Case 11 To 20:
TextBox1.BackColor = vbGreen
Case Else:
TextBox1.BackColor = vbYellow
End Select
End Sub
Nodyn: Yn y cod uchod, Blwch testun1 yw enw'r blwch testun rydych chi'n ei fewnosod, a gallwch chi newid y gwerthoedd a'r lliw cefndir yn y cod i'ch un chi.
2. Yna arbedwch a chau ffenestr y cod, ac ewch allan o'r Modd Dylunio, nawr, os byddwch chi'n nodi'r gwerth rhwng 1 a 10 yn y blwch testun, bydd ei liw cefndir yn dod yn goch, y gwerth rhwng 11 a 20, bydd lliw cefndir y blwch testun yn dod yn wyrdd, gwerthoedd eraill, bydd yn dod yn felyn fel y dangosir y screenshot canlynol:
Erthyglau cysylltiedig:
Sut i fewnosod llun yn y blwch testun?
Sut i osod gwerth diofyn mewn blwch testun?
Sut i ganiatáu i rifau yn unig gael eu mewnbynnu yn y blwch testun?
Sut i gymhwyso gwiriad sillafu yn y blwch testun?
Offer Cynhyrchiant Swyddfa Gorau
Supercharge Eich Sgiliau Excel gyda Kutools ar gyfer Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed. Kutools ar gyfer Excel Yn Cynnig Dros 300 o Nodweddion Uwch i Hybu Cynhyrchiant ac Arbed Amser. Cliciwch Yma i Gael Y Nodwedd Sydd Ei Angen Y Mwyaf...
Mae Office Tab yn dod â rhyngwyneb Tabbed i Office, ac yn Gwneud Eich Gwaith yn Haws o lawer
- Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
- Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
- Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!