<a href="http://tinypic.com?ref=ega2xg" target="_blank"><img src="http://i64.tinypic.com/ega2xg.png" border="0" alt="Image and video hosting by TinyPic"></a>
Sub CopyToAnotherSheet2()'copy and transpose
Dim NextRow As Long
Dim cpRng As Range
Application.CutCopyMode = False...