Opmaak mee kopieren

[Woffels]

Hallo,

Ik doe de Volgende actie:

Sheets("Rockwell").Range("R_Header1").Value = Sheets("Rockwell").Range("R_Header_Inn").Value

Waarbij R_Header1 en R_Header_Inn samengestelde cellen zijn. Dit werkt prima om de waardes van R_Header_Inn naar R_Header1 te kopieren.
Maar ik wil ook de opmaak mee kopieren.
Hoe doe ik dat?

Groeten,

Erwin

 

[Gijsbert1]

Maak er eens dit van:

Range("R_Header_Inn").Copy Range("R_Header1")