Macro to make the background color of a cell match that of another cell

[LukeWarmwater]

Hi there. This is my first time I have needed to ask a question. Whenever I've had problems in the past, I've found an answer but in this case I want to do something specific and if anyone has asked it before, I couldn't find it.

The title says what I need. Here's what I have so far:

Please Login or Register  to view this content.

I was previously using Interior.ColorIndex but since I want to use colors that weren't preset, this wasn't going to work. Interior.Color seems to do the trick but because I want to get the color using my GetColor function, I'm now stuck. As far as I can tell, the above code should work if I can replace the question marks with the correct type - I just can't figure out what it should be.

If anyone can help, I would be very grateful.

[HaHoBe]

Hi, LukeWarmwater,

type would be Long, itīs Sheets and not Sheet.

Why not use

Please Login or Register  to view this content.

Ciao,
Holger

[LukeWarmwater]

Wow, "long"? It was that simple? That makes me feel foolish. But at least I know the answer now and am not likely to forget it.

As for why I didn't use the code you suggested, funnily enough it was to make it simpler. I was going to be rewriting "Sheets("Colours").Cells(1, 1).Interior.Color" quite a lot targetting different cells so I made functions so that I didn't have to keep remembering which cells contained the color templates I wanted.

Thanks for your help.

[HaHoBe]

Hi, LukeWarmwater,

I would pass the information about Sheetname and Range as parameter instead of rewriting the function and maybe add an error handler to it in case no correct values are being delivered.

Please Login or Register  to view this content.

Ciao,
Holger