+ Reply to Thread
Results 1 to 4 of 4

color changing cells

  1. #1
    Registered User
    Join Date
    04-26-2006
    Posts
    2

    color changing cells

    I have a job tracking spreadsheet that I would like help with. As a job progresses we X off that
    column so we know the status of each box that we are processing. What I would like to do is
    everytime an X is entered into a row I would like that cell to turn a certain color and once the final "Done"
    X is entered I would like the entire row to turn a different color. That way we knew how far along and
    which boxes are finished. Does anyone have a solution they would like to share?

    Thanks in advance

  2. #2
    Valued Forum Contributor
    Join Date
    04-11-2006
    Posts
    407
    Without a macro you can do the following:
    With cell A1 selected, select all cells. Then select Formatting -> Conditional Formatting...

    Condition 1:
    formula is, =$A1="X"
    (change the format to highlight)

    Condition 2:
    Cell value is, equal to, ="X"
    (change the format to highlight)

    Where $A1 can be whatever column will contain the X that indicates that row is done... so if the "Done X" is in column L instead of A change the formula to:
    =$L1="X"

    If by "done X" you mean that all columns in the row are X then you can add a column in your spreadsheet that checks this by doing something like this in cell L1 for instance:
    =IF(AND(A1="X",B1="X",C1="X",D1="X",E1="X",F1="X",G1="X",H1="X"),"X","Not Done")

    This can be done very similarly using a macro. This is just one of a million ways of going about it.

  3. #3
    Rick Hansen
    Guest

    Re: color changing cells

    Hi darrenm, Here is a bit of code I think that will get the job for
    you, Insert the code in Worksheet_Change() event for the worksheet that has
    your job tracking stats. Remember to change the range match jobs our
    tracking.

    enjoy, Rick, FBKS, AK



    Private Sub Worksheet_Change(ByVal Target As Range)
    Dim JobStatRng As Range

    Set JobStatRng = Range("A2:H10") '<- change range here
    If (Union(Target, JobStatRng).Address = Srng.Address) Then
    If Target.Value = "X" Then
    Target.Interior.Color = RGB(100, 250, 0)
    End If
    If Target.Value = "Done" Then
    Target.EntireRow.Interior.Color = RGB(250, 250, 0)
    End If
    End If
    End Sub


    "darrenm" <[email protected]> wrote in
    message news:[email protected]...
    >
    > I have a job tracking spreadsheet that I would like help with. As a job
    > progresses we X off that
    > column so we know the status of each box that we are processing. What
    > I would like to do is
    > everytime an X is entered into a row I would like that cell to turn a
    > certain color and once the final "Done"
    > X is entered I would like the entire row to turn a different color.
    > That way we knew how far along and
    > which boxes are finished. Does anyone have a solution they would like
    > to share?
    >
    > Thanks in advance
    >
    >
    > --
    > darrenm
    > ------------------------------------------------------------------------
    > darrenm's Profile:

    http://www.excelforum.com/member.php...o&userid=33880
    > View this thread: http://www.excelforum.com/showthread...hreadid=536591
    >




  4. #4
    Registered User
    Join Date
    04-26-2006
    Posts
    2

    Oops

    Thanks for the replies. I forgot, I'm using Open Office. I will try and see if they work anyway.

+ Reply to Thread

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts

Search Engine Friendly URLs by vBSEO 3.6.0 RC 1