VBA-change The Colour Of 4 Cells Depending On The One Cell

May 20, 2009

i need to change the colour of 4 cells depending on the one cell.

i have found some vba codes on the net but they are all based on numbers and i need it on text.

so if a1 ="alert" make A1 to A4 red

if a1="passed" make a1 to a4 green... and so on

i cant used conitional formatting as i need more than 3 colours

View 9 Replies


ADVERTISEMENT

How To Change A Cell Colour Depending An A Different Cells Value

Oct 22, 2009

How to a change a cell colour to say red in B6 if cell b12 = 1 and if e6 = 1 to change to green. I thought I might be able to use conditional formatiing but no. I had set the spread sheet to do a cell just for a condition representing a sum from another worksheet and it was working fine but i have to incorporate the two together and am stock.

I have attached a spread sheet.

View 14 Replies View Related

VBA To Change Background Colour In Free Form Depending On Text In Cells?

Apr 3, 2014

I have a spreadsheet with several freeforms. I would like them to change backgroundcolour, if the content in a cell is equal to another cell.

Basically I would like my shape "Freeform1" to change backgroundcolour to RGB (0, 180, 0) if Sheet1.Range ("A1") = Sheet2.Range("D3").

If it's not the same content in both cells, I would like the freeform to remain unchanged, that's RGB (79, 129, 189).

This should happend automaticly, so I don't have to click the shape to make it happen.

View 5 Replies View Related

Can Change Colour In A Cell Depending On Result

Jun 3, 2013

Is there any way to have a cell change its colour depending on whether a condition is met. E.G., can i have it as green if the result is a plus number and red if its a negative?

View 2 Replies View Related

Change Object Colour And Rotation Depending On Cell Value

Apr 11, 2014

I would like to conditional format an Object depending on the variance between 2 weeks.

If the value is > than 0% the arrow is Green and points upwards.
If the value is = to 0% the arrow is Yellow and points at at 90 degree to the left.
If the value is < than 0% the arrow is Red and points downwards.

Attached is a sample : rrow Conditional Format.xlsm‎

View 4 Replies View Related

Excel 2010 :: Change Cell Colour Depending On Date In Another Cell

Jan 9, 2013

I am trying to create a sheet in XL 2010.

In Column A each cell will contain a date (differnet from other cells in that column) when inspection was last done.

Column B is when the weekly inspection is due.

Column C is when bi-weekly inspection is due.

Column D is when monthly inspection is due.

Column E is when 6 monthly inspection is due.

I need a formula to change the colour of cells B, C, D & E when each inspection is due depending on the date entered in A

I am hoping its possible that the cell colour can stay for 2 days after the due date and then return back to blank after the second day.

For example if cell A1 has a date of January 1 2013 then on January 8 2013 cell B1 turns red then on January 10 2013 the cell returns back to normal.

A1
B1
C1
D1
E1

Inspection Date
Weeekly Due
Bi-WeeklyDue
Monthly Due
6 Monthly Due

January 1 2013
Change red Jan 8 & return blank Jan 10
Change red Jan 15 & return blank Jan 17
Change red Feb 1 & return blank Feb 3
Change red June 1 & return blank June 3

View 3 Replies View Related

Formula To Change Cell Colour :: Shade A Cell Depending On Condition

Feb 9, 2007

Is it possible to use a formula to shade a cell dependent on a condition? I have tried an if formula (see below) but it is incorrect. =if('November 2006 SVOC'!B6>'March 2006 SVOC'!C6,'November 2006 SVOC'!B6 [red],if('November 2006 SVOC'!B6<'March 2006 SVOC'!C6,'November 2006 SVOC'!B6 [blue],))

View 3 Replies View Related

Text Colour Change Depending On Outcome Of Formula

Jul 6, 2009

i am looking for a formula, if i put it as plainly as i can then i hope someone can work it out for me!

if ad4 is greater or less than 30 then ad4 text is red, if ad4 is equal too 30 then text is green

View 14 Replies View Related

Cell Colour Depending On Value Entered

Apr 19, 2007

I found the code below to do almost exactly what i want. However, i would like to know if it can be modified to only affect a specific cell range. In my case, the cell range is B9:AF37.

Option Compare Text 'A=a, B=b, ... Z=z
Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)

Dim Cell As Range
Dim Rng1 As Range

On Error Resume Next
Set Rng1 = ActiveSheet.Cells.SpecialCells(xlCellTypeFormulas, 1)
On Error Goto 0
If Rng1 Is Nothing Then
Set Rng1 = Range(Target.Address)
Else
Set Rng1 = Union(Range(Target.Address), Rng1)
End If
For Each Cell In Rng1

View 9 Replies View Related

VBA Code To Change Font Colour Of Cell Referenced Letter Strings Within Range Of Cells

Jun 13, 2014

I am working on a spreadsheet for work, and have managed to do everything I need to so far but I need to colour specific letter strings, certain colours within a range of cells (each letter string will only appear once on each sheet)

The strings I will be looking for vary depending on data entered so I will need to cell reference them

The strings that need colouring are in cells with other strings that must stay black (They cannot be separated from other strings due to the nature of the grid)

I need some strings red, some green, and some blue.

These changes should also apply to the whole workbook not just one sheet.

Is there a way to do this with the VBA code.

View 3 Replies View Related

Make Cell Open Different Files Depending On Its Fill Colour?

May 27, 2014

if I have one cell that ive enlarged to half the sheet.... and it is effected with rollover hyperlink so that when I hover over other cells. it turns different colours..

is it possible to make that cell open up different files using the double click event depending on the colour it currently is?

i.e. if its blue, open file1. if its yellow, open file 2 etc

View 4 Replies View Related

VBA Code To Colour Certain Cells Based On RGB Colour Shown In Cell A1

Apr 17, 2014

I have a lookup that gives and RGB colour code in Cell A1; for example 186, 206, 140.

I'd then like Cells R10:V15 to fill with the RGB colour based on the result in A1.

View 2 Replies View Related

Locking Text In Cells But Not The Ability To Change Colour Of Cells With Mouse Click

Mar 5, 2013

Locking text in cells but not the ability to change colour of cells

******** width="234" height="60" frameborder="0" marginwidth="0"
marginheight="0" vspace="0" hspace="0" allowtransparency="true" scrolling="no" id="aswift_0" name="aswift_0" style="left: 0px; position: absolute; top: 0px;">*********>

I have a spreadsheet where I can change the colour of a cell by clicking the mouse, I also have text in many of the cells.

What I need to do is protect (lock) the text so that no one can change the text in any of the cells, but I still want to be able to change the colour of the cells by clicking the mouse in that cell.

View 2 Replies View Related

Cells Need To Change Colour

Oct 23, 2008

I have developed a profit loss sheet for the office I work for. What i need is to have either cells change colour or the numbers in the cell change colour depening on the value in the cell.

What I was thinking is if the number is over 15% of the sale price the cell or number should be green, if the number is under 15% it should be black, and if its below 0% it will be red.

View 4 Replies View Related

Change Colour Of Certain Cells When Condition Met

Jul 31, 2014

I am using the following code to amend the colour of a cell when a name is entered in ROW J however, i need it to colour the row from A to O on the line the name is entered on.

So for example Dave is in j2 (j1 is a header) the line from A2 to o2 goes green.

I have tried a few things with interesting results but not get desired result.

[Code] ......

View 4 Replies View Related

To Change Color Of Cells Depending On Value

Nov 10, 2008

when I execute this code on the selected cells, it completely ignores my selection, and makes the entire worksheet black.

Sub ColorCells()

Dim cell As Range

For Each cell In Selection

If cell.Value = "U" Then
cells.Interior.Color = 3

View 9 Replies View Related

Cells' Color Change Depending On Dates

Aug 24, 2009

I have column "C", starting from "C5" with dates till C200, but not all cells have dates some of them are also blank.

I want the cell to change color depending on the date.

If the written due date is in a month from today, I want it to turn yellow, and if the due date is in the past from today, I wanted to turn red. I want it to get updated every month.

View 9 Replies View Related

Excel 2003 :: Cells To Change Colour When Within A Due Date

Feb 9, 2014

I have a very basic understanding of excel, I mean BASIC, for my work I have multiple dates for vehicles to go in for inspections. I would like the cells to change colours when within 30 days, 10 days and 5 days. I'm on a work excel 2003.

View 6 Replies View Related

Compare Worksheets - Change Colour Of Cells To Indicate If Found Or Not

Sep 26, 2012

I need to compare 2 worksheets, one containing a list of IP adresses that need to be checked (interfaces), and another containing a list of IP addresses that have been checked (Scanned hosts), there are over 100000 scanned host entries.

I need to search the "Scanned hosts" worksheet to ensure that all of the IP addresses listed in the "Interfaces" worksheet have been scanned. I then need to place an entry next to the IP address on the "interfaces" worksheet to indicate the check date and the name of the person who checked it. It also needs to change the colour of the cells to indicate if it has been found or not found.

The code I have written so far (from piecing together different threads from MrExcel), at first glance, seems to work perfectly. However, if I replace an ip address in the "interfaces" worksheet, with one that I know does not exist - it still marks it as found.

Interfaces;
IP Address
System
Date Checked
Checked By

1.2.3.4
fred bloggs

1.2.3.5
fred bloggs

[Code] .....

Scanned hosts is just a list of IP addresses and text (168000 rows) in a single column. Format is xx.xx.xx.xx ^IP^^^^Jul 29 2012 08:01:29:000PM

Sub Compare()
Dim X As Long, CurrentRow As Long, FindRow As Long, WS1 As Worksheet, WS2 As Worksheet

Set WS1 = Worksheets("Interfaces")
Set WS2 = Worksheets("Scanned Hosts")

CurrentRow = 1

[Code] .....

View 4 Replies View Related

Change Cells Colour: Range Error '1004'

Jan 10, 2007

Run-Time error '1004':
Method 'Range' of object'_worksheet' failed

The Function basically takes any cell in range with a formula and has it blue. If the formula is overwritten by the user it turns the cells colour Red.

Private Sub Worksheet_Change(ByVal Target As Range)

'change Colour of cells from blue if formula based to red if data typed by user

If Not Intersect(Target, Range("AS63,BA5:BP66,BT7:CI55,BU60:BU64,BX60:BX64,CA60:CA64,CD60:CD64,BT55:CI66,BT59:CI59,CF7:CF55,CF65:CF66,DJ19:DJ21,DJ24,DL5:DM36,DJ41,DJ45,DJ48,DL41:DM48,DH50:DH51,DJ50:DJ51,DL50:DM53,DH63,DJ63,DL55:DM58,DL60:DM66,DU5:DV33,DU37:DV58,DZ8:EB8,ED5:EE27,ED31:EE66,EM5:EN12,EM16:EN29,EM33:EN38,DH63,AL5:AM26,AL30:AM49,AL53:AM66,AV5:AW16,AV20:AW29,AV33:AW53,AV55:AW63,CO5:CO66,CQ5:CR66,CY5:CY66,DA5:DB66,DJ5:DJ7,DJ14:DJ15,DJ17")) Is Nothing Then
If Target.HasFormula Then
Target.Font.ColorIndex = 11
Else
Target.Font.ColorIndex = 3
End If
End If
End Sub

View 4 Replies View Related

Repeat Cells In Column Depending On Change In Another Columns

Jan 23, 2013

Here is an example list:

Networks
Hardware
Networks
Software
Networks
Resources
Apps
Hardware
Apps
Software
Apps
Resources
Domain
Hardware
Domain
Software
Domain
Resources
Print
Hardware
Print
Print

All I'm trying to do in the second column is something that can say if there is a change in column A, then restart the order, or not..

View 9 Replies View Related

Format Certain Cells To Change Colors Depending On Date

Feb 27, 2013

I am trying to format certain cells to change colors depending on the date and the content of the next field to show due dates.

cell label
due date
date completed

c5
au5
be5

c6
au6
be6

c7
au7
be7

c8
au8
be8

What I need is for the contents of au5 to be green up until 10 days before the due date, yellow up until 5 days, and red with less than 5 days until the due date. If the date completed is entered into be5, then the contents of au5 should be black.

Is this possible, and if it is, how do I set this up? I tried to use

=$AU5-TODAY()>=10

And choose green formatting (something I found on yahoo answers), but when I enter the date the text is still the original black font.

View 5 Replies View Related

Change A Worksheet Tab Colour Dependant On The Contents On A Range Of Cells?

Mar 24, 2014

I have a worksheey of data and i would like the tab to be a certain colour dependant on the the contents of a range of cells within that worksheet is that possible. i know i need to use VBA and it cna be done based ont he contents of one cell.

So for example i have a sheet of people i am awaiting payment from, based on the last column " bill paid" i want the tab to be Red if there are any blanks in this column/ range and go green when all the cells in the column/ range are filled with "y"

View 5 Replies View Related

Conditional Formatting To Change Colour Of Cells Dependent On Text Within Them

Sep 8, 2013

How to colour cells depending on text in other cells, for example,

I would like cells D26:AA26 to turn light red if the letters 'FSM' are in cell 'E26' even if other text appears in it, eg 'SA+/FSM'
I have been playing about with conditional formatting but can seem to solve the mixed text issue?

I have included an example below,

Do you use a "*FSM*" around the formula?

[URL] ...........

View 7 Replies View Related

Change Color Of Cells Depending On Data (format) Present In It?

Jan 11, 2013

I need change the color of the cell depending on the following conditions. (By the way the column will have names list)

1. single punctuations are allowed anywhere in name apart from first position.-->color should not change
2. If any name got consecutive punctuations --> color should change to RED.
3. Any punctuations apart from Dot(.), hyphen(-), apostrophe('), Space( ) are not allowed-->color should change to RED.

Example-
ShivakumaraNo Change
Shiva kumaraNo Change
Shiva'kumaraNo Change
shiva.kumaraNo Change
shiva kumarared
shiva''kumarared
shiva' kumarared
shiva. Kumarared
shiva.'kumarared
shiva:kumarared

View 4 Replies View Related

Change Row Colour When A Value Is Given In A Cell

Aug 7, 2006

I dont have that great knowledge in Excel but i wanted to try and run a
macro in an IF formula but realised that was not possible. I have now got a
formula that gives a value in a cell when i want the whole row to turn to
red, but im not sure how i can get a macro that will change the whole row to
red when that cell shows a value. Can anyone help on this matter?

View 9 Replies View Related

Change The Colour Of Cell

Nov 15, 2006

I am tyring to do conditional formatting whereby if anything is entered in a cell i want the colour to change to say yellow and if nothing is entered just to leave blank.

View 9 Replies View Related

Change A Colour Of A Cell

Nov 8, 2009

How can you change the colour of a cell (A1) using that number

eg

1=red2=orange3=white4=light blue5=Blue12345


OR

Make the cell with numbers above 0 go red and all cells with numbers below 0 go blue

View 9 Replies View Related

Excel 2007 :: Clicking Cells To Change Colour Format And Mirroring

Feb 24, 2012

(Using Excel 2007)

What would be the quickest and most efficient way of doing the following:

Example

Sheet 1: clicking once, twice, three times in the following cells to change the fill to Red, Yellow, Green respectively (in Row 22, COLUMNS E H K N Q T W Z AD AG) and mirrorring this format/fill on:

Sheet 2: , mirror the selected fill on sheet1 in E22, H22 , K22 in in E3:N3 respectively example E22 (sheet1) is mirrored now in E3 (sheet 2); H22 (sheet 1) is mirrored in F3 (sheet2) etc etc.

I have 35 tabs formatted in the same way - each tab, as with Sheet 1 is linked to a different row on sheet 2 in the same range as is sheet 1 and would need to replicate the mirorring on Sheet 1 to each of the other 34 tabs.

View 9 Replies View Related

Row Change The Colour If A Particular Cell In That Row Contains One Particular Word

Feb 8, 2008

If A1 contains 'good' then row A = red

I need an entire row to change colour if a particular cell in that row contains one particular word.

View 11 Replies View Related







Copyrights 2005-15 www.BigResource.com, All rights reserved