copy row heights
 

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

copy row heights
 

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




"MikeF" wrote in message
...

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

copy row heights
 

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