Excel VBA - Change color of shapes on cell change

preview_player
Показать описание
How to change the color of shapes according to certain criteria or conditions that are not numeric/numbers but are strings/alphabets when cell change?
Step-by-step tutorial.
Рекомендации по теме
Комментарии
Автор

Thank you SO MUCH for this. I'm new to this depth of Excel, but with a lot of work, I began to understand that this is what I've been looking for. I recommend that everyone make sure to check the video at 5:42 to make sure you aren't missing anything in the code.

benthompson
Автор

Thank you for your video, could you please also explain how change the text color inside the textbox base in cell value?
Thank you

imronniecohen
Автор

Hi Sing, thanks for your sharing. Its very helpful, but still i wish to make it clear on one thing, i) do i have to create the shape in order? 2) and also is it possible for me to name the shape as “number”, like “1”, ”2”, ”3”?
Hope u understand my questions.

NA-nvmn
Автор

Thanks for the video
I’m trying to do.
If B2 is less than B1 go red
If B2 equal to B1 go yellow
If B2 more than B1 go green

Is that possible?

Veganphobic
Автор

GREAT THANK YOU VERY MUCH FOR THIS VIDEO

SandeepSharma-hgti
Автор

Hello, thank you for this video how should we write the code when the map and data are on different pages

emredemirhan
Автор

tnxs by the video, just i would like to make a question.
When i try to run the macro appears a maessage (DEBUG), but the macro does work. what can i do?
Private Sub Worksheet_Change(ByVal Target As Range)

For i = 1 To 100

If Sheet2.Cells(i + 1, 2) = "Experto" Then
+ 1, 1))).Fill.ForeColor.RGB = RGB(0, 176, 80)
ElseIf Sheet2.Cells(i + 1, 2) = "Certificado" Then
+ 1, 1))).Fill.ForeColor.RGB = RGB(146, 208, 80)
ElseIf Sheet2.Cells(i + 1, 2) = "Back Up" Then
+ 1, 1))).Fill.ForeColor.RGB = RGB(237, 125, 49)
ElseIf Sheet2.Cells(i + 1, 2) = "Principiante" Then
+ 1, 1))).Fill.ForeColor.RGB = RGB(255, 192, 0)
ElseIf Sheet2.Cells(i + 1, 2) = "Entrenamiento" Then
+ 1, 1))).Fill.ForeColor.RGB = RGB(255, 255, 0)
ElseIf Sheet2.Cells(i + 1, 2) = "Ausente" Then
+ 1, 1))).Fill.ForeColor.RGB = RGB(255, 0, 0)
End If

Next i

End Sub

sergiojosueramireznevarez
Автор

i have 2 files in excel in that file 2 a column row 1 value and file 1 column row 1 value same. now i want if file 1 column b row 1 is >0 then file 2 a column row1 cell color change as yellow otherwise cell color change as green.

rajak
Автор

Hello Ah, Could you please explain how to change color for a JPG image embedded in an excel sheet? I have multiple images that represent the region of my Country; I created them as a sort of layers from GIMP, so the complete image (my Country) is a collage of superimposed layers one for each region. Each region-layer is white and I would like to change it to color assigned to cells. Thanks

modalgvr
Автор

Hello,
Thank you for the video. Could you please help me in below scenario.
I have 100 square boxes. In A1 as soon I put a number, the same counted square shapes should be changed to same colour and rest will remain as it is.
ex. If I put 10 in A1 cell, so, 10square shapes needs to be changed into let's say red and rest all 90 will remain with grey colour. Is it possible?

rashmiranjan