Note: The other languages of the website are Google-translated. Back to English

Ինչպե՞ս փոխել մեկնաբանության ցուցիչի գույնը Excel- ում:

Excel- ում մեկնաբանություն մտցնելուց հետո բջիջի վերին աջ անկյունում հայտնվում է կարմիր եռանկյան փոքր ցուցիչ: Excel- ի շատ օգտվողներ կարող են մտածել, արդյոք կարմիր ցուցիչի գույնը կարող է փոխվել իրենց նախընտրած այլ գույներով: Այս հոդվածում ես կխոսեմ այս առաջադրանքն ավարտելու համար կատարված լուծման մասին:

Փոխեք մեկնաբանության ցուցիչի գույնը VBA կոդով

Office Tab- ը միացրեք Tabbed խմբագրումը և զննարկումը Office- ում, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք ...
Excel-ի համար Kutools-ը լուծում է ձեր խնդիրների մեծ մասը և բարձրացնում ձեր արտադրողականությունը 80%-ով
  • Վերաօգտագործել ցանկացած բան. Ավելացրեք առավել օգտագործված կամ բարդ բանաձևերը, գծապատկերները և ցանկացած այլ բան ձեր նախընտրածներին և հետագայում արագորեն օգտագործեք դրանք:
  • Ավելի քան 20 տեքստի առանձնահատկություններ. Հանեք համարը տեքստային տողից; Հանել կամ հեռացնել տեքստերի մի մասը; Թվերն ու արժույթները վերածեք անգլերեն բառերի:
  • Միաձուլել գործիքներըԲազմաթիվ աշխատանքային գրքեր և թերթեր մեկում; Միավորել բազմաթիվ բջիջներ / տողեր / սյուններ ՝ առանց տվյալների կորստի: Միաձուլեք կրկնօրինակ տողերն ու գումարը:
  • Պառակտման գործիքներՏվյալները պառակտել բազմակի թերթերի ՝ հիմնված արժեքի վրա. Մեկ աշխատանքային գրքույկ ՝ բազմակի Excel, PDF կամ CSV ֆայլեր; Մեկ սյունակ մի քանի սյունակներից:
  • Կպցնել բաց թողնելը Թաքնված / Filտված շարքեր; Հաշվելը և գումարը ըստ Ֆոնի գույնի; Personalանգվածային տարբերակով ստացողներին ուղարկեք անհատականացված էլ.
  • Սուպեր ֆիլտր Ստեղծեք զտման առաջադեմ սխեմաներ և կիրառեք ցանկացած թերթի վրա; Տեսակ ըստ շաբաթվա, օրվա, հաճախականության և ավելին; ֆիլտր համարձակ, բանաձևերով, մեկնաբանությամբ ...
  • Ավելի քան 300 հզոր հատկություններ; Աշխատում է Office 2007-2021 և 365-ի հետ; Աջակցում է բոլոր լեզուներին; Հեշտ տեղակայում ձեր ձեռնարկությունում կամ կազմակերպությունում:

նետ կապույտ աջ պղպջակ Փոխեք մեկնաբանության ցուցիչի գույնը VBA կոդով

Մեկնաբանության ցուցիչների գույնը արագ և հեշտորեն փոխելու ուղի չկա: Բայց հետևյալ VBA կոդը կարող է օգնել ձեզ նկարել եռանկյունաձև ձև, որը համընկնում է մեկնաբանության յուրաքանչյուր ցուցանիշի հետ, անհրաժեշտ ակտիվ գույնի թերթիկի վրա:

1. Ակտիվացրեք ձեր աշխատանքային թերթը, որը ցանկանում եք փոխել մեկնաբանության ցուցիչների գույնը:

2, Պահեք պահեք ALT + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

3: Սեղմեք Տեղադրել > Մոդուլներ, և տեղադրեք հետևյալ կոդը Մոդուլի պատուհան.

VBA կոդ. Ակտիվ թերթում փոխեք մեկնաբանության ցուցիչի գույնը

Sub CoverCommentIndicator()
'Update 20141110
Dim pWs As Worksheet
Dim pComment As Comment
Dim pRng As Range
Dim pShape As Shape
Set pWs = Application.ActiveSheet
wShp = 6
hShp = 4
For Each pComment In pWs.Comments
  Set pRng = pComment.Parent
  Set pShape = pWs.Shapes.AddShape(msoShapeRightTriangle, pRng.Offset(0, 1).Left - wShp, pRng.Top, wShp, hShp)
  With pShape
    .Flip msoFlipVertical
    .Flip msoFlipHorizontal
    .Fill.ForeColor.SchemeColor = 12
    .Fill.Visible = msoTrue
    .Fill.Solid
    .Line.Visible = msoFalse
  End With
Next
End Sub

4, Կոդը տեղադրելուց հետո սեղմեք F5 Կոդը կատարելու բանալին, և կարմիր եռանկյունու բոլոր ցուցիչները ծածկված են կապույտ եռանկյուններով, ինչպես ցույց են տրված հետևյալ նկարները.

փաստաթուղթ-փոփոխություն-մեկնաբանություն-ցուցանիշներ -1
-1
փաստաթուղթ-փոփոխություն-մեկնաբանություն-ցուցանիշներ -2

Նշումներ:

1. Վերոնշյալ կոդում կապույտ գույնը կարող եք փոխել ձեր նման ՝ սցենարում պարզապես փոխելով գույների ցուցիչը .Fill.ForeColor.SchemeColor = 12.

2. VBA- ի վերևում ավելացրած եռանկյան ձևը կփոխվի իր չափսով, երբ բջիջը չափափոխեք:

3. Եթե ուզում եք անմիջապես հեռացնել գունավոր եռանկյունու բոլոր ձևերը, ապա հետևյալ VBA կոդը ձեզ կօգնի.

VBA կոդ. Հեռացրեք եռանկյան ձևերը մեկնաբանության ցուցիչների վրա

Sub RemoveIndicatorShapes()
'Update 20141110
Dim pWs As Worksheet
Dim pShape As Shape
Set pWs = Application.ActiveSheet
For Each pShape In pWs.Shapes
    If Not pShape.TopLeftCell.Comment Is Nothing Then
      If pShape.AutoShapeType = msoShapeRightTriangle Then
        pShape.Delete
      End If
    End If
Next
End Sub

Առնչվող հոդվածներ քանակը:

Ինչպե՞ս առանձնացնել բոլոր բջիջները Excel- ում մեկնաբանություններով:

Ինչպե՞ս Excel- ում ցույց տալ կամ թաքցնել բոլոր մեկնաբանություններն ու մեկնաբանությունների ցուցանիշները:


Գրասենյակի արտադրողականության լավագույն գործիքները

Excel-ի համար Kutools-ը լուծում է ձեր խնդիրների մեծ մասը և բարձրացնում ձեր արտադրողականությունը 80%-ով

  • Վերաօգտագործել: Արագ տեղադրեք բարդ բանաձևեր, գծապատկերներ և այն ամենը, ինչ դուք նախկինում օգտագործել եք. Ryածկագրել բջիջները գաղտնաբառով; Ստեղծեք փոստային ցուցակ և նամակներ ուղարկել ...
  • Super Formula Bar (հեշտությամբ խմբագրեք տեքստի և բանաձևի բազմաթիվ տողեր); Ընթերցանության դասավորությունը (հեշտությամբ կարդալ և խմբագրել մեծ թվով բջիջներ); Տեղադրել ֆիլտրացված տիրույթում...
  • Միաձուլել բջիջները / տողերը / սյունակները առանց տվյալների կորստի. Պառակտված բջիջների պարունակությունը; Միավորել կրկնօրինակ տողերը / սյունակները... Կանխել կրկնօրինակ բջիջները; Համեմատեք միջակայքերը...
  • Ընտրեք Կրկնօրինակ կամ Եզակի Շարքեր; Ընտրեք դատարկ շարքեր (բոլոր բջիջները դատարկ են); Super Find և Fuzzy Find շատ աշխատանքային գրքույկներում; Պատահական ընտրություն ...
  • Actշգրիտ պատճեն Բազմաթիվ բջիջներ ՝ առանց բանաձևի հղումը փոխելու; Ավտոմատ ստեղծեք հղումներ դեպի մի քանի թերթեր; Տեղադրեք փամփուշտներ, Տուփեր և ավելին ...
  • Քաղվածք տեքստ, Տեքստ ավելացնել, հեռացնել ըստ դիրքի, Հեռացնել տարածությունը; Ստեղծել և տպել էջային ենթագոտիներ; Փոխարկել բջիջների բովանդակության և մեկնաբանությունների միջև...
  • Սուպեր զտիչ (պահպանել և կիրառել ֆիլտրի սխեմաները այլ թերթերի վրա); Ընդլայնված տեսակավորում ըստ ամիս / շաբաթ / օր, հաճախականություն և ավելին; Հատուկ զտիչ համարձակ, շեղատառով ...
  • Միավորել աշխատանքային տետրերը և աշխատանքային թերթերը; Միավորել աղյուսակները ՝ հիմնված հիմնական սյունակների վրա; Տվյալները բաժանեք մի քանի թերթերի; Խմբաքանակի փոխակերպում xls, xlsx և PDF...
  • Ավելի քան 300 հզոր հատկություններ. Աջակցում է Office / Excel 2007-2021 և 365: Աջակցում է բոլոր լեզուներին: Հեշտ տեղակայում ձեր ձեռնարկությունում կամ կազմակերպությունում: Ամբողջական հնարավորություններ 30-օրյա անվճար փորձարկում: 60-օրյա գումարի վերադարձի երաշխիք:
kte էջանիշը 201905

Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք

  • Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
  • Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
  • Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:
officetab ներքևում
Տեսակավորել մեկնաբանությունները ըստ
մեկնաբանություններ (3)
Դեռևս գնահատականներ չկան: Եղիր առաջինը, ով կգնահատի:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Շնորհակալություն գաղափարի համար!! Քանի որ ես աշխատում եմ VBA/մակրո ազատ միջավայրում (անվտանգության սահմանափակումներ), ես պարզապես ստեղծեցի մի փոքրիկ եռանկյունի ձև և դրեցի այն բոլոր վառ կարմիր ցուցիչների վերևում՝ սահմանելով, որ հատկությունները շարժվեն, բայց չմեծացվեն բջիջներով: Աշխատել է հմայքի պես :-)
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Bonjour peut on faire la meme ընտրե՞լ է սուս պայման (օրինակ՝ si le commentaire contient un mot):
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
փորձե՞լ եք վերը նշվածը մեկնաբանության ցուցիչի գույնը փոխելու համար, բայց հաջողություն չե՞ք ունեցել: Կոդը գործարկելու համար F5 ընտրելիս ոչինչ չի՞ պատահում: Օգնեք խնդրում եմ, շնորհակալություն
Առայժմ ոչ մի մեկնաբանություն չկա
Թողեք ձեր մեկնաբանությունները
Հրապարակում որպես հյուր
×
Գնահատեք այս գրառումը.
0   Անձնավորություններ
Առաջարկվող վայրեր

Հետեւեք մեզ

Հեղինակային իրավունքի © 2009 - www.extendoffice.com. | Բոլոր իրավունքները պաշտպանված են. Powered by ExtendOffice. | | Կայքի քարտեզ
Microsoft- ը և Office- ի պատկերանշանը հանդիսանում են Microsoft Corporation- ի ապրանքային նշաններ կամ գրանցված ապրանքային նշաններ ԱՄՆ-ում և (կամ) այլ երկրներում:
Պաշտպանված է Sectigo SSL- ի կողմից