colum to rows

[alexanderd]

good evening and thank you for your quick response. having altered your
coding to take in account of the colums i am using i find your solution
very quick in transposing the colum in question "C".
the only thing i find is that i am having difficulty in deleting the
rows underneath the transposition,
the code is as you suggested

'clean up "blank cells and temporary bottom cell, too!
Range("C:C").Cells.SpecialCells(xlCellTypeBlanks).EntireRow.D elete
On Error GoTo 0
Range("b:B").Delete

can you help further in resolving this last part
i was going to send an excel file now ive got to save a copy as a pdf
which i will uplift shortly

 

[Dave Peterson]

I think I'm afraid to say "try this" without knowing what you did and how your
data looks.

But I was deleting the column that contained the data that was transposed.

'clean up "blank cells and temporary bottom cell, too!
Range("C:C").Cells.SpecialCells(xlCellTypeBlanks).EntireRow.D elete
On Error GoTo 0
Range("b:B").Delete

Maybe if you just offset it by one column:

'clean up "blank cells and temporary bottom cell, too!
Range("D").Cells.SpecialCells(xlCellTypeBlanks).EntireRow.D elete
On Error GoTo 0
Range("C:C").Delete

But I would have guessed that in the original suggestion, all those B's should
become C's. And all the C's should become D's.

If that doesn't work, make sure you cancel without saving.

Then post back with the code you're using and with a nice set of sample data.
(not a workbook, though.)