Previous Topic Next Topic

Macro: change cell color based on value in another cell

Closed
randal.hite Posts 1 Registration date Monday December 6, 2021 Status Member Last seen December 6, 2021 - Updated on Mar 3, 2022 at 11:58 AM
TrowaD Posts 2921 Registration date Sunday September 12, 2010 Status Moderator Last seen December 27, 2022 - Mar 3, 2022 at 11:27 AM
Hello,
I'm am trying to fix a spread sheet at work but what i need is a macro that i can run
to do the following

if the word Traffic appears in Column E then the cell on the same row but in Column H turns black

thanks in advance for any help with this

1 response

Answer 1 / 1
TrowaD Posts 2921 Registration date Sunday September 12, 2010 Status Moderator Last seen December 27, 2022 555
Mar 3, 2022 at 11:27 AM
Hi Randal,

Here you go: 
Sub RunMe()
For Each cell In Range("E2:E" & Range("E" & Rows.Count).End(xlUp).Row)
    If cell.Value = "Traffic" Then Cells(cell.Row, "H").Interior.ColorIndex = 1
Next cell
End Sub


Best regards,
Trowa
1

Similar discussions

format one cell based on a text value in another cell
Nimmo57 -
ac3mark -

3 responses
Conditional formatting: change fontcolor based on another cell
wandanuila -
Ravi -

18 responses
Finding certain words in a cell and return a value based off the word found.
shanej69 -
TrowaD -

1 response
Match partial text string in one sheet to another text string in another sheet
Santos -
Santos -

2 responses
Macro to Create New Workbook and Copy Data at Each Change of X
greatdanejes -
vcoolio -

1 response
If a cell contains any text then add a value (with dates)
ryannordgren -
ryannordgren -

7 responses