Hogyan lehet félkövérré tenni a cellákat, ha nagyobbak, mint az Excel bizonyos száma?
Ha feltételezzük, hogy számtartománya van, és szeretne félkövér betűtípussal felülmúlni néhány cellát, ha a cella értéke nagyobb, mint egy bizonyos szám, például 90, mit tehet? Ez a cikk három módszert mutat be részletesen.
A feltételes formázással tegye félkövérré a cellákat, ha azok nagyobbak, mint bizonyos számok
Tegye félkövérré a cellákat, ha azok nagyobbak, mint a VBA kóddal megadott számok
Tegye félkövérre a cellákat, ha nagyobb egy bizonyos számnál a Kutools for Excel segítségével
A feltételes formázással tegye félkövérré a cellákat, ha azok nagyobbak, mint bizonyos számok
Alkalmazhatja a Feltételes formázás funkciót a cellák félkövérré tételéhez, ha a cellák értéke nagyobb, mint egy bizonyos szám az Excelben. Kérjük, tegye a következőket.
1. Jelölje ki azt a cellatartományt, amelyre az adott számnál nagyobb számokat kívánja vastagítani, majd kattintson a gombra Feltételes formázás > Új szabály alatt Kezdőlap fülre. Lásd a képernyőképet:
2. Ban,-ben Új formázási szabály párbeszédpanelen:
3. Ban,-ben Cellák formázása párbeszédpanelen kattintson a gombra tű a Betű stílus doboz alatt betűtípus lapot, majd kattintson a OK gombot.
4. Amikor visszaadja a Új formázási szabály párbeszédpanelen kattintson a OK gombot.
Ezután minden 90-nél nagyobb cellát félkövér betűvel formázunk azonnal a kiválasztott tartományban.
Tegye félkövérré a cellákat, ha azok nagyobbak, mint a VBA kóddal megadott számok
A fenti módszer mellett VBA-kódot is alkalmazhat, hogy a cellák félkövérek legyenek, ha nagyobbak, mint az Excel bizonyos száma.
1. nyomja meg más + F11 gombok egyszerre a Microsoft Visual Basic for Applications ablak.
2. Ban,-ben Microsoft Visual Basic for Applications ablakban kattintson betétlap > Modulok. Ezután másolja és illessze be a VBA kód alatt a Modul ablakba.
VBA kód: Tegye félkövérré a cellákat, ha nagyobbak, mint bizonyos számok
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
Megjegyzések: A kódban a 90-es szám az az érték, amelyre a cellákat félkövérré kell tenni. Kérjük, változtassa meg saját igényei szerint.
3. nyomja meg F5 kulcs a kód futtatásához a Kutools az Excel számára párbeszédpanelen válassza ki azt a tartományt, amelyhez a cellákat vastag betűkészlettel kell formázni, majd kattintson a gombra OK gombot.
Ezután a 90-nél nagyobb cellákat vastag betűvel formázzuk.
Tegye félkövérre a cellákat, ha nagyobb egy bizonyos számnál a Kutools for Excel segítségével
A Válassza a Specifikus cellák lehetőséget A Kutools for Excel segédprogram segítségével könnyedén kiválaszthatja azokat a cellákat, amelyek egy adott tartományban nagyobbak egy bizonyos számnál, majd kézzel formázhatja őket félkövér betűtípussal.
Alkalmazás előtt Kutools az Excel számáraKérjük, először töltse le és telepítse.
1. Válassza ki a tartományt, majd kattintson a gombra Kutools > választ > Válassza a Specifikus cellák lehetőséget. Lásd a képernyőképet:
2. Ban,-ben Válassza a Specifikus cellák lehetőséget párbeszédpanelen válassza ki Sejt lehetőség a Kiválasztás típusa szakaszban, és a Konkrét típus válasszon Nagyobb, mint a legördülő listában írja be a megadott számot a szövegmezőbe, majd kattintson a gombra OK gombot.
3. Ezután megjelenik egy párbeszédpanel, amely megadja, hogy hány cella van kijelölve, kattintson a gombra OK gomb. Most csak a 90-nél nagyobb cellákat választja ki, válassza ki ezeket a cellákat, majd kattintson a gombra tű gomb alatt Kezdőlap fülre, hogy félkövérek legyenek.
Ha ingyenes (30 napos) próbaverziót szeretne kapni a segédprogramról, kattintson a letöltéshez, majd lépjen a művelet végrehajtására a fenti lépések szerint.
A legjobb irodai hatékonyságnövelő eszközök
Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz. Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...
Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját
- Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
- Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
- 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!