Ինչպե՞ս փոխել արժեքը Excel- ում բջջային գույնի հիման վրա:
Այս հոդվածում խոսվում է բջջային արժեքը ավտոմատ կերպով փոխելու մասին `հիմնվելով դրա ֆոնի գույնի վրա Excel- ում: Օրինակ, եթե ընտրության մեջ կարմիր ֆոնի գույնով բջիջներ են լցվում, ապա այդ բջիջները լրացրեք 1 համարով, իսկ կապույտ ֆոնի գույնի բջիջների համար լրացրեք 0 թիվը:
Փոխեք արժեքը ՝ հիմնվելով բջջային գույնի վրա, VBA կոդով
Փոխեք արժեքը ՝ հիմնվելով բջջային գույնի վրա, VBA կոդով
Excel- ում բջջային գույնի վրա հիմնված արժեքը փոխելու համար կարող եք գործարկել ստորև նշված VBA կոդը: Խնդրում եմ արեք հետևյալ կերպ.
1. Ընտրեք այն տիրույթը, որն անհրաժեշտ է ֆոնի գույնի հիման վրա փոխելու արժեքները, այնուհետև սեղմեք ալտ + F11 ստեղները միաժամանակ բացելու համար Microsoft Visual Basic հավելվածների համար պատուհան.
2. Մեջ Microsoft Visual Basic հավելվածների համար պատուհանը, սեղմեք Տեղադրել > Մոդուլներ, ապա պատճենեք և տեղադրեք ներքևի VBA կոդը Մոդուլի պատուհանում:
VBA կոդ. Excel- ում բջջային գույնի հիման վրա փոխեք արժեքը
Sub ChangeValueBasedOnCellColor()
Dim rg As Range
Dim xRg As Range
Set xRg = Selection.Cells
Application.DisplayAlerts = False
For Each rg In xRg
With rg
Select Case .Interior.Color
Case Is = 255 'Red
.Value = 1
Case Is = 15773696 'Blue
.Value = 0
End Select
End With
Next
Application.DisplayAlerts = False
End Sub
3. Սեղմեք F5 Կոդը գործարկելու բանալին, ապա կտեսնեք, որ ընտրված տիրույթում բոլոր կարմիր բջիջները լցված են թիվ 1-ով, իսկ կապույտ բջիջները լցված են 0 համարով, ինչպես ցույց է տրված նկարում:
Գրասենյակի արտադրողականության լավագույն գործիքները
Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար: Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...
Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք
- Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
- Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
- Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր: