Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1
Default Linking Formats (color) Between Cells in Diff Wsheets

I've seen (my) question answered in bits and pieces (or the silver bullet has
eluded me ;) but this is the precise problem I'm trying to solve:

I want sheet 1 to have a myriad of different colored cells (think
tracking/scheduling)
I want the ability to change the color of any one, or range of cells in
sheet 1 and automatically have corresponding cells in sheet 2 change to same.

I've seen partial answers involving conditional formatting and/or VB...my
dream answer would be without a macro, but if necessary, can anyone point me
to a complete example? (I suck with macros ;)

Thanks much in advance,I've seen (my) question answered in bits and pieces
(or the silver bullet has eluded me ;) but this is the precise problem I'm
trying to solve:

I want sheet 1 to have a myriad of different colored cells (think
tracking/scheduling)
I want the ability to change the color of any one, or range of cells in
sheet 1 and automatically have corresponding cells in sheet 2 change to same.

I've seen partial answers involving conditional formatting and/or VB...my
dream answer would be without a macro, but if necessary, can anyone point me
to a complete example? (I suck with macros ;)

Thanks much in advance
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 114
Default Linking Formats (color) Between Cells in Diff Wsheets

How large are the ranges you need to match up ? That might influence
the most appropriate solution.

As far as I know this can't be done with conditional formatting:
you're going to have to use a macro.

Sub MatchInteriorColors()
Dim c As Range
Application.ScreenUpdating = False
For Each c In Sheet1.Range("A1:H100") 'adjust to suit
Sheet2.Cells(c.Row, c.Column).Interior.ColorIndex = _
c.Interior.ColorIndex
Next c
Application.ScreenUpdating = True
End Sub

You could trigger this on sheet activate for sheet2

Tim

On Oct 22, 2:25*pm, Russ ---------------------ance,Russ
wrote:
I've seen (my) question answered in bits and pieces (or the silver bullet has
eluded me ;) *but this is the precise problem I'm trying to solve:

I want sheet 1 to have a myriad of different colored cells (think
tracking/scheduling)
I want the ability to change the color of any one, or range of cells in
sheet 1 and automatically have corresponding cells in sheet 2 change to same.

I've seen partial answers involving conditional formatting and/or VB...my
dream answer would be without a macro, but if necessary, can anyone point me
to a complete example? *(I suck with macros ;)

  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1,298
Default Linking Formats (color) Between Cells in Diff Wsheets

an alternative way would be to use Format/Styles
create a style with whatever color you want, then apply it to cells on any
of yuor sheets sheets Now if you edit the style and change the color, all
cells formatted with that style will automatically reflect the change

changign color in code then is simplistic...

Option Explicit
Sub test()
ChangeStyleColor 32
ChangeStyleColor 34
End Sub


Sub ChangeStyleColor(colorchoice As Long)
ActiveWorkbook.Styles("Patrick1").Interior.ColorIn dex = colorchoice
End Sub

create a style, in my case I called it Patrick1
select cells and set to this style
F8 (step) through the test code and see the color change




"Russ
---------------------ance,Russ" wrote:

I've seen (my) question answered in bits and pieces (or the silver bullet has
eluded me ;) but this is the precise problem I'm trying to solve:

I want sheet 1 to have a myriad of different colored cells (think
tracking/scheduling)
I want the ability to change the color of any one, or range of cells in
sheet 1 and automatically have corresponding cells in sheet 2 change to same.

I've seen partial answers involving conditional formatting and/or VB...my
dream answer would be without a macro, but if necessary, can anyone point me
to a complete example? (I suck with macros ;)

Thanks much in advance,I've seen (my) question answered in bits and pieces
(or the silver bullet has eluded me ;) but this is the precise problem I'm
trying to solve:

I want sheet 1 to have a myriad of different colored cells (think
tracking/scheduling)
I want the ability to change the color of any one, or range of cells in
sheet 1 and automatically have corresponding cells in sheet 2 change to same.

I've seen partial answers involving conditional formatting and/or VB...my
dream answer would be without a macro, but if necessary, can anyone point me
to a complete example? (I suck with macros ;)

Thanks much in advance

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

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


Similar Threads
Thread Thread Starter Forum Replies Last Post
How do I keep my formatting when linking cells in diff. sheets? L. Davis Excel Worksheet Functions 4 March 9th 09 07:40 PM
Portions of lines being displayed in 2 diff formats simultaneously Ish Excel Discussion (Misc queries) 2 December 2nd 08 06:09 PM
how you make links between diff. cells on diff. work sheets NYC-MIKE Excel Worksheet Functions 3 February 11th 08 05:05 PM
Alternate printg 2 Wsheets to diff printers w/out reassigning ptr Robert L Excel Discussion (Misc queries) 1 September 30th 06 02:34 AM
Linking Formats Across Cells RB Excel Discussion (Misc queries) 1 June 16th 05 10:20 PM


All times are GMT +1. The time now is 08:25 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"