Code following can be used to "pastespecial" row heights for blocks of cells that have been copied and have lost row height settings.
Prior to executing, the source block is selected, then PageSetup'd as the PrintArea.
The pasting begins at the activecell row and continues for the number of rows...