Please help. Very simple but I don't know. :)

G

GarryKhoo

I have 2 worksheet.

The first worksheet1 Cell e.g. A2 have formating such as "What a good day"
with "What" in Red color, "a good day" in Green color and entire word in Bold.

On 2nd worksheet2, I put " =worksheet1!A2 ". The result only the words but
without the formating.

Please help how can I display exactly the same in 2nd worksheet with 1st
worksheet including all the formating?
 
R

Richard Buttrey

I have 2 worksheet.

The first worksheet1 Cell e.g. A2 have formating such as "What a good day"
with "What" in Red color, "a good day" in Green color and entire word in Bold.

On 2nd worksheet2, I put " =worksheet1!A2 ". The result only the words but
without the formating.

Please help how can I display exactly the same in 2nd worksheet with 1st
worksheet including all the formating?
Click to expand...


The help suggests that conditional formatting can't be made dependent
on other worksheets or workbooks. Probably the only way to achieve
this is with a VBA macro

Rgds
__
Richard Buttrey
Grappenhall, Cheshire, UK
__________________________
 
R

Ron Rosenfeld

I have 2 worksheet.

The first worksheet1 Cell e.g. A2 have formating such as "What a good day"
with "What" in Red color, "a good day" in Green color and entire word in Bold.

On 2nd worksheet2, I put " =worksheet1!A2 ". The result only the words but
without the formating.

Please help how can I display exactly the same in 2nd worksheet with 1st
worksheet including all the formating?
Click to expand...

Without using VBA:

1. Select worksheet1!A2
2. Edit/Copy
3. Select worksheet2!targetcell
4. Edit/Paste

There is no way for a worksheet formula to result in letters that are formatted
with different colors, as far as I know. You must have an actual text string
in the target cell (and not a formula) in order to apply this sort of
formatting.

The above copy/paste routine could be automated with VBA.


--ron
 
R

Ron Rosenfeld

Hi Ron,

Do you have sample code for VBA? Mind to share?
Click to expand...



Sub foo()
Worksheets("Sheet2").Range("A1:A11").Copy _
(Worksheets("Sheet1").Range("A2"))
End Sub

will copy Sheet2!A1:A11 to Sheet2!A2:A12 -- contents and formatting and all.

But the specifics of how you implement something like this depends on the
details of your workbook.

You can also just record a macro, but the code gets more involved when you do
that.
--ron
 
Top