View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
DennisW DennisW is offline
external usenet poster
 
Posts: 5
Default Transpose to Non-adjacent Cells

I'm trying to transpose selected rows of data from a worksheet to columns on
multiple worksheets, however the transposed columnar data will be on
non-adjacent rows. I loop through the rows, columns, and worksheets. Part
of the code within the loops is:

Sheets("Equip").Activate
Range(Cells(m, 2), Cells(m, 5)).Copy
Sheets(s).Cells(7, c).PasteSpecial Paste:=xlPasteValues,
Operation:=xlNone, SkipBlanks _
:=False, Transpose:=True

Sheets("Equip").Range(Cells(m, 7)).Copy
Destination:=Sheets(s).Range(Cells(12, c))

The transpose part of the code works, but I don't know why the second part
fails where I'm just trying to copy a single cell.

Any help?