Hello all, I'm sure this is a pretty simple thing. I have a code that is copying visible cells to another sheet. However any merged cells that are within the range become unmerged and any font choices/color return to the default. I'm just not sure of the correct wording to put in the line. Sheets("RostM").Select Sheets("RostM").Range("C3:F124").SpecialCells(xlCellTypeVisible).Copy Sheets("R_MTu").Select Range("Q3").Select Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:=xlNone, SkipBlanks _ :=True, Transpose:=False

If you would like to post, please check out the MrExcel Message Board FAQ and register here. If you forgot your password, you can reset your password.

Copy/paste in vba not keeping merged cells/color formatting

Thread starter andrewb90
Start date May 11, 2016
Tags

copy paste formatting vba

andrewb90

Well-known Member

May 11, 2016

Hello all,

I'm sure this is a pretty simple thing. I have a code that is copying visible cells to another sheet. However any merged cells that are within the range become unmerged and any font choices/color return to the default. I'm just not sure of the correct wording to put in the line.

Code:

    Sheets("RostM").Select    Sheets("RostM").Range("C3:F124").SpecialCells(xlCellTypeVisible).Copy
    Sheets("R_MTu").Select
    Range("Q3").Select
    Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:=xlNone, SkipBlanks _
        :=True, Transpose:=False