I am using the following code to open a file and copy data
to another file. There are some cells that have merged
cells which is creating a runtime error 1004 this operation
requires the merged cells to be identically sized. I
originally tried to copy a bigger range with the same
formats but that didn't work either. Does anyone have any
suggestions?

Thanks.

Dim schb2 As Range
Workbooks(myfile).Activate
Worksheets("Schedule B-2 By Premium Group").Visible =
True
Worksheets("Schedule B-2 By Premium Group").Activate
Set schb2 = Worksheets("Schedule B-2 By Premium Group
").Range("d13:d811")
schb2.Copy
Worksheets("Schedule B-2 By Premium Group").Visible =
False
ThisWorkbook.Activate
Sheet7.Activate
Sheet7.Cells(13, 4).PasteSpecial Paste:=xlPasteValues