copy row heights

[MikeF]

Have a subroutine that copies a sheet from one workbook to the other, then
copies values, formats, and column widths.

But need it also to copy the row heights/hidden rows.

Any assistance will be sincerely appreciated.
Thanx.
- Mike

 

[CLR]

Maybe someting in here will help.

Sub CopyRowHeights()
Rows("1:20").Select
Selection.Copy
Windows("Book2").Activate
Rows("1:20").Select
Selection.PasteSpecial Paste:=xlFormats, Operation:=xlNone, SkipBlanks:=
_
False, Transpose:=False
Application.CutCopyMode = False
End Sub

Vaya con Dios,
Chuck, CABGx3

 

[GS]

MikeF presented the following explanation :

Have a subroutine that copies a sheet from one workbook to the other, then
copies values, formats, and column widths.

But need it also to copy the row heights/hidden rows.

Any assistance will be sincerely appreciated.
Thanx.
- Mike

If you are copying a sheet, whether to another workbook OR within the
same workbook, everything copies. Are you saying that your copy
procedure strips some stuff away? It would help if you post your code.
AFAIK, the only thing you should lose is some content of cells with
more than 1024 characters. Otherwise, the copied sheet should be
identical to the original.

Garry