Sut i wneud celloedd yn feiddgar os yw'n fwy na nifer penodol yn Excel?
Gan dybio bod gennych chi ystod o rifau, ac yr hoffech chi orbwyso rhai celloedd â ffont beiddgar os yw gwerth y gell yn fwy na nifer benodol fel 90, beth allwch chi ei wneud? Bydd yr erthygl hon yn dangos tri dull i chi ei gyflawni mewn manylion.
Gwnewch gelloedd yn feiddgar os yw'n fwy na nifer penodol gyda Fformatio Amodol
Gwnewch gelloedd yn feiddgar os yw'n fwy na nifer penodol gyda chod VBA
Gwnewch gelloedd yn feiddgar os ydynt yn fwy na nifer penodol gyda Kutools for Excel
Gwnewch gelloedd yn feiddgar os yw'n fwy na nifer penodol gyda Fformatio Amodol
Gallwch gymhwyso'r nodwedd Fformatio Amodol i wneud celloedd yn feiddgar os yw gwerth y celloedd yn fwy na nifer penodol yn Excel. Gwnewch fel a ganlyn.
1. Dewiswch yr ystod o gelloedd rydych chi am feiddio'r rhifau sy'n fwy na rhif penodol, ac yna cliciwch Fformatio Amodol > Rheol Newydd dan Hafan tab. Gweler y screenshot:
2. Yn y Rheol Fformatio Newydd blwch deialog, mae angen i chi:
3. Yn y Celloedd Fformat blwch deialog, cliciwch Pendant yn y Arddull ffont blwch o dan Ffont tab, ac yna cliciwch ar y OK botwm.
4. Pan fydd yn dychwelyd y Rheol Fformatio Newydd blwch deialog, cliciwch y OK botwm.
Yna mae pob cell sy'n fwy na 90 yn cael ei fformatio â ffont beiddgar ar unwaith mewn amrediad dethol.
Gwnewch gelloedd yn feiddgar os yw'n fwy na nifer penodol gyda chod VBA
Heblaw am y dull uchod, gallwch gymhwyso cod VBA i wneud celloedd yn feiddgar os yw'n fwy na nifer penodol yn Excel.
1. Gwasgwch Alt + F11 allweddi ar yr un pryd i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.
2. Yn y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr, cliciwch Mewnosod > Modiwlau. Yna copïwch a gludwch islaw cod VBA i mewn i ffenestr y Modiwl.
Cod VBA: Gwnewch gelloedd yn feiddgar os yw'n fwy na nifer penodol
Sub BoldHighHours()
Dim xRg As Range
Dim xCell As Range
Dim xAddress As String
Dim xUpdate As Boolean
On Error Resume Next
xAddress = Application.ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select a range", "Kutools for Excel", xAddress, , , , , 8)
Set xRg = Application.Intersect(xRg, ActiveSheet.UsedRange)
If xRg Is Nothing Then Exit Sub
xUpdate = Application.ScreenUpdating
Application.ScreenUpdating = False
For Each xCell In xRg
If VBA.IsNumeric(xCell.Value) Then _
xCell.Font.Bold = (xCell.Value > 90)
Next
Application.ScreenUpdating = xUpdate
End Sub
Nodyn: Yn y cod, rhif 90 yw'r gwerth sydd ei angen arnoch i wneud celloedd yn feiddgar yn seiliedig ar. Newidiwch ef ar sail eich anghenion eich hun.
3. Gwasgwch F5 allwedd i redeg y cod, yn y Kutools for Excel blwch deialog, dewiswch yr ystod sydd ei hangen arnoch i fformatio celloedd gyda ffont beiddgar, ac yna cliciwch ar y OK botwm.
Yna mae celloedd sy'n fwy na rhif 90 yn cael eu fformatio â ffont beiddgar.
Gwnewch gelloedd yn feiddgar os ydynt yn fwy na nifer penodol gyda Kutools for Excel
Mae Dewiswch Gelloedd Penodol cyfleustodau Kutools for Excel yn eich helpu i ddewis y celloedd sy'n fwy na nifer penodol mewn ystod benodol yn hawdd ar unwaith, ac yna gallwch eu fformatio â ffont trwm â llaw.
Cyn gwneud cais Kutools for Excel, os gwelwch yn dda ei lawrlwytho a'i osod yn gyntaf.
1. Dewiswch yr ystod, ac yna cliciwch Kutools > dewiswch > Dewiswch Gelloedd Penodol. Gweler y screenshot:
2. Yn y Dewiswch Gelloedd Penodol blwch deialog, dewiswch Cell opsiwn yn y Math o ddewis adran, ac yn yr Math penodol adran, dewiswch Yn fwy na yn y gwymplen, nodwch y rhif penodol yn y blwch testun, ac yn olaf cliciwch ar y OK botwm.
3. Yna mae blwch deialog yn ymddangos i ddweud wrthych faint o gelloedd sy'n cael eu dewis, cliciwch y OK botwm. Nawr dim ond y celloedd sy'n fwy na 90 sy'n cael eu dewis, daliwch i ddewis y celloedd hyn, ac yna cliciwch ar y Pendant botwm o dan Hafan tab i'w gwneud yn feiddgar.
Os ydych chi am gael treial am ddim (30 diwrnod) o'r cyfleustodau hwn, cliciwch i'w lawrlwytho, ac yna ewch i gymhwyso'r llawdriniaeth yn ôl y camau uchod.
Offer Cynhyrchiant Swyddfa Gorau
Supercharge Eich Sgiliau Excel gyda Kutools for Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed o'r blaen. Kutools for 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...
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!
