Ինչպե՞ս փոխել ձևի գույնը ՝ հիմնված բջջային արժեքի վրա Excel- ում:
Ձևի գույնի փոփոխումը `ելնելով բջիջների որոշակի արժեքից, կարող է հետաքրքիր խնդիր լինել Excel- ում, օրինակ, եթե A1- ում բջջի արժեքը 100-ից պակաս է, ձևի գույնը կարմիր է, եթե A1- ը 100-ից մեծ է և 200-ից պակաս, ձևի գույնը դեղին է, և երբ A1- ը 200-ից մեծ է, ձևի գույնը կանաչ է, ինչպես ցույց է տրված հետևյալ նկարը: Բջջային արժեքի հիման վրա ձևի գույնը փոխելու համար այս հոդվածը ձեզ համար մեթոդ կներկայացնի:
Փոխեք ձևի գույնը ՝ հիմնվելով բջջային արժեքի վրա, VBA կոդով
Փոխեք ձևի գույնը ՝ հիմնվելով բջջային արժեքի վրա, VBA կոդով
Ստորև ներկայացված VBA կոդը կարող է օգնել փոխել ձևի գույնը ՝ ելնելով բջջային արժեքից, խնդրում եմ արեք հետևյալը.
1, Աջ կտտացրեք թերթիկի ներդիրին, որը ցանկանում եք փոխել ձևի գույնը, և այնուհետև ընտրել Դիտել կոդը համատեքստի ընտրացանկից ՝ դուրս եկած պատուհանում Microsoft Visual Basic հավելվածների համար պատուհանը, խնդրում ենք պատճենել և տեղադրեք հետևյալ կոդը դատարկի մեջ Մոդուլներ պատուհան.
VBA կոդ. Փոխեք ձևի գույնը ՝ ելնելով բջջային արժեքից.
Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice 20160704
If Intersect(Target, Range("A1")) Is Nothing Then Exit Sub
If IsNumeric(Target.Value) Then
If Target.Value < 100 Then
ActiveSheet.Shapes("Oval 1").Fill.ForeColor.RGB = vbRed
ElseIf Target.Value >= 100 And Target.Value < 200 Then
ActiveSheet.Shapes("Oval 1").Fill.ForeColor.RGB = vbYellow
Else
ActiveSheet.Shapes("Oval 1").Fill.ForeColor.RGB = vbGreen
End If
End If
End Sub
2, Եվ հետո, երբ A1 բջիջում մուտքագրեք արժեքը, ձևի գույնը կփոխվի ձեր սահմանած բջիջի արժեքի հետ:
ՆշումՎերոհիշյալ ծածկագրում A1 բջիջի արժեքն է, որի հիման վրա կփոխվի ձեր ձևի գույնը, և Օվալ 1 ձեր ներմուծված ձևի ձևի անունն է, դրանք կարող եք փոխել ըստ ձեր կարիքի:
Գրասենյակի արտադրողականության լավագույն գործիքները
Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար: Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...
Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք
- Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
- Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
- Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր: