PC Review


Reply
Thread Tools Rate Thread

Conditional format over a Range

 
 
=?Utf-8?B?b3V0c29s?=
Guest
Posts: n/a
 
      23rd Aug 2007
Sorry if this is a repost...my post lost connection.

I need to change the format of cells that are changed in a range. One person
sets up the sheet and another continues it. My supervisor wants to know if
any changes have been made by the second (or third) user. We do not use a
login to the workbook and who changes it is not important, just the knowledge
that it was changed from it's original input.

I'm a novice programmer so be gentle...I understand code, just don't have
the hours in yet to be a master like you follks.
 
Reply With Quote
 
 
 
 
=?Utf-8?B?Sm9lbA==?=
Guest
Posts: n/a
 
      23rd Aug 2007
Use the worksheet change function below. Thsi function will highligh change
cells in yellow. It must be put in every worksheet that you want changes
recorded

1) go to tab on bottom of worksheet and right click.
2) select view code. Paste code below

Sub worksheet_change(ByVal target As Range)

For Each cell In target

cell.Interior.ColorIndex = 6


Next cell


End Sub

If you want to limit the range of cells to track then use this type code
instead

Sub worksheet_change(ByVal target As Range)

For Each cell In target
If (cell.Row >= 5) And (cell.Row <= 10) And _
(cell.Column >= 4) And (cell.Column <= 15) Then

cell.Interior.ColorIndex = 6

End If

Next cell

End Sub



"outsol" wrote:

> Sorry if this is a repost...my post lost connection.
>
> I need to change the format of cells that are changed in a range. One person
> sets up the sheet and another continues it. My supervisor wants to know if
> any changes have been made by the second (or third) user. We do not use a
> login to the workbook and who changes it is not important, just the knowledge
> that it was changed from it's original input.
>
> I'm a novice programmer so be gentle...I understand code, just don't have
> the hours in yet to be a master like you follks.

 
Reply With Quote
 
=?Utf-8?B?b3V0c29s?=
Guest
Posts: n/a
 
      24th Aug 2007
Thanks Joel, I'll try that tomorrow. I didn't know how to limit my target
range. I appreciate the quick response.

"Joel" wrote:

> Use the worksheet change function below. Thsi function will highligh change
> cells in yellow. It must be put in every worksheet that you want changes
> recorded
>
> 1) go to tab on bottom of worksheet and right click.
> 2) select view code. Paste code below
>
> Sub worksheet_change(ByVal target As Range)
>
> For Each cell In target
>
> cell.Interior.ColorIndex = 6
>
>
> Next cell
>
>
> End Sub
>
> If you want to limit the range of cells to track then use this type code
> instead
>
> Sub worksheet_change(ByVal target As Range)
>
> For Each cell In target
> If (cell.Row >= 5) And (cell.Row <= 10) And _
> (cell.Column >= 4) And (cell.Column <= 15) Then
>
> cell.Interior.ColorIndex = 6
>
> End If
>
> Next cell
>
> End Sub
>
>
>
> "outsol" wrote:
>
> > Sorry if this is a repost...my post lost connection.
> >
> > I need to change the format of cells that are changed in a range. One person
> > sets up the sheet and another continues it. My supervisor wants to know if
> > any changes have been made by the second (or third) user. We do not use a
> > login to the workbook and who changes it is not important, just the knowledge
> > that it was changed from it's original input.
> >
> > I'm a novice programmer so be gentle...I understand code, just don't have
> > the hours in yet to be a master like you follks.

 
Reply With Quote
 
=?Utf-8?B?b3V0c29s?=
Guest
Posts: n/a
 
      24th Aug 2007
Tried it and the code works well. Here's the rub: I need to have this routine
run after the initial input. So the 1st user gets black on white, the next
user if he edits get black on yellow, final user gets black on red. the
worksheet will be closed between users. Any ideas????

"outsol" wrote:

> Thanks Joel, I'll try that tomorrow. I didn't know how to limit my target
> range. I appreciate the quick response.
>
> "Joel" wrote:
>
> > Use the worksheet change function below. Thsi function will highligh change
> > cells in yellow. It must be put in every worksheet that you want changes
> > recorded
> >
> > 1) go to tab on bottom of worksheet and right click.
> > 2) select view code. Paste code below
> >
> > Sub worksheet_change(ByVal target As Range)
> >
> > For Each cell In target
> >
> > cell.Interior.ColorIndex = 6
> >
> >
> > Next cell
> >
> >
> > End Sub
> >
> > If you want to limit the range of cells to track then use this type code
> > instead
> >
> > Sub worksheet_change(ByVal target As Range)
> >
> > For Each cell In target
> > If (cell.Row >= 5) And (cell.Row <= 10) And _
> > (cell.Column >= 4) And (cell.Column <= 15) Then
> >
> > cell.Interior.ColorIndex = 6
> >
> > End If
> >
> > Next cell
> >
> > End Sub
> >
> >
> >
> > "outsol" wrote:
> >
> > > Sorry if this is a repost...my post lost connection.
> > >
> > > I need to change the format of cells that are changed in a range. One person
> > > sets up the sheet and another continues it. My supervisor wants to know if
> > > any changes have been made by the second (or third) user. We do not use a
> > > login to the workbook and who changes it is not important, just the knowledge
> > > that it was changed from it's original input.
> > >
> > > I'm a novice programmer so be gentle...I understand code, just don't have
> > > the hours in yet to be a master like you follks.

 
Reply With Quote
 
 
 
Reply

Thread Tools
Rate This Thread
Rate This Thread:

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are Off


Similar Threads
Thread Thread Starter Forum Replies Last Post
Conditional Format with Name Range? KHW Microsoft Excel Misc 1 20th May 2010 12:06 AM
Conditional Format a Range Name Eric Microsoft Excel Worksheet Functions 7 23rd May 2009 04:37 PM
Conditional format of range AndyB Microsoft Excel Misc 3 7th May 2009 11:14 PM
Conditional Formatting (How to format a range depending on another range) Josh Rogers Microsoft Excel Discussion 2 6th Oct 2005 07:18 PM
Using Conditional format for a range SPenney Microsoft Excel Misc 3 6th Oct 2003 09:59 PM


Features
 

Advertising
 

Newsgroups
 


All times are GMT +1. The time now is 06:29 AM.